0.003/13/99 GERRY LIETTE 1.0 PROGRAM NARRATIVE ----------------- THIS BATCH PROGRAM PRODUCES A SUMMARY BY HIGH SCHOOL OF THE NUMBER OF STUDENTS ENROLLED IN A SPECIFIC TERM WHO GRADUATED FROM HIGH SCHOOL IN THE SAME YEAR. ONLY STUDENTS WITH A HIGH SCHOOL DIPLOMA ARE COUNTED - NO GED RECIPIENTS ARE INCLUDED. STUDENTS WITH A CURRICULUM LEVEL = '2' ARE NOT COUNTED. A STUDENT'S ADVISOR CAMPUS MUST BE EQUAL TO THE PARM CAMPUS(ES) IN ORDER FOR THE STUDENT TO BE COUNTED IN THE SCHOOL TOTALS. THE CONTROL DATA BASE IS READ FOR SEGMENT-TYPES OF '02' FOR THE COLLEGE HEADING; '09' FOR THE CONTROL TERM, AND '04' FOR THE HIGH SCHOOL MASTER INFORMATION. THE REPORT IS SORTED BY THE HIGH SCHOOL CODE. THE FIELDS PRINTED ARE: NAME OF HIGH SCHOOL, LOCATION, COLLEGE TRANSFER, OCCUPATIONAL/ TECHNICAL, NON-CURRICULAR, UNKNOWN CURRICULUM, AND TOTAL FOR EACH HIGH SCHOOL. THE TOTAL NUMBER OF STUDENTS WHO GRADUATED IS PRINTED AT THE END OF THE REPORT. THE CAMPUS PARAMETER FOR THIS PROGRAM IS ONLY USED IN SELECTING STUDENTS FOR THE SCHOOL TOTALS. * 2.0 SAMPLE JCL ---------- 2.1 RUN JCL ------- //TCCEN540 JOB (XXXX,YYYY,1,02),CEN540, // MSGCLASS=A,CLASS=Q /*ROUTE PRINT ZZZZZZ //CEN540 EXEC CEN540,AGENCY=XXX,COLLEGE=XX //PARMCARD DD * FALL 84@ /* // SYMBOLIC DESCRIPTION ******************** REQUIRED - AGENCY COLLEGE AGENCY CODE NUMBER DEFAULT: NONE (E.G. AGENCY=295) COLLEGE TWO CHARACTER COLLEGE NAME ABBREVIATION DEFAULT: NONE (E.G. COLLEGE=TC) OPTIONAL - CENSUS THREE CHARACTER CENSUS DATA BASE IDENTIFIER DEFAULT: NONE (E.G. CENSUS=CEN) FORM FORM NUMBER THE OUTPUT IS TO BE STORED UNDER DEFAULT: A000 (E.G. FORM=0002) QUEUE QUEUE CLASS THE OUTPUT IS TO BE SPOOLED UNDER DEFAULT: * (E.G. QUEUE='A') SRTSIZE AMOUNT OF DASD STORAGE IN CYLINDERS ALLOCATED TO EACH SORT WORK FILE DEFAULT: 4 (E.G. SRTSIZE=3) 2.2 INPUT PARAMETERS: ----------------- XXXX - PROGRAMMER NUMBER YYYY - ROOM NUMBER ZZZZZZ - REMOTE NUMBER 2.3 INPUT CARD: ----------- CC CONTENTS __ ________ 01-06 SELECT TERM NAME (I.E. 'FALL ') 07-08 LAST TWO DIGITS OF SELECTION YEAR (I.E. '83') 09-13 SELECT CAMPUS (I.E. '@' FOR ALL CAMPUSES) (A,B,C,D,F FOR INDIVIDUAL CAMPUSES. ONE OR MORE CAMPUSES MAY BE SELECTED AT A TIME) * 3.0 JOB SETUP INSTRUCTIONS ---------------------- SPECIAL FORMS QUEUE: A000 FORMS BUFFER: STANDARD ALIGNMENT INSTRUCTIONS: STANDARD PRINTED OUTPUT: RECENT HIGH SCHOOL GRADUATE ENROLLMENT SUMMARY FORMS TYPE: 14 X 11 SPECIAL INSTRUCTIONS: NONE *4.0 FILES ----- 4.1 DATA BASE/SEGMENTS USED: ----------------------- CONTROL DATA BASE 1. CAMPUS SEGMENT (READ ONLY) 2. TERM SEGMENT (READ ONLY) 3. HIGH SCHOOL SEGMENT (READ ONLY) STUDENT DATA BASE 1. STUDENT MASTER SEGMENT (READ ONLY) 4.2 ADDITIONAL FILES USED: --------------------- 1. SORTFILE - WORK AREA USED TO SORT HIGH SCHOOL CODE AND HIGH SCHOOL CITY 2. HIGHFILE - TEMPORARY WORK AREA USED TO SORT HIGH SCHOOL CODE AND HIGH SCHOOL CITY 3. PARMCARD - INPUT PARAMETER CARD 4.3 INPUT/OUTPUT RECORD LAYOUT: N/A -------------------------- * 5.0 SPECIAL OUTPUT MESSAGES: ----------------------- 1. '!! PARAMETER CARD MISSING !! THE PARAMETER CARD IS MISSING OR MISPLACED IN THE JCL. EXECUTION IS TERMINATED. CHECK JCL, SUPPLY VALID PARAMETER CARD, AND RESUBMIT. 2. '!! INVALID TERM !!' THE INPUT TERM ON THE PARAMETER CARD WAS NOT 'WINTER', 'SPRING', 'SUMMER', OR 'FALL '. EXECUTION IS TERMINATED. CORRECT THE INPUT TERM ON THE PARMATER CARD AND RESUBMIT 3. '!! INVALID YEAR !!' THE INPUT YEAR ON THE PARAMETER CARD WAS NOT NUMERIC. EXECUTION IS TERMINATED. CORRECT THE INPUT YEAR ON THE PARAMETER CARD AND RESUBMIT FOR EXECUTION. 4. '!! INPUT YEAR/TERM NOT FOUND ON CONTROL DB !! THE INPUT YEAR/TERM ON THE PARAMETER CARD WAS NOT FOUND ON THE CONTROL DATA BASE. EXECUTION IS TERMINATED. CORRECT THE INPUT TERM AND/OR YEAR ON THE PARAMETER CARD AND RESUBMIT FOR EXECUTION. 5. 'HIGHFILE FULL' THE TEMPORARY SORT FILE THAT HOLDS THE HIGH SCHOOL CODE AND THE HIGH SCHOOL CITY IS FULL. * 6.0 SPECIAL FEATURES ---------------- 6.1 CALLING PROGRAMS: N/A 6.2 SUBPROGRAMS CALLED: UTL550S 7.0 PROGRAM OPTIONS: N/A --------------- 8.0 CHANGE HISTORY -------------- 8.1 VERSION NO: V2.5 (NEW PROGRAM) CHANGE DATE: 09/10/84 PROGRAMMER NAME: CINDY HENDERSON 8.2 VERSION NO: V2.12 CHANGE DATE: 10/16/86 PROGRAMMER NAME: BOB MILLS PROGRAM CHANGE REQUEST NO: STC-TC-027 DESCRIPTION OF CHANGE: A. A CHECK FOR HIGH-SCHOOL-CODE OF '999999'(UNKNOWN) WAS ADDED. B. A CHECK FOR CURR-LEVEL OF 'Z'(UNKNOWN) FOR DETERMINING THE CATEGORY THE STUDENT FALLS INTO WAS ADDED. 8.3 VERSION NO: V3.1 CHANGE DATE: 07/28/87 PROGRAMMER NAME: K. HARCUM PROGRAM CHANGE REQUEST NO: SCP-TC-006 DESCRIPTION OF CHANGE: -MODIFIED ALL QUARTER LITERALS TO TERM. ADDED CALL TO CONTROL TERM TO VALIDATE INPUT PARM. -ADDED MESSAGE FOR MISSING PARAMETER CARD. MODIFIED LOGIC TO PREVENT PROGRAM ABEND WHEN PARAMETER CARD ERRORS ARE FOUND. 8.4 VERSION NO: V3.5 CHANGE DATE: 11/30/87 PROGRAMMER NAME: JANICE FOLLIS PROGRAM CHANGE REQUEST NO: STC-SR-293 AND STC-TN-214 DESCRIPTION OF CHANGE: -MODIFIED THE PROGRAM TO INCREASE THE TABLE SIZE FOR HIGH SCHOOL RECORDS FROM 600 TO 800 ITEMS. THE PROGRAM WAS ABENDING WITH A S0C7 WHENEVER THE NUMBER OF HIGH SCHOOL RECORDS EXCEEDED THE TABLE SIZE. -MODIFIED THE PROGRAM TO CORRECT THE POSITIONING PROBLEM WHICH OCCURRED WHEN SEQUENTIALLY ACCESSING THE CONTROL DATABASE (HIGH SCHOOL SEGMENT). -MODIFIED THE PROGRAM TO CORRECT THE COUNTER PROBLEM WHICH OCCURRED WHENEVER A VIRGINIA HIGH SCHOOL CODE ON THE STUDENT MASTER SEGMENT DID NOT MATCH A HIGH SCHOOL CODE IN THE HIGH SCHOOL SEGMENT OF THE CONTROL DATABASE. THESE 'UNKNOWN' HIGH SCHOOLS WILL NOW BE ADDED TO THE 'VIRGINIA UNKNOWN' CATEGORY (H.S. CODE = '474999'). -MODIFIED THE PROGRAM TO BYPASS STUDENTS WITH A CURRICULUM LEVEL = '2' SINCE THIS CATEGORY IS NOT INCLUDED ON THE REPORT. 8.5 VERSION NO: V4.19 CHANGE DATE: 12/11/90 00633004 PROGRAMMER NAME: MARIE GORDON 00634004 PROGRAM CHANGE REQUEST NO: 00006580 00635004 DESCRIPTION OF CHANGE: - CHANGED ALL DATA BASE CALLS TO USE STANDARD IOAREA. SEE PAGE 29 OF THE 02/90 PROGRAMMING STANDARD, PROCECEDURES AND GUIDELINES MANUAL. - MADE CHANGES FOR COBOL II. 8.6 VERSION NO: V7.02 CHANGE DATE: 06/23/98 00633004 PROGRAMMER NAME: GERRY LIETTE (TCC) 00634004 PROGRAM CHANGE REQUEST NO: 00018008 00635004 DESCRIPTION OF CHANGE: - MADE Y2K CHANGES TO PROGRAM TO MAKE YEARS DISPLAY CORRECTLY ON THE HEADER OF THE REPORT. - PROGRAM RECOMPILED AND TESTED USING NEW COMPILER.