• Join over 1.2 million students every month
  • Accelerate your learning by 29%
  • Unlimited access from just £6.99 per month
Page
  1. 1
    1
  2. 2
    2
  3. 3
    3
  4. 4
    4
  5. 5
    5
  6. 6
    6
  7. 7
    7
  8. 8
    8
  9. 9
    9
  10. 10
    10
  11. 11
    11
  12. 12
    12
  13. 13
    13
  14. 14
    14
  15. 15
    15
  16. 16
    16
  17. 17
    17
  18. 18
    18
  19. 19
    19
  20. 20
    20
  21. 21
    21
  22. 22
    22
  23. 23
    23
  24. 24
    24
  25. 25
    25
  26. 26
    26
  27. 27
    27
  28. 28
    28
  29. 29
    29

Computing Module 3 Writeup

Extracts from this document...

Introduction

Defining data requirements: Examiner (ExaminerNumber, Forename, Surname, Address, Postcode, SubjectReferenceCode) Centre (CentreNumber, NumberOfCandidatesEntered, ExaminerNumber, SubjectReferenceCode) Subject (SubjectReferenceCode, SubjectName, Payment) Examiner Table: Field Name Data Type ExaminerNumber Number Forename Text Surname Text Address Text Postcode Text TaxDeductionFlag Yes/No SubjectReferenceCode Number Centre Table: Field Name Data Type CentreNumber Number NumberOfCandidatesEntered Number ExaminerNumber Number SubjectReferenceCode Number Subject Table: Field Name Data Type SubjectReferenceCode Number SubjectName Text Payment Currency Data Entry Form For A Centre: Data Entry Form For An Examiner: Implementation Of Tables In A Database: Centre Table: As you can see, the fields CentreNumber and SubjectReferenceCode have been made joint primary keys. This is so that a centre can enter candidates for more than one subject. For example, if CentreNumber was the primary key on its own, then we could only enter candidates from the centre for one subject because if the CentreNumber was repeated, it would not be unique and therefore fall foul of the uniqueness check. Therefore, with both fields, CentreNumber and SubjectReferenceCode being made joint primary keys, we can enter candidates for more than one subject from a particular centre, because the CentreNumber and SubjectReferenceCode combination will be unique, so it will pass the uniqueness validation rule. Validation Rules: Field Validation Check Validation Rule CentreNumber (Primary Key) Range Check Between 10000 and 79999 Input Mask 00000 ( must have 5 digits) Presence Check Required = Yes Uniqueness Check It is the Primary Key SubjectReferenceCode Presence Check Required = Yes Input Mask Options from drop-down box (20094, 28181, 64773) by using the following Row Source code in Lookup: Select Subject.SubjectReferenceCode From Subject; ExaminerNumber Presence Check Required = Yes Input Mask 000000 (must have 6 digits) ...read more.

Middle

The value 0 means that they will have 22% tax deducted from their gross pay. To edit records, the user would select a record and press EDIT. This would open up the Add Examiner form, but the selected details would already be in the relevant fields, making editing easier. Once the user has edited the record, they only have to press ADD and the record is amended in the database. To delete records, the user would select a record and press DELETE. This would cause a message box to appear asking for conformation of the delete. Once confirmed, the record is deleted from the database. Report 1: For my system, I will be printing out the relevant details for each examiner separately. This is why I have included a drop down box, so that the user can select the specific examiner they want the details for. Once the print button is pressed, the data currently being displayed is sent to the printer to be printed. The hardcopy for this report for Examiner Number: 357862 Natasha Foster is shown below. 357862 Natasha Foster Centre No. No. Of Scripts 46310 39 65456 65 75548 53 79995 47 Private Sub cmbExaminer_Click() Dim ExaminerNo As String DisplayExaminerName If (cmbExaminer.ListIndex = 0) Then datCentre.RecordSource = "Select CentreNumber, NumberOfCandidatesEntered From Centre Order By CentreNumber ASC" Else ExaminerNo = cmbExaminer.Text datCentre.RecordSource = "Select CentreNumber, NumberOfCandidatesEntered From Centre Where ExaminerNumber = " & ExaminerNo & " Order By CentreNumber ASC" End If datCentre.CommandType = adCmdText datCentre.Refresh End Sub Public Sub LoadExaminers() cmbExaminer.Clear cmbExaminer.AddItem ("All Examiners") datExaminer.Recordset.MoveFirst While datExaminer.Recordset.EOF = False cmbExaminer.AddItem (datExaminer.Recordset("ExaminerNumber")) datExaminer.Recordset.MoveNext Wend cmbExaminer.ListIndex = 0 End Sub Private Sub Form_Load() ...read more.

Conclusion

