0.005/30/97 SUE TATE 1.0 PROGRAM NARRATIVE: ----------------- THIS IS A BATCH PROGRAM THAT PRODUCES A REPORT COMPARING ENROLLMENT (FTES) FOR TWO GIVEN TERMS, USUALLY A CURRENT TERM AND THE SAME TERM FROM A PREVIOUS YEAR. THE REPORT PRINTS THE NUMBER OF FTES FOR EACH TERM, THE DIFFERENCE BETWEEN THE TWO TERMS AND A PERCENTAGE OF DIFFERENCE. THE BODY OF THE REPORT PRINTS THIS DATA AT THE COURSE LEVEL, WITH TOTALS FOR DEVELOPMENTAL COURSES, EACH DEPARTMENT, DIVISION AND CAMPUS. A FINAL PAGE IS PRINTED SUMMARIZING THE DIVISION TOTALS WITHIN EACH CAMPUS AND AN OVERALL COLLEGE TOTAL. THE FILES THIS PROGRAM USES ARE BUILT WHEN REG540 (CLASS STATUS REPORT) IS RUN USING THE DIVISION AND ARCHIVE OPTIONS. THE DATA IS COMPILED AT THE COURSE LEVEL. THE PROGRAM REQUIRES A CONTROL CARD WITH THE CURRENT TERM AND YEAR, AS WELL AS THE DATE AND TIME FROM THE HEADER CARD OF THE CURRENT FILE BEING USED. AFTER THE DATE AND TIME ON THE CONTROL CARD, A 'Y' MAY BE ENTERED IF A SEPARATE DIVISION SUMMARY REPORT IS DESIRED. THE ARCHIVE FILE CREATION DATE AND TIME MAY BE ADDED TO THE REPORT HEADING BY SETTING THE DATE AND TIME OPTION TO A 'Y'. THIS CONTROL CARD MUST BE IN THE JOB STREAM IN ORDER FOR THE PRO- GRAM TO BE RUN. IN ADDITION TO THE CONTROL CARD, A LIST OF DATES AND TIMES FROM THE CURRENT AND PREVIOUS TERMS' FILES MUST BE ENTERED. THE PROGRAM READS THROUGH THIS LIST TO FIND THE DATE AND TIME THAT MATCH THE DATE AND TIME ON THE CONTROL CARD. THIS ENABLES THE PROGRAM TO FIND THE CORRECT HEADER RECORD IN EACH OF THE TWO FILES. EXAMPLE: CONTROL CARD: WINTER86012086084539YY ************OR BLANK DATE LIST: CURRENT DESCRIPTION PREVIOUS ------- ----------- -------- 010286143255REGULAR REGISTRATION 010285123456 010486105645DAY 1 ADD/DROP 010585112343 012086084539LAST DAY REFUND 012185094357 ************ IN THIS EXAMPLE THE DATE AND TIME FROM THE CONTROL CARD ARE USED TO SELECT THE THIRD RECORD, MATCHING THE DATE 012086 AND THE TIME 084539. THE DESCRIPTION 'LAST DAY REFUND' WILL APPEAR IN THE REPORT HEADINGS. THE PREVIOUS DATE 012185 AND TIME 094357 WILL BE USED TO DESIGNATE THE PREVIOUS HEADER RECORD OF THE FILE TO COMPARE ON. 2.0 SAMPLE JCL ---------- 2.1 RUN JCL ______ //SRREG963 JOB (XXXX,YYYY),REG963, // MSGCLASS=A,MSGLEVEL=(1,1),CLASS=Q,REGION=2048K /*ROUTE PRINT PPPPPPPP //REG963 EXEC REG963, // AGENCY=AAA, // COLLEGE=CC, // FORM=A000, // QUEUE='*', // RUNTYPE=PROD, // SRTSIZE=3 //PARMCARD DD * *** INPUT PARAMETERS (CONTROL CARD) *** /* //PARMCRD2 DD * *** INPUT PARAMETERS (DATE LIST) *** /* // WHERE (XXXX,YYYY) IS YOUR ACCOUNTING INFORMATION PPPPPPPP IS YOUR OUTPUT DESTINATION SYMBOLIC DESCRIPTION -------------------- REQUIRED AGENCY DENOTES THE THREE CHARACTER AGENCY IDENTIFIER (EX. AGENCY=283) COLLEGE DENOTES THE TWO CHARACTER COLLEGE ABBREVIATION (EX. COLLEGE=SR) OPTIONAL FORM FORM NUMBER TO WHICH THE REPORT IS TO BE SPOOLED DEFAULT: A000 (E.G., FORM=0001) QUEUE QUEUE UNDER WHICH THE REPORT IS TO BE SPOOLED DEFAULT: * (E.G., QUEUE=A) RUNTYPE INDICATES WHETHER TO USE THE TEST OR PRODUCTION DATA BASE FILES. DEFAULT: PROD (E.G., RUNTYPE=TEST) SRTSIZE AMOUNT OF DASD STORAGE IN CYLINDERS ALLOCATED TO EACH SORT WORK FILE. DEFAULT: 3 (E.G., SRTSIZE=4) 2.2 INPUT PARAMETERS ---------------- CONTROL CARD: CC CONTENTS -- -------- 1 - 6 CURRENT TERM (E.G., 'WINTER', 'SPRING', 'SUMMER', 'FALL ') 7 - 8 CURRENT YEAR (E.G., 86) 9 - 14 CONTROL DATE (MMDDYY) (E.G., 012086) 15 - 20 CONTROL TIME (HHMMSS) (E.G., 084539) 21 DIVISION SUMMARY REPORT 'Y' IF DESIRED 22 DATE AND TIME HEADING 'Y' IF DESIRED BLANK IF NOT 23 - 80 SPACES ** NOTE: THE SUMMARY BY DIVISION CONTAINS THE TOTAL FTE'S BY CODE ONLY AND NOT BY THE TWO POSITION CAMPUS AND DIVISION CODE. (EXAMPLE: ALL '1'S' WOULD BE COMBINED WHETHER A1, B1, OR C1.) IF A COLLEGE HAS THE FOLLOWING CAMPUS AND DIVISION CODES IN ITS DATA BASE - A1, A2, A3, A4, B1, B2, C2, C4 - FOUR DIVISIONS WOULD BE REPORTED - DIVISION 1,2,3, AND 4. DIVISION 1 WOULD INCLUDE A1,B1; DIVISION 2 WOULD INCLUDE A2,B2,C2; ETC. THIS OPTION IS DESIGNED FOR USE PRIMARILY FOR COLLEGES WITH ONE CAMPUS. IF CAMPUS A1 AND B1 ARE NOT ONLY DIFFERENT CAMPUSES BUT DIFFERENT DIVISION NAMES, THIS OPTION WILL COMBINE THE TWO AND GIVE A TOTAL WITH THE A1 DIVISION NAME. CAMPUS A IS ALWAYS USED TO OBTAIN THE DIVISION NAME. THIS SUMMARY IS ONLY VALID IF ALL DIVISIONS HAVE THE SAME NUMERIC CODE AS NAME FOR ALL CAMPUSES. DATE LIST: CC CONTENTS -- -------- 1 - 6 CURRENT DATE (MMDDYY) (E.G., 012086) 7 - 12 CURRENT TIME (HHMMSS) (E.G., 084539) 13 - 37 DESCRIPTION (E.G., REGULAR REGISTRATION) 38 - 43 PREVIOUS DATE (MMDDYY) (E.G., 012185) 44 - 49 PREVIOUS TIME (HHMMSS) (E.G., 094357) 50 - 80 SPACES 3.0 JOB SETUP INSTRUCTIONS ---------------------- SPECIAL FORMS QUEUE: STANDARD FOR REPORT FORMS BUFFER: STANDARD FOR REPORT ALIGNMENT INSTRUCIONS: STANDARD PRINTED OUTPUT: ENROLLMENT (FTES) COMPARISON REPORT FORMS TYPE: 11 X 14 7/8 SPECIAL INSTRUCTIONS: A CONTROL CARD AND A DATE LIST MUST BE PREPARED PRIOR TO RUNNING THIS JOB 4.0 FILES: ----- 4.1 DATA BASES USED: CONTROL DATA BASE CAMPUS SEGMENT (READ ONLY) TERM SEGMENT (READ ONLY) DIVISION SEGMENT (READ ONLY) 4.2 ADDITIONAL FILES USED: CURRENT TERM ARCHIVE FILE PREVIOUS TERM ARCHIVE FILE 4.3 INPUT/OUTPUT RECORD LAYOUTS: N/A 5.0 SPECIAL OUTPUT MESSAGES: ----------------------- 1. 'NO DIVISION FOR DIVISION CODE OF ' (DIVISION-CODE) MEANING: A CALL TO THE DIVISION MASTER SEGMENT WAS UNSUCCESSFUL BECAUSE THE CODE WAS NOT FOUND 2. 'INPUT TERM IS INVALID!!! TERM = XXXXXX' MEANING: INPUT TERM IS NOT 'WINTER', 'SPRING', 'SUMMER', OR 'FALL '. CORRECT PARMCARD. 3. 'INPUT YEAR IS INVALID!!! YEAR = XX' MEANING: INPUT YEAR IS NOT NUMERIC. CORRECT PARMCARD. 4. 'INPUT TERM/YEAR NOT FOUND ON CONTROL DB - XXX' MEANING: THE CONTROL TERM/YEAR ON THE PARMCARD WAS NOT FOUND ON THE CONTROL DATA BASE. CORRECT PARMCARD. 5. 'CAMPUS NOT FOUND FOR KEY ' (CAMPUS) MEANING: A CALL TO THE CAMPUS MASTER SEGMENT WAS UNSUCCESSFUL BECAUSE THE CODE WAS NOT FOUND 6. '*** FILE ERROR *** LAST RECORD CONTAINING ERROR IS ' (SORT RECORD) 'TERM ' (TERM) 'YEAR ' (YEAR) MEANING: IT WAS DETERMINED THAT A CAMPUS OR DIVISION CODE IN EITHER OF THE ARCHIVE FILES IS NOT IN THE CONTROL DATA BASE. THE LAST SORT RECORD OF THE CAMPUS/DIVISION GROUP WILL BE DISPLAYED TO ASSIST IN CORRECTING THE DATA. THE TERM AND YEAR WILL ALSO BE DISPLAYED TO IDENTIFY THE FILE WHERE THE ERROR IS LOCATED. 7. '** TOTALS WILL NOT APPEAR ON SUMMARY PAGE' MEANING: WHEN MESSAGE 3 IS DISPLAYED THIS MESSAGE WILL FOLLOW TO ALERT THE USER THAT THE DIVISION TOTALS WILL BE OMITTED FROM THE SUMMARY PAGE; HOWEVER, THE FINAL COLLEGE TOTALS WILL INCLUDE THESE AMOUNTS. 8. DL1 TERMINATION MESSAGES AS APPROPRIATE 9. INVALID DIVISION-SUMMARY-OPTION - CORRECT JOB WILL EOJ - CORRECT AND RERUN 10. INVALID DATE AND TIME-OPTION - CORRECT 6.0 SPECIAL FEATURES: ---------------- NONE 7.0 PROGRAM OPTIONS: --------------- NONE 8.0 PROGRAM CHANGE HISTORY: ---------------------- 8.1 VERSION NO: V2.7 CHANGE DATE: N/A PROGRAMMER NAME: SUE DOTSON PROGRAM CHANGE REQUEST NO: N/A DESCRIPTION OF CHANGE: RELEASE VERSION 8.2 VERSION NO: V2.13 CHANGE DATE: 12/16/86 PROGRAMMER NAME: KATHY HARCUM PROGRAM CHANGE REQUEST NO: STC-VW-247, STC-TN-066 DESCRIPTION OF CHANGE: -CHANGED 'STOP RUN' PROGRAM TERMINATION TO 'GOBACK' -CORRECTED DOCUMENTATION SAMPLE JCL -CORRECTED PROGRAM TO PROCESS CORRECTLY IF PREVIOUS TERM IS 'WINTER', PROGRAM LOGIC WAS NOT ENTERING 'SORTS' TO PROCESS DATA/REPORT DUE TO PROBLEM IN A NESTED 'IF' STATEMENT. -CORRECTED INITIALIZING OF DIVISION TOTALS TABLES, LOGIC ALLOWED ACCESS OUT OF TABLE BOUNDRIES. THIS CAUSED VARYING PROBLEMS DEPENDING ON HOW MANY DIVISIONS A COLLEGE HAS. 8.3 VERSION NO: V2.17 CHANGE DATE: 5/5/87 PROGRAMMER NAME: JUDY GAULDIN PROGRAM CHANGE REQUEST NO: STC-VW-289 DESCRIPTION OF CHANGE: 1) DETERMINED DECIMAL POINT WAS NOT IN WRONG POSITION. THE PROBLEM WAS ON THE ARCHIVE FILE WHICH HAD BEEN BROUGHT OVER FROM THE HP. CREDIT HOURS ON THE HP WERE DEFINED AS 999. ON THE IBM THEY ARE DEFINED AS 99V9. 2) MODIFIED TO PICK UP PREVIOUS YEAR FROM INPUT PARAMETER. 3) CHANGED 'QUARTER' TO 'TERM'. 8.4 VERSION NO: V3.2 CHANGE DATE: 08/12/87 PROGRAMMER NAME: KATHY HARCUM PROGRAM CHANGE REQUEST NO: STC-SO-328, SCP-SO-103, STC-SR-263 DESCRIPTION OF CHANGE: -MODIFIED INPUT ARCHIVE FILE DESCRIPTION AND INTERNAL WORK AREAS TO ACCOMODATE FRACTIONAL CREDITS. -ENSURED ALL QUARTER LITERALS CHANGED TO TERM. ADDED CALL TO CONTROL TERM TO VALIDATE INPUT CARD CURRENT TERM AND YEAR. -ENSURED CURRENT DATE AND TIME PRINT ON REPORT. 8.5 VERSION NO: V3.4 CHANGE DATE: 10/20/87 PROGRAMMER NAME: MARY HARVEY PROGRAM CHANGE REQUEST NO: STC-VW-378 DESCRIPTION: MODIFIED THE FIRST INPUT PARM (CONTROL) TO ALLOW FOR CALCULATIONS AND PRINTING OF A SUMMARY BY DIVISION. THIS SUMMARY BY DIVISION WILL BE PRINTED AT THE END OF ALL OTHER SEGMENTS OF THIS PROGRAM'S REPORTS. NOTE: THE SUMMARY BY DIVISIION CONTAINS THE TOTAL FTE'S BY CODE ONLY AND NOT BY THE TWO POSITION CAMPUS AND DIVISION CODE. (EXAMPLE: ALL '1'S' WOULD BE COMBINED WHETHER A1, B1, OR C1.) IF A COLLEGE HAS THE FOLLOWING CAMPUS AND DIVISION CODES IN ITS DATA BASE - A1, A2, A3, A4, B1, B2, C2, C4 - FOUR DIVISIONS WOULD BE REPORTED - DIVISION 1,2,3, AND 4. DIVISION 1 WOULD INCLUDE A1,B1; DIVISION 2 WOULD INCLUDE A2,B2,C2; ETC. THIS OPTION IS DESIGNED FOR USE PRIMARILY FOR COLLEGES WITH ONE CAMPUS. IF CAMPUS A1 AND B1 ARE NOT ONLY DIFFERENT CAMPUSES BUT DIFFERENT DIVISION NAMES, THIS OPTION WILL COMBINE THE TWO AND GIVE A TOTAL WITH THE A1 DIVISION NAME. CAMPUS A IS ALWAYS USED TO OBTAIN THE DIVISION NAME. THIS SUMMARY IS ONLY VALID IF ALL DIVISIONS HAVE THE SAME NUMERIC CODE AS NAME FOR ALL CAMPUSES. 8.6 VERSION NO: V3.9 CHANGE DATE: 04/05/88 PROGRAMMER NAME: G. TAYLOR PROGRAM CHANGE REQUEST NO: STC-VW-441 DESCRIPTION OF CHANGE: -ADD A CHECK IN 355-PRINT-DIV-SUMMARY TO TEST THE PRE-DIV-ENROLL FIELD TO ZEROS BEFORE DOING THE CALCULATION. IF ZERO, MOVE 100.00 TO THE OUPUT FIELD. 8.7 VERSION NO: V3.14 CHANGE DATE: 10/11/88 PROGRAMMER NAME: L. RIVERA PROGRAM CHANGE REQUEST NO: STC-SR-575 DESCRIPTION OF CHANGE: REG963A WAS MODIFIED TO PRINT THE CORRECT TERM IN THE CURRENT TERM HEADING AREA. PRIOR TO THE MODIFICATIONS IT WAS PRINTING THE VALUE SPECIFIED IN THE PAPAMETER CARD. NOW THE PROGRAM PRINTS THE VALUE FROM THE FILE HEADER RECORD. 8.8 VERSION NO: V4.01 CHANGE DATE: 03/22/89 PROGRAMMER NAME: JEAN MAYS PROGRAM CHANGE REQUEST NO: STC-SR-575 DESCRIPTION OF CHANGE: MODIFIED PROGRAM TO RECOGNIZE NEW DESCRIPTION RECORD CREATED IN REG540. DESCRIPTIONS OF BOTH 'ARK' FILES ARE PRINTED ON REPORT HEADING. IF BOTH 'ARK' FILES HAVE DESCRIPTION, PARMCARD MAY BE LEFT BLANK. IF ONE OR BOTH 'ARK' DESCRIPTIONS ARE MISSING PARMCARD DESCRIPTION IS USED. 8.9 VERSION NO: V4.29 CHANGE DATE: 10/15/91 PROGRAMMER NAME: TROY ADKINS PROGRAM CHANGE REQUEST NO: 00008664 DESCRIPTION OF CHANGE: -INCREASED THE ARCHIVE FILE SIZE, CURRENT-ENROLL-FILE SIZE, PREVIOUS-ENROLL-FILE SIZE FROM 23 TO 30 BYTES. -INCREASED THE SD-ENROLLMENT FIELD IN THE SORT RECORD FROM 3 TO 4 BYTES. 8.10 VERSION NO: V5.22 CHANGE DATE: 03/15/95 PROGRAMMER NAME: SUE TATE PROGRAM CHANGE REQUEST NO: 00015212 DESCRIPTION OF CHANGE: -ADDED AN OPTION TO PRINT THE CREATE DATE/TIME OF THE PREVIOUS AND CURRENT ENROLLMENT FILES ON THE REPORT HEADING. 8.11 VERSION NO: V6.11 CHANGE DATE: 05/30/97 PROGRAMMER NAME: CATHY SWAIN PROGRAM CHANGE REQUEST NO: 00017611 DESCRIPTION OF CHANGE: INCREASED DIVISION-ACCUMULATORS, COLLEGE-ACCUMULATORS, AND CAMP-DIV-CODE-TABLE TABLE SIZES FROM 50 TO 80.