• 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
  30. 30
    30
  31. 31
    31
  32. 32
    32

The United Kingdom Awarding Body (UKAB) has asked me to design a system for the monitoring of its post-examinations re-marks.

Extracts from this document...

Introduction

Introduction The United Kingdom Awarding Body (UKAB) has asked me to design a system for the monitoring of its post-examinations re-marks. If a centre feels that the grade awarded to a candidate for an examination is lower than expected, the centre can ask for that script to be remarked. The UKAB expects all this to be completed within three weeks. All the details must be stored for the purpose of analysis and monitoring File Design External file name: Re-Mark.dat General name: Re-mark Description: Stores details of all current candidates Record structure Field name Field description Data type No. bytes CandName Candidate's Name String 16 CandNo Candidate's Number String 4 CenterNo Centre Number String 5 DateSub Date of the exam paper submitted Date 10 SubRef Subject Reference Code String 5 OrgMr Original Mark Integer 2 OrgGr Original Grade String 2 PaperRt Paper to be returned? String 3 RemarkedMr Remarked Mark Integer 2 RemarkedGr Remarked Grade String 2 DateRt Date of paper when returned Date 10 Record size 61 bytes Typical size of file 1 record per script. With 15 scripts= 990 bytes Data Flow Diagram Data Requirements Data to be input: The following details will be stored for the re-marks: * Candidate name * Candidate number * Centre number * Subject reference code * Original mark * Re-mark * Centre requested script * Date paper submitted * Date paper re-marked * Grade affected by remark For a subject the following will be stored: * Subject Reference Code * Grade boundaries for grades A-E and U * Date for the request of the re-mark Data to be output: Print out of all candidates remarks details Print out of all specific centre number Print out of all specific subject reference code Print out of all re-marks that have not been returned in a three week period Print out of all re-marks were the grade have been affected Analysis of software I have decided that there are four possible roots which I can follow to complete this ...read more.

Middle

As Integer ................................................................................................. Private Sub cboCandNo_Click() Dim Candidate As CandidateType Dim SearchCandNo As String * 4 Dim Found As Boolean Found = False SearchCandNo = cboCandNo.Text Open CandidateFile For Random As #1 Len = Len(Candidate) Do While Not EOF(1) And Not Found Get #1, , Candidate If Candidate.CandNo = SearchCandNo Then Found = True End If Loop Close #1 If Found Then txtCandName.Text = Candidate.CandName txtCandNo.Text = Candidate.CandNo txtCentreNo.Text = Candidate.CentreNo txtDateSub.Text = Candidate.DateSub cboSubRef1.Text = Candidate.SubRef txtOrgMr.Text = Candidate.OrgMr lblOrgGr = Candidate.OrgGr cboPaperRt.Text = Candidate.PaperRt txtRemarkedMr.Text = Candidate.RemarkedMr lblRemarkedGr = Candidate.RemarkedGr cboGradeAff.Text = Candidate.GradeAff txtDateRt.Text = Candidate.DateRt End If End Sub ................................................................................................. Private Sub cboCandName_Click() Dim Candidate As CandidateType Dim SearchCandName As String * 15 Dim Found As Boolean Found = False SearchCandName = cboCandName.Text Open CandidateFile For Random As #1 Len = Len(Candidate) Do While Not EOF(1) And Not Found Get #1, , Candidate If Candidate.CandName = SearchCandName Then Found = True End If Loop Close #1 If Found Then txtCandName.Text = Candidate.CandName txtCandNo.Text = Candidate.CandNo txtCentreNo.Text = Candidate.CentreNo txtDateSub.Text = Candidate.DateSub cboSubRef1.Text = Candidate.SubRef txtOrgMr.Text = Candidate.OrgMr lblOrgGr = Candidate.OrgGr cboPaperRt.Text = Candidate.PaperRt txtRemarkedMr.Text = Candidate.RemarkedMr lblRemarkedGr = Candidate.RemarkedGr cboGradeAff.Text = Candidate.GradeAff txtDateRt.Text = Candidate.DateRt End If End Sub ................................................................................................. Private Sub cboSubRef_Click() Dim Candidate As CandidateType Dim SearchSubRef As String * 5 SearchSubRef = cboSubRef.Text Open CandidateFile For Random As #1 Len = Len(Candidate) lstCandidates.Clear Do While Not EOF(1) Get #1, , Candidate If Candidate.SubRef = SearchSubRef Then With Candidate lstCandidates.AddItem .CandNo & " " & .CandName & " " & .CentreNo & " " & .DateSub & " " & .SubRef & " " & .OrgGr & " " & .OrgMr & " " & .PaperRt & " " & .RemarkedMr & " " & .RemarkedGr & " " & .GradeAff & " " & .DateRt End With End If Loop Close #1 lblHeading.Caption = "Candidates with subject refrence code " & SearchSubRef End Sub ................................................................................................. ...read more.