Unload Me End Sub Private Sub Form_Load() datExaminer.Refresh datCentre.Refresh datSubject.Refresh Dim SubjectCode As Long Dim ExaminerNo As Long Dim TaxDeductedFlag As Boolean Dim CanEnt As Long Dim PayMade As Double Dim EngCandidates As Long Dim EngPaymentMade As Double Dim CompCandidates As Long Dim CompPaymentMade As Double Dim EcoCandidates As Long Dim EcoPaymentMade As Double Dim TotalCandidates As Long Dim TotalPaymentMade As Double datExaminer.Recordset.MoveFirst While (datExaminer.Recordset.EOF = False) SubjectCode = datExaminer.Recordset("SubjectReferenceCode") ExaminerNo = datExaminer.Recordset("ExaminerNumber") TaxDeductedFlag = datExaminer.Recordset("TaxDeductionFlag") Call CalcTotals(SubjectCode, ExaminerNo, TaxDeductedFlag, CanEnt, PayMade) If (SubjectCode = 20094) Then EngCandidates = EngCandidates + CanEnt EngPaymentMade = EngPaymentMade + PayMade End If If (SubjectCode = 28181) Then CompCandidates = CompCandidates + CanEnt CompPaymentMade = CompPaymentMade + PayMade End If If (SubjectCode = 64773) Then EcoCandidates = EcoCandidates + CanEnt EcoPaymentMade = EcoPaymentMade + PayMade End If datExaminer.Recordset.MoveNext Wend lblCanEng.Caption = EngCandidates lblPayEng.Caption = Format(EngPaymentMade, "�#,##0.00") lblCanComp.Caption = CompCandidates lblPayComp.Caption = Format(CompPaymentMade, "�#,##0.00") blCanEco.Caption = EcoCandidates lblPayEco.Caption = Format(EcoPaymentMade, "�#,##0.00") lblTotalCan.Caption = EngCandidates + CompCandidates + EcoCandidates lblTotalPay.Caption = Format(EngPaymentMade + CompPaymentMade + EcoPaymentMade, "�#,##0.00") End Sub Public Sub CalcTotals(ByVal SubjectCode As Long, ByVal ExaminerNo As Long, ByVal TaxDeductedFlag As Boolean, ByRef CandidatesEntered As Long, ByRef PaymentMade As Double) Dim ScriptRate As Double Dim TaxDeducted As Double datCentre.RecordSource = "Select Sum(NumberOfCandidatesEntered) From Centre Where SubjectReferenceCode = " & SubjectCode & " AND ExaminerNumber = " & ExaminerNo datCentre.Refresh CandidatesEntered = datCentre.Recordset(0) PaymentMade = 0 ScriptRate = GetScriptRate(SubjectCode) PaymentMade = (CandidatesEntered * ScriptRate) + 95 TaxDeducted = 0 If (TaxDeductedFlag = False) Then TaxDeducted = (PaymentMade / 100) * 22 End If PaymentMade = PaymentMade - TaxDeducted End Sub Public Function GetScriptRate(SubjectCode As Long) As Double datSubject.RecordSource = "SELECT Payment FROM Subject WHERE SubjectReferenceCode = " & SubjectCode datSubject.Refresh GetScriptRate = datSubject.Recordset("Payment") End Function Jeeva Thavarajah 1163 Page 28 UKAB ...read more.

The above preview is unformatted text

This student written piece of work is one of many that can be found in our AS and A Level Computer Science section.

Found what you're looking for?

  • Start learning 29% faster today
  • 150,000+ documents available
  • Just £6.99 a month

Not the one? Search for your essay title...
  • Join over 1.2 million students every month
  • Accelerate your learning by 29%
  • Unlimited access from just £6.99 per month

See related essaysSee related essays

Related AS and A Level Computer Science essays

  1. Business blue print document for the implementation of SAP R/3 (4.6B) payroll at Mastek ...

    the Net Payroll component, or to be exported to a third-party product for net calculation. Pre-tax deductions and earnings are processed within the Gross Payroll component. Integration The Gross Payroll component is closely integrated with the SAP Personnel Administration and SAP Benefits components Payroll in Dialog Mode Purpose The payroll

  2. 140 Computing A-Level Revision Questions

    Explain, using 4362 as an example, how a check digit may be used to detect a transcription error in an account number. 92. Describe three types of documentation which should accompany any software. 93. Why is it not necessary to take a backup copy of a master file after it has been processed sequentially?

  1. GCSE I.T Security Case Study - Riverside Leisure Centre

    security guard checks the windscreen badges and is only highered to let the car in when the guard has seen the security badge. Suggested Measures of Physical Security for Riverside As well as the impressive current physical security measures of Riverside they could also utilise the following measures to make sure their data stays secure.

  2. Smart Card System

    Internet services and solutions with 100% Pure Java[tm] code on the Windows, Linux, or Solaris[tm] Operating Environments. This powerful IDE simplifies the tasks we perform most often: compiling, building, browsing, editing, and debugging. Its outstanding GUI builder and JavaBean[tm] assembly tools make it easy to get and stay productive, and

  1. AQA Computing CPT3 June 08 Peter's Petrol Pumps

    STRUCTURE CHART PSEUDOCODE ALGORITHMS PUMP OPERATION Event: Clicking Remove / Replace Nozzle Button If Button says Remove then Button says Replace On Console Zero Dispensed Button is enabled If Button says Replace then Button says Remove Button Squeeze is disabled On Console Pump is marked out of use Petrol Dispensed,

  2. AQA Computing CPT3

    Data Dictionary A data dictionary is a collection of descriptions of the data objects, or items in a system for a data model. Below I have identified the data types required for my petrol pump Name Type Validation Example Notes amountOfFuel Number 0 - 99.99 52.34 This will store the

  1. ICT Sample Work Welcome Centre Requirements

    Tony will often to have to create 20 to 30 invoices at a time. Unfortunately, Tony Williams has very limited experience with computers. If Chris is not available and invoices have to be sent out, Tony will have to write out an invoice by hand into a blank template.

  2. Database Coursework – George Youngs Coaches.

    They went into more detail explaining that driver and customer details include the usual things such as names, addresses, telephone numbers and postcode as well as the bus they drive, how long they were driving for that day and how long the job took.

  • Over 160,000 pieces
    of student written work
  • Annotated by
    experienced teachers
  • Ideas and feedback to
    improve your own work