0.001/15/91 MARIE GORDON 1.0 PROGRAM NARRATIVE: ------------------ THIS BATCH PROGRAM PRODUCES BOOK REQUEST FORMS. A FORM IS PRINTED FOR EACH BOOK THAT WAS USED IN THE PREVIOUS YEARS TERM. LINES ARE PROVIDED SO THAT THE INFORMATION CAN BE MODIFIED. THE FOLLOWING DATA ELEMENTS WILL BE PRINTED: CAMPUS DEPARTMENT COURSE NUMBER BOOK NUMBER COURSE TITLE AUTHOR/EDITOR TITLE OF TEXT PUBLISHER CODES (FOR NEW & USED BOOKS) PUBLISHER NAMES ORDER ADDRESS ACTUAL ENROLLMENT (FROM PREVIOUS YEAR) MAXIMUM ENROLLMENT (FROM PREVIOUS YEAR OR CURRENT YEAR) ORDERED LAST YEAR USED LAST YEAR QUANTITY NEEDED EDITION NUMBER EDITION COMMENT SECTIONS DIVISION CODES (AT LEAST 1; MAXIMUM OF 3) ISBN (INTERNATIONAL STANDARD BOOK NUMBER) COPYRIGHT YEAR APPROVAL LINE (IF USER SELECTS DOCUMENT OPTION) 2.0 SAMPLE JCL ---------- 2.1 RUN JCL ------- //CVBKS500 JOB (PPPP,RRRR,N,NN),'BKS500',CLASS=F, // PRTY=3,MSGCLASS=A,MSGLEVEL=(1,1) /*ROUTE PRINT ZZZZZ //STEP1 EXEC BKS500,COLLEGE=II,AGENCY=AAA //PARMCARD DD * XXXXXXXXXXXXXXX /* // PPPP - PROGRAMMER NUMBER RRRR - ROOM NUMBER ZZZZ -REMOTE NUMBER THE USER SHOULD SUPPLY A VALID JOB CARD FOR THIS PROCEDURE CONFORMING TO SYSTEM STANDARDS. SYMBOLIC PARAMETERS ******************* REQUIRED - THE FOLLOWING SUBSTITUTIONS MUST BE PERFORMED ON THE ABOVE JCL'S SYMBOLIC PARAMETERS: AGENCY AAA - ENTER YOUR COLLEGE'S AGENCY CODE NUMBER (E.G. AGENCY=292) COLLEGE II - ENTER YOUR COLLEGE'S TWO CHARACTER NAME ABBREVIATION (E.G. COLLEGE=CV) 2.2 INPUT PARAMETERS : ------------------ * THE USER SHOULD PREPARE A PARAMETER/HEADER CARD AND PLACE IT AFTER THE "//BKS500 PARMCARD DD" CARD USING THE FOLLOWING DIRECTIONS : CC CONTENTS -- -------- 01-06 NAME OF THE TERM YOU DESIRE THE REPORT PRINTED FOR (I.E. 'FALL '). 07-08 LAST TWO DIGITS OF THE YEAR ASSOCIATED WITH THE NAME OF TERM (I.E. '87') 09 CAMPUS CODE YOU DESIRE THE REPORT TO BE PRINTED FOR. VALID ENTRIES ARE : '@' - FOR ALL CAMPUSES 'A' - A VALID CAMPUS CODE AT YOUR COLLEGE 10 SORT OPTION STANDARD SORT - ENTER A BLANK DETAILED SORT - ENTER A 'D' STANDARD SORT - SORT ALL OF THE FOLLOWING FLDS IN ASCENDING ORDER : CAMPUS, DEPT, COURSE & BOOKNUM DETAILED SORT - SORT ALL OF THE FOLLOWING FLDS IN ASCENDING ORDER : CAMPUS, DIV, DEPT, COURSE & BOOKNUM 11 OFFICIAL DOCUMENT OPTION AN APPROVAL LINE MAY BE PRINTED AT THE BOTTOM OF PAGE. ENTER 'Y' - IF YOU WANT APPROVAL LINE TO PRINT AT BOTTOM OF PAGE. ENTER 'N' - IF YOU DO NOT WANT APPROVAL LINE TO PRINT. 12-15 MAX ENROLL OPTION SHALL MAX ENROLL FIGURES BE FOR THIS YEAR OR LAST YEAR? ENTER 'THIS' FOR THIS YEAR ENTER 'LAST' FOR LAST YEAR 3.0 JOB SETUP INSTRUCTIONS : ------------------------ SPECIAL FORMS QUEUE : STANDARD FORMS BUFFER : STANDARD ALIGNMENT INSTRUCTIONS : NONE PRINTED OUTPUT : BOOK REQUEST FORMS FORMS TYPE : STOCK 11 * 14 SPECIAL INSTRUCTIONS : 4.0 FILES: ----- 4.1 DATA BASES USED: CONTROL DATA BASE 1. CTLQUART (READ ONLY) 2. CTLDIVM (READ ONLY) 3. CTLCAMPM (READ ONLY) COURSE DATA BASE 1. CRSDEPT (READ ONLY) 2. CRSSEGM (READ ONLY) CLASS DATA BASE 1. CLSMASTR (READ ONLY) BOOK STORE DATA BASE 1. BOOKMSTR (READ ONLY) 2. BOOKREC (READ ONLY) 3. INVREC (READ ONLY) 4. PORDREC (READ ONLY) PUBLISHER DATA BASE 1. PUBLMSTR (READ ONLY) 4.2 ADDITIONAL FILES USED: 1. PRINT FILE PRINT FILE (BOOK REQUEST FORMS) 2. NEW-FILE (FILE OF DESIRED DATA BASE RECORDS) 3. SORTED-FILE (SORTED FILE OF DESIRED DATA BASE RECORDS) 4. SORT-FILE (WORK FILE) 5. PARM-CARD-FILE (CARD FILE - SUPPLIES USER INPUT PARAMETERS) 4.3 INPUT/OUTPUT RECORD LAYOUTS: N/A 5.0 SPECIAL FEATURES: ---------------- 5.1 CALLING PROGRAMS: NONE 5.2 SUBPROGRAMS CALLED: UTL550S 5.3 MESSAGE SEGMENT CODES: N/A 5.4 SPECIAL OUTPUT MESSAGES : ------------------------- 1. ERROR - * PARMCARD DD STATEMENT IS MISSING * MEANING: YOUR JOB CONTROL STATEMENTS ARE NOT CORRECT. YOU ARE MISSING THE INDICATED STATEMENT. ACTION: SUPPLY THE MISSING STATEMENT. RE-RUN JOB. 2. ERROR - * NO PARAMETER RECORD WAS FOUND FOLLOWING DD STATEMENT * MEANING: YOU LEFT OUT OR MISPLACED THE PARAMETER CARD IN THE DECK. ACTION: SUPPLY THE PARAMETER CARD IN THE CORRECT PLACE. RE-RUN JOB. 3. ERROR - * NAME OF TERM IS INVALID * MEANING: NAME OF TERM SUPPLIED ON THE PARAMETER CARD IS NOT WINTER, SPRING, SUMMER, OR FALL. ACTION: SUPPLY THE CORRECT TERM AND RE-RUN JOB. 4. ERROR - * YEAR IS NOT NUMERIC - RUN ABORTED * MEANING: YEAR SUPPLIED ON THE PARAMETER CARD IS NOT NUMERIC (00-99). ACTION: SUPPLY THE CORRECT YEAR AND RE-RUN JOB. 5. ERROR - * YEAR NOT FOUND ON CTLQUART * MEANING: YEAR SUPPLIED ON THE PARAMETER CARD DOES NOT EXIST ON THE CONTROL DATA BASE. ACTION: SUPPLY A YEAR THAT EXISTS ON THE CONTROL DATA BASE. 6. ERROR - * CAMPUS CODE NOT FOUND - INVALID * MEANING: THE CAMPUS CODE SUPPLIED ON THE PARAMETER CARD CAN NOT BE LOCATED ON THE CONTROL DATA BASE. ACTION: SUPPLY A VALID CAMPUS CODE FOR YOUR COLLEGE ON THE PARAMETER CARD. 7. ERROR - * PARM SORT OPTION INVALID - RUN ABORTED * MEANING: THE PARM SORT OPTION SUPPLIED ON THE PARAMETER CARD IS NOT D OR SPACE. ACTION: SUPPLY THE CORRECT SORT OPTION AND RE-RUN JOB. 8. ERROR - * PARM DOCUMENT OPTION INVALID - RUN ABORTED * MEANING: THE DOCUMENT OPTION SUPPLIED ON THE PARAMETER CARD IS INVALID. ACTION: SUPPLY THE CORRECT DOCUMENT OPTION AND RE-RUN JOB. 9. ERROR - * ROOT SEGMENT (BOOKMSTR) NOT FOUND *' MEANING: CAN NOT ENTER DATA BASE. ACTION: REPORT THE PROBLEM TO PROGRAMMING. 10. ERROR - * CAMPUS "A" NOT FOUND ON CONTROL CAMPUS * MEANING: CAMPUS CODE OF "A" NOT FOUND ON CONTROL DATA BASE. ACTION: REPORT THE PROBLEM TO PROGRAMMING. 11. ERROR - * DIVISION NOT FOUND ON CONTROL DIVISION * * DIVISION = X * MEANING: DIVISION NOT FOUND ON CONTROL DIVISION. ACTION: INSURE DIVISION DOES NOT EXIST, IF IT DOES REPORT THE PROBLEM TO PROGRAMMING. 12. ERROR - * NO RECORDS IN SORTED FILE - PROGRAM ABORTED * MEANING: SORTED FILE CONTAINS NO RECORDS ACTION : REPORT THE PROBLEM TO PROGRAMMING. 13. ERROR - * COURSE TITLE NOT FOUND * MEANING: COURSE TITLE CAN NOT BE FOUND ACTION: INSURE COURSE TITLE DOES NOT EXIST, IF IT DOES REPORT THE PROBLEM TO PROGRAMMING. 14. ERROR - * DATA BASE ERROR (MOD XXX) - PCB = * ... MEANING: ACTION: REPORT THE PROBLEM TO PROGRAMMING !!!!!!! 15. * MSG - * END OF DATA BASE REACHED (MOD 115) MEANING: REACHED THE END OF BOOK STORE DATA BASE ACTION: THIS MESSAGE CAN BE IGNORED BY USER, UNLESS PART OR ALL OF OUTPUT IS MISSING. 6.0 PROGRAM OPTIONS : ----------------- NONE 7.0 PROGRAM CHANGE HISTORY: ---------------------- 7.1 VERSION NO: (NEW PROGRAM) CHANGE DATE: N/A PROGRAMMER: LAURA L. MCCOY PROGRAM CHANGE REQUEST NO: N/A DESCRIPTION OF CHANGE: N/A 7.2 VERSION NO: (NEW PROGRAM) CHANGE DATE: 12/10/87 PROGRAMMER: CAROL WILLIS PROGRAM CHANGE REQUEST NO: N/A DESCRIPTION OF CHANGE: REVERSED LOGIC SO PROGRAM READS PREVIOUS YEARS TERM. THUS BKS300 (COPY NEW TERM FROM OLD YEAR) WILL NOT HAVE TO BE RUN BEFORE THIS PROGRAM CAN BE RUN. 7.3 VERSION NO: 3.7 CHANGE DATE: 03/88 PROGRAMMER: CAROL WILLIS PROGRAM CHANGE REQUEST NO: N/A DESCRIPTION OF CHANGE: NEW RELEASE ADDED MAX ENROLL TO REQUEST FORM. ADDED PROGRAM OPTION SO MAX ENROLL CAN BE FOR THIS YEAR OR LAST YEAR. 7.4 VERSION NO: 3.14 CHANGE DATE: 10/88 PROGRAMMER: CAROL WILLIS PROGRAM CHANGE REQUEST NO: STC-CV-055 DESCRIPTION OF CHANGE: BLANKED OUT PUBLISHER FROM PREVIOUS RECORD WHEN NO TEXT REQ. 7.5 VERSION NO : V4.19 CHANGE DATE : 11/29/90 PROGRAMMER : MARIE GORDON CHANGE REQUEST #: 00006570 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.