Conclusion

Then grade = i End If Next i End If If cboSubRef1 = "54821" Then For i = 1 To 5 If OrgMr > GradeBoundary(4, i) Then grade = i End If Next i End If If cboSubRef1 = "64773" Then For i = 1 To 5 If OrgMr > GradeBoundary(5, i) Then grade = i End If Next i End If If grade = 5 Then grade = "A" ElseIf grade = 4 Then grade = "B" ElseIf grade = 3 Then grade = "C" ElseIf grade = 2 Then grade = "D" ElseIf grade = 1 Then grade = "E" Else grade = "U" End If lblOrgGr = grade End Sub ................................................................................................. Private Sub txtRemarkedMr_LostFocus() Dim RemarkedMr As Integer Dim i As Integer Dim grade As String RemarkedMr = txtRemarkedMr If cboSubRef1 = "01325" Then For i = 1 To 5 If RemarkedMr > GradeBoundary(1, i) Then grade = i End If Next i End If If cboSubRef1 = "20094" Then For i = 1 To 5 If RemarkedMr > GradeBoundary(2, i) Then grade = i End If Next i End If If cboSubRef1 = "28181" Then For i = 1 To 5 If RemarkedMr > GradeBoundary(3, i) Then grade = i End If Next i End If If cboSubRef1 = "54821" Then For i = 1 To 5 If RemarkedMr > GradeBoundary(4, i) Then grade = i End If Next i End If If cboSubRef1 = "64773" Then For i = 1 To 5 If RemarkedMr > GradeBoundary(5, i) Then grade = i End If Next i End If If grade = 5 Then grade = "A" ElseIf grade = 4 Then grade = "B" ElseIf grade = 3 Then grade = "C" ElseIf grade = 2 Then grade = "D" ElseIf grade = 1 Then grade = "E" Else grade = "U" End If lblRemarkedGr = grade End Sub ................................................................................................. AS COMPUTING-UNIT 3 UKAB-REMARK Ibrahim Ali Candidate No 5551 - 1 - Centre No 15247 ...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. Marked by a teacher

    The systems development life cycle (SDLC) is a conceptual model used in project management ...

    3 star(s)

    It is one of a number of 'Agile' methods for developing software and forms parts of the Agile Alliance. DSDM was developed in the United Kingdom in the 1990s by a consortium of vendor's and experts in the field of Information System (IS)

  2. Peer reviewed

    Networking Diagrams and Case Study

    3 star(s)

    The network should be ready for use! Also set different privileges for different users, ensuring that not everybody has access to everything within the network. Also, I?m explaining a quick overview of the Business?s expansion; this includes how the network will expand.

  1. Computing Project

    the number of records in adofilms is 0 then dvdid:=0//give the DVDID as 0 else//otherwise begin//begin adofilms.Open;//open adofilms adofilms.last; dvdid:=adofilms['dvdid'];// insert the value of the variable dvdid into the field DVDID in the access table end; DVDid:=DVDid+1;//add 1 to whatever value the variable DVDID is ADOFilms.Append; ADOFilms ['DVDId']:=DVDid;//insert the value

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

    check or by transfer but which the employee did not receive, or if the check is in an unusable condition (for example, torn). You can reverse payroll results that were created by a regular or off-cycle payroll run. You can enter a check number into the system retrospectively for a

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

    5/Personal data processed for any purpose or purposes shall not be kept for longer than is necessary for that purpose or those purposes. Example: Data may be collected from applicants for a job. That data can only be stored for the period of assessment, interview and selection.

  2. System I designed in order to produce a promotion package for her newly formed ...

    9 BEGUM SHAHEENA F 25/02/85 WALSALL 69 Milton Street Cash 11 QAMAR NAFISA F 19/07/85 WALSALL 44 Milton Street Cash 25 AFZAL IRFAN M 12/09/84 WALSALL 121 Newman Street Cash Notice that I never included 'street', as there are other roads that ended in street in my best data file (data file 3).

  1. Explain the component parts of a computer system - Include both hardware, software and ...

    Because of their high speed to access stored data, floppy disks are probably the most common way of storing data. Software Software is the name for all of the programs that are needed to run the hardware. Without software the hardware would be useless.

  2. The Global Positioning System

    The signal takes 67 ms at least. The method used to remove this uncertainty is to broadcast additional timing information from the satellite as a telemetry signal. This telemetry is broadcast at a rate of 50 bits s-1, and is superimposed on the C/A code by a process called modulo-2 addition.

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