0.007/01/88 CAROL WILLIS 1.0 PROGRAM NARRATIVE ----------------- THIS BATCH UPDATE PROGRAM READS NEW SEMESTER COURSE DATA FROM THE VCCS COURSE MASTER FILE AND INSERTS THE NEW SEGMENTS INTO THE COURSE DATA BASE. THE COURSE SEGMENTS HAVE THE FIRST SEMESTER TERM ID FROM THE MESSAGE MASTER CONTROL RECORD AS THE TERM FIRST VALID AND '994' AS THE TERM LAST VALID. THE ACTIVE-INACTIVE FIELD IS SET TO 'I' IN BOTH THE DEPARTMENT AND COURSE SEGMENTS. THE PASS-FAIL-CODE IS SET TO 'N'. THE COURSE TITLE FROM THE VCCS COURSE MASTER FILE IS USED FOR BOTH THE COURSE-TITLE-14 AND THE COURSE-TITLE-40. IF THE VCCS MASTER LECTURE MINIMUM AND MAXIMUM CREDITS ARE THE SAME AND THE LAB MAXIMUM AND MINIMUN CREDITS ARE THE SAME, THE COURSE IS CONSIDERED NON-VARIABLE, OTHERWISE IT IS CONSIDERED A VARIABLE CREDIT COURSE. FOR VARIABLE CREDIT COURSES, CREDITS-LEC, CREDITS-LAB, CONTACT-HR-TOT, CONTACT-HR-LEC AND CONTACT-HR-LAB ARE SET TO ALL 9'S. FOR NON-VARIABLE COURSES, CREDITS-LEC = CR-LEC-MIN, CREDITS-LAB = CR-LAB-MIN, CONTACT-HR-TOT = CR-CON-MAX (MAXIMUM CONTACT HOURS), CONTACT-HR-LEC = CR-LEC-MIN, AND CONTACT-HR-LAB = CONTACT-HR-TOT - CONTACT-HR-LEC. FOR BOTH VARIABLE AND NON-VARIABLE COURSES, MIN-VAR-CR = CR-LEC-MIN + CR-LAB-MIN AND MAX-VAR-CR = CR-LEC-MAX + CR-LAB-MAX. THE GRADE-OPTION FIELD IS LEFT BLANK. DIVISION-AUTHORIZED-COUNT IS ZERO AND DIVISION-AUTHORIZED IS BLANKS. IF THE DEPARTMENT DOES NOT EXIST ON THE SIS DATABASE, THE THE SEGMENT IS ADDED. THE DEPARTMENT NAME IS EXTRACTED FROM AN INTERNAL TABLE CREATED FROM THE VCCS MASTER DEPARTMENT FILE. BUDGET CODE AND FUNDING RATION ARE SET TO ZEROS. ACTIVE-INACTIVE FLAG IS SET TO 'I'. THE PROGRAM MAY BE RUN MORE THAN ONCE IF NEEDED. SEGMENTS ALREADY ON FILE WILL NOT BE REPLACED OR ADDED A SECOND TIME, ONLY NEW SEGMENTS WILL BE ADDED. 2.0 SAMPLE JCL ---------- //CVREFSC2 JOB (1000,C05A,9),REFSC02,CLASS=O,MSGCLASS=A, // MSGLEVEL=(1,1),REGION=4096K /*ROUTE PRINT XXXXX /*SETUP ** * * * * * * * * * * * * * * * /*SETUP ** THIS UPDATE JOB WILL REQUIRE TAPE(S) WITH RING /*SETUP ** FROM THE BATCH SCRATCH POOL. /*SETUP ** NEVER REPLY 'U' /*SETUP ** * * * * * * * * * * * * * * * //* //REFSC02 EXEC REFSC02,COLLEGE=XX,AGENCY=XXX // SYMBOLIC DESCRIPTION ******************** REQUIRED - AGENCY COLLEGE AGENCY CODE NUMBER (E.G. AGENCY=292) COLLEGE TWO CHARACTER COLLEGE NAME ABBREVIATION (E.G. COLLEGE=CV) 3.0 JOB SETUP INSTRUCTIONS ---------------------- SPECIAL FORMS QUEUE: A000 FORMS BUFFER: STANDARD ALIGNMENT INSTRUCTIONS: STANDARD PRINTED OUTPUT: NUMBER OF RECORDS ADDED FORMS TYPE: 14 X 11 SPECIAL INSTRUCTIONS: NONE 4.0 FILES ----- 4.1 DATA BASE/SEGMENTS USED: ----------------------- 1. CTLSEG (READ ONLY) 2. COURSE SEGMENT (UPDATE) 4.2 ADDITIONAL FILES USED: --------------------- 1. VCCS COURSE MASTER FILE SODBV.SIP.CLUSPROD.MASTER.CRFILE 4.3 INPUT RECORD LAYOUT: ------------------- 01 CRRECD. 05 CR-DEL PIC X(1). 05 CR-KEY. 10 CR-DEPT PIC X(4). 10 CR-CRSE PIC X(3). 05 CR-LEC-MIN PIC S9(2)V99. 05 CR-LEC-MAX PIC S9(2)V99. 05 CR-LAB-MIN PIC S9(2)V99. 05 CR-LAB-MAX PIC S9(2)V99. 05 CR-TITLE PIC X(14). 05 CR-CATEG PIC X(1). 05 CR-CON-MIN PIC S9(3)V99. 05 CR-CON-MAX PIC S9(3)V99. 05 FILLER PIC X(21). 5.0 SPECIAL OUTPUT MESSAGES: N/A ----------------------- 6.0 SPECIAL FEATURES: N/A ---------------- 7.0 PROGRAM OPTIONS: N/A --------------- 8.0 CHANGE HISTORY -------------- 8.1 VERSION NO: V3.1 (NEW PROGRAM) CHANGE DATE: N/A PROGRAMMER NAME: CAROL WILLIS PROGRAM CHANGE REQUEST NO: N/A DESCRIPTION OF CHANGE: N/A 8.2 VERSION NO: V3.7 CHANGE DATE: 02/18/88 PROGRAMMER NAME: RICHARD GILLETTE PROGRAM CHANGE REQUEST NO: N/A DESCRIPTION OF CHANGE: MODIFIED PROGRAM TO USE REVISED (AND EXPANDED) VCCS MASTER COURSE FILE. 8.3 VERSION NO: V3.11 CHANGE DATE: 06/10/88 PROGRAMMER NAME: ASC PROGRAM CHANGE REQUEST NO: STC-SO-395 DESCRIPTION OF CHANGE: MODIFIED JCL PROC TO; REMOVE LOGTAPE AND RECTAPE PARAMETERS, ADDED RETENTION DATE PROTECTION TO THE TAPES USED FOR IMS LOGGING, ADDED SETUP CARDS TO THE SAMPLE JCL TO INDICATED THAT THE TAPES WILL BE MOUNTED FROM A BATCH SCRATCH POOL.