0.008/15/93 DIANE LIVELY 1.0 PROGRAM NARRATIVE: RSV300 IS A BATCH UPDATE PROGRAM THAT DELETES RESERVATIONS FOR AN OLD TERM IN THE CLASS RESERVATION DATA BASE AND THE STUDENT RESERVATION DATA BASE. THE RESERVATION SUBSYSTEM IS USED BY THE DIVISION OF CONTINUING EDUCATION TO MAINTAIN A WAITING LIST FOR STUDENTS WISHING TO ENROLL IN A CEU COURSE, USING RSV110 TO ENTER THE DATA. THE SUBSYSTEM CAN ALSO BE USED TO MAINTAIN STUDENT RESERVATIONS FOR CREDIT COURSES PRIOR TO ACTUAL REGISTRATION BY ENTERING DATA VIA RSV010. THIS PROGRAM SHOULD BE RUN ONCE A TERM FOR A TERM THAT HAS BEEN COMPLETED. TWO STAND-ALONE DATA BASES ARE MAINTAINED FOR RESERVATIONS. THE FIRST PROVIDES ACCESS TO ALL STUDENT RESERVATIONS BY CLASS. IT CONTAINS CLASS SEGMENTS (IDENTIFIES THE CLASS) AND CLASS RESERVATIONS (CONTAINS THE SEQUENCE NUMBER AND STUDENT'S SOCIAL SECURITY NUMBER). THE SECOND DATA BASE PROVIDES ACCESS TO ALL RESERVATIONS BY STUDENT. IT CONTAINS STUDENT SEGMENTS (STORES STUDENT DATA) AND THEIR RESERVATIONS (CONTAINS THE CLASS ID AND SEQUENCE NUMBER). THIS PROGRAM DELETES SEGMENTS BY TERM FOR BOTH DATA BASES. THE PROGRAM READS THE CLASS RESERVATION DATA BASE FOR THE TERM SELECTED AND GENERATES A REPORT TO LIST THE CLASSES PRIOR TO DELETING THEM. FIELDS SHOWN INCLUDE THE DEPARTMENT, COURSE NUMBER, SECTION, CAMPUS, CLASS TITLE, NUMBER OF RESERVATIONS, NUMBER OF RESERVATIONS ON THE WAITING LIST, AND THE SEQUENCE NUMBER AND SOCIAL SECURITY NUMBER FOR EACH RESERVATION IN THE CLASS. FOR EACH CLASS RESERVATION, THE STUDENT RESERVATION DATA BASE IS READ TO DELETE THE STUDENT'S RESERVATION FOR THE DELETED CLASS. IF THE LAST RESERVATION FOR A STUDENT IS DELETED, THE STUDENT SEGMENT IS ALSO DELETED. A REPORT IS GENERATED TO SHOW THE STUDENTS WITH DELETED RESERVATIONS. STUDENT DATA SHOWN ON THIS REPORT INCLUDES SOCIAL SECURITY NUMBER, LAST NAME, FIRST NAME, INITIAL, HOME PHONE, BUSINESS PHONE, AND BUSINESS CODE. FOR EACH DELETED RESERVATION, THE SEQUENCE NUMBER, CLASS ID, AND CLASS TITLE IS SHOWN. IF THE STUDENT SEGMENT IS ALSO DELETED, 'DEL' WILL APPEAR BESIDE THE SOCIAL SECURITY NUMBER ON THE REPORT. THIS PROGRAM OBTAINS THE COLLEGE NAME AND EDITS THE TERM USING THE CONTROL DATA BASE. THE CLASS TITLE IS OBTAINED FROM THE SUBTITLE SEGMENT OF THE CLASS DATA BASE OR FROM THE COURSE DATA BASE WHEN A SUBTITLE DOES NOT EXIST FOR NON-CEU COURSES. THE CEU COURSE DATA BASE IS READ FOR THE COURSE TITLE FOR A CLASS ID WITH A FOUR-CHARACTER DEPARTMENT CODE. 2.0 SAMPLE JCL ---------- 2.1 RUN JCL ______ //XXRSV300 JOB (XXXX,YYYY),RSV300, // MSGCLASS=A,MSGLEVEL=(1,1),CLASS=O /*ROUTE PRINT PPPPPPPP /*SETUP ** * * * * * * * * * * * * * * * /*SETUP ** THIS UPDATE JOB WILL REQUIRE TAPE(S) WITH RING /*SETUP ** FROM THE BATCH SCRATCH POOL. /*SETUP ** NEVER REPLY 'U' /*SETUP ** * * * * * * * * * * * * * * * //RSV300 EXEC RSV300, // AGENCY=AAA, // COLLEGE=CC //RSV300.PARMCARD DD * *** INPUT PARAMETERS *** /* // 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 DBTYPE INDICATES WHETHER TO USE THE TEST OR PRODUCTION DATA BASE FILES. DEFAULT: PROD (E.G., DBTYPE=TEST) FORM FORM NUMBER TO WHICH THE REPORT IS BE SPOOLED DEFAULT: A000 (E.G., FORM=0001) FORM2 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) QUEUE2 QUEUE UNDER WHICH THE REPORT IS TO BE SPOOLED DEFAULT: * (E.G., QUEUE=A) RUNTYPE INDICATES WHETHER TO USE THE TEST OR PRODUCTION 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 ---------------- CC CONTENTS -- -------- 01 - 06 TERM (I.E. SPRING) 07 - 08 TERM YEAR (I.E. 90) 09 - 80 NOT USED 3.0 JOB SETUP INSTRUCTIONS ---------------------- SPECIAL FORMS QUEUE: STANDARD 11 X 14 FORMS BUFFER: STANDARD ALIGNMENT INSTRUCIONS: STANDARD PRINTED OUTPUT: DELETED CLASS RESERVATIONS DELETED STUDENT RESERVATIONS FORMS TYPE: STANDARD 11 X 14 SPECIAL INSTRUCTIONS: A HEADER CARD MUST BE PREPARED PRIOR TO RUNNING THIS JOB 4.0 FILES: 4.1 DATA BASES USED: 1. CTLDBD A. CTLQUART SEGMENT (READ ONLY) B. CTLCAMP SEGMENT (READ ONLY) 2. RCLDBD A. CLASSRSV (READ, DELETE) B. STDNTRSV (READ, DELETE) 3. RSTDBD A. RSVSTNDT (READ, DELETE) B. RSVCLASS (READ, DELETE) 4. CLSDBD A. CLSMASTR (READ ONLY) B. CLSSECST (READ ONLY) 5. CRSDBD A. CRSDEPT (READ ONLY) B. CRSSEGM (READ ONLY) 6. CCRDBD A. CCRSMSTR (READ ONLY) 4.2 ADDITIONAL FILES USED: NONE 4.3 INPUT/OUTPUT RECORD LAYOUTS: N/A 5.0 SPECIAL OUTPUT MESSAGES: 5.1 'NO PARMCARD...RUN STOPPED' 5.2 'INVALID TERM ON PARMCARD...RUN STOPPED' 5.3 'INVALID TERM YEAR ON PARMCARD...RUN STOPPED' 5.4 'TERM NOT FOUND IN CTRL DATABASE...RUN STOPPED' 5.5 'CANNOT UPDATE UNLESS TERM IS CLOSED...RUN STOPPED' MEANING - CUMM-INFO-FLAG WAS NOT "1". GRP310 (GPA UPDATE) MUST BE RUN BEFORE THIS PROGRAM. 5.6 DLI ABNORMAL TERMINATION MESSAGES AS APPROPRIATE ACTION - THESE CONDITIONS SHOULD BE BROUGHT TO THE ATTENTION OF THE REGIONAL COORDINATOR. 6.0 SPECIAL FEATURES: 5.1 CALLING PROGRAMS: NONE 5.2 SUBPROGRAMS CALLED: NONE 5.3 MESSAGE SEGMENT CODES: N/A 5.4 MISCELLANEOUS FEATURES: N/A 7.0 PROGRAM OPTIONS: NONE 8.0 PROGRAM CHANGE HISTORY: 8.1 VERSION NO. V4.23 CHANGE DATE 05/15/91 PROGRAMMER NAME DIANE LIVELY PROGRAM CHANGE REQUEST NO. 00007848 DESCRIPTION OF CHANGE: NEW PROGRAM 8.2 VERSION NO. V5.03 CHANGE DATE 08/15/93 PROGRAMMER NAME DIANE LIVELY PROGRAM CHANGE REQUEST NO. 00012386 DESCRIPTION OF CHANGE: CHANGED THE PROGRAM AND PSB TO USE THE CEU COURSE DATA BASE SO THE CEU COURSE TITLE COULD BE RETRIEVED. DOCUMENTED THE FACT THAT THE RSV SUBSYSTEM MAY BE USED FOR CEU DATA IN ADDITION TO REGULAR CREDIT DATA.