• 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. 140 Computing A-Level Revision Questions

    State five methods of accessing data from a table in memory. 82. What is a modem and why is it necessary in communications? 83. A multiplexer is commonly used in communications. Explain what it is used for and briefly describe two methods of implementation.

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

    CAFETARIA PLAN > Also known as Section 125 Plan. > Employees can pay for medical and dependent care expenses with Pre Tax Dollars to avail of tax benefit under this plan. > Employees may choose to have designated amount of their income directed towards this plan.

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

    Also, when I walked past the staff car park I noticed that all cars parked in there had the same badge in the windscreen, therefore it must be an access badge to park in the car park. Also, there is a kiosk with a barrier that is lowered whilst the

  2. ICT Sample Work Welcome Centre Requirements

    Creating invoices will not be included in this task. Also, to simplify the task, we will focus on commercial customers only and not charity customers, as the prices are all different. DETAILS OF CLIENT, USER(S) AND AUDIENCE (IF APPLICABLE) IDENTIFICATION OF THE CLIENT The client for this project is Tony Williams, who is the General Manager of the Welcome Centre.

  1. 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

  2. Database Coursework – George Youngs Coaches.

    One thing that may be difficult will be setting the reminder alerts. I do not yet know if it is possible to do this sort of thing in an access database without some kind of intense Visual Basic programming. However I will investigate this and try to implement it as best as I can into the final solution.

  1. The United Kingdom Awarding Body (UKAB) has asked me to design a system for ...

    types of validation, such as currency, Boolean, more than, less than, etc. The presentation of the data is more than adequate on a database. Statistical analysis and mathematical functions are impossible to undertake on a database, details would need to imported and exported between a database and a spreadsheet.

  2. This system is designed for the monitoring of post examination re-marks for any test ...

    Data entry checks - outside the range of possible marks. 3. Outputs Hardcopy i. A daily list of any re-marks completed where a mark change has affected the grade. The printout needs to contain the unique number, centre number, candidate number and name, subject, original grade and new grade.

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