COBOL - Lab Assignment #3

Internet COBOL - program 3
Objectives:

• additional experience with simple COBOL reports
• minor mathematical calculations
• additional development of variable naming skills, output structure specifications, and logic processing

This should your previous programs to gain additional insight and program on your own. You have an input file like this:

columns 1 - 21:  student name (pic x(21))
columns 22 - 24:  test score #1  (pic 999 because a student could get 100 on a test)
columns 25 - 27:  test score #2  (pic 999)
columns 28 - 30:  test score #3  (pic 999)
columns 31 - 33:  test score #4  (pic 999)

Output:

Have three heading lines:

• heading-line-1 - teacher / class name (use your own name)
• heading-line-2 - school
• heading-line-3 (column-heading-line) - with headings for each of the detail line fields

Have a detail line giving the

• student name
• each of the four test scores  (hint:  to get the scores to be "zero suppressed" - use an output picture of ZZ9) for each of the values
• the average score (add up the four and divide by 4) (likewise, an output of ZZ9.99 would show the scores "zero suppressed")

Processing: Read the input file and calculate the total points and the average points.

  ADD TEST1-IN, TEST2-IN, TEST3-IN, TEST4-IN GIVING TOTAL
  DIVIDE TOTAL BY 4 GIVING AVERAGE
  MOVE TOTAL TO TOTAL-OUT
  other move statements
  WRITE REPORT-RECORD FROM DETAIL-LINE.

Link to data file 

Deliverables to bruce.white@quinnipiac.edu 

	copy of the code
	copy of the output

Last modified by Bruce White on 12/04/03

Return to main menu