0.005/27/97 CAROL WILLIS 1.0 PROGRAM NARRATIVE: ----------------- THIS PROGRAM PRINTS A REPORT OF APPLICATIONS ON FILE FOR THE POSITION NUMBER SPECIFIED ON THE INPUT CARD AND FOR EITHER THE DATE ENTERED OR DATE RECEIVED. THE PROGRAM ALSO HAS AN OPTION TO PRINT LABELS. SUBPROGRAM REG742S IS CALLED TO PRINT THE LABELS. AN OPTION WAS ADDED TO SELECT EITHER FULL-TIME OR PART-TIME APPLICANTS. 2.0 SAMPLE JCL: ---------- 2.1 RUN JCL ------- //CVAPP510 JOB (PPPP,RRRR,5,25),'APP510',CLASS=F, // PRTY=3,MSGCLASS=A,MSGLEVEL=(1,1) /*ROUTE PRINT ZZZZZ //STEP1 EXEC APP510,COLLEGE= ,AGENCY= //PARMCARD DD * XXXXXXXXXXXXXXXXXXXXXX /* // SYMBOLIC DESCRIPTION ******************** REQUIRED - AGENCY COLLEGE AGENCY CODE NUMBER (E.G. AGENCY=292) COLLEGE DENOTES THE TWO CHARACTER COLLEGE NAME ABBREVIATION (E.G. COLLEGE=CV) OPTIONAL - FORM1 = INDICATES THE FORM NUMBER THE REPORT WILL BE STORED UNDER DEFAULT = A000 (I.E. FORM1=0001) FORM2 = INDICATES THE FORM NUMBER THE LABELS WILL BE STORED UNDER DEFAULT = LABL (I.E. FORM2=A000) RUNTYPE = INDICATES WHETHER OR NOT TO USE TEST OR PRODUCTION FILES DEFAULT = PROD (I.E. RUNTYPE=TEST) SRTSIZE = AMOUNT OF DASD STORAGE IN CYLINDERS ALLOCATED TO EACH SORT WORK FILE DEFAULT = 3 (I.E. SRTSIZE=4) 2.2 INPUT PARAMETERS: ---------------- PPPP - PROGRAMMER NUMBER RRRR - ROOM NUMBER ZZZZ - REMOTE NUMBER INPUT CARD CC DESCRIPTION -- ----------- 1-5 POSITION NUMBER 6 OPERATOR ( "=" OR ">" OR "<") '=' EQUAL '>' GREATER THAN '<' LESS THAN 7 SELECTION CHOOSE "E" FOR DATE ENTERED CHOOSE "R" FOR DATE RECEIVED 8-13 DATE (YYMMDD) 14-15 FULL-TIME / PART-TIME SPACES - CHOOSE ALL 'FT' - CHOOSE FULL-TIME 'PT' - CHOOSE PART-TIME 16-18 SHALL MAILING LABELS BE PRINTED ALSO "YES" OR "NO " 19 TYPE OF LABELS '1' - ONE ACROSS LABELS '3' - THREE ACROSS LABELS 'S' - STANDARD LABELS BLANK FOR NO LABELS 20-22 IF LABELS ARE DESIRED SHOULD THEY BE PRINTED IN ZIPCODE ORDER "ZIP" = YES IF CC 16-22 ARE LEFT BLANK, NO LABELS WILL BE PRINTED AND THE REPORT WILL BE SORTED ALPHABETICALLY. 2.3 JCL EXAMPLES: ------------- 1. THE FOLLOWING EXAMPLE WILL PRODUCE A LISTING OF JOB APPLICATIONS ON FILE AT CVCC WHERE ANY ONE OF THE THREE POSITION NUMBERS IS EQUAL TO 00008 FOR A DATE ENTERED EQUAL TO APRIL 12, 1986 WITH NO MAILING LABELS. APPLICANTS WHO MARKED FULL-TIME WILL BE CHOSEN. JOB CARD ROUTE CARD //APP510 EXEC APP510,COLLEGE=CV,AGENCY=292 //PARMCARD DD * 00008=E860412FT /* // 2. THE FOLLOWING EXAMPLE WILL PRODUCE A LISTING OF JOB APPLICATIONS ON FILE AT CVCC WHERE ANY ONE OF THE THREE POSITION NUMBERS IS EQUAL TO FA010 FOR A DATE RECEIVED GREATER THAN DECEMBER 31, 1985. BOTH FULL-TIME AND PART-TIME WILL BE SELECTED. WITH MAILING LABELS REQUESTED AND THE LABELS AND REPORT IN ZIPCODE ORDER. THE LABELS WILL BE PRINTED THREE ACROSS THE PAGE. JOB CARD ROUTE CARD //APP510 EXEC APP510,COLLEGE=CV,AGENCY=292 //PARMCARD DD * FA010>R851231 YES3ZIP /* // 3.0 JOB SETUP INSTRUCTIONS: ---------------------- SPECIAL FORMS QUEUE: STANDARD FORMS BUFFER: STANDARD ALIGNMENT INSTRUCTIONS: STANDARD (FOR BOTH REPORT AND LABELS) PRINTED OUTPUT: APPLICATIONS ON FILE BY POSITION FORMS TYPE: 11 X 14 FOR REPORT ONE-UP MAILING LABELS OR THREE-UP MAILING LABELS OR 11 X 14 FOR STANDARD LABLES SPECIAL INSTRUCTIONS: NONE 4.0 FILES: ----- 4.1 DATA BASES/SEGMENTS USED ------------------------ APPLICM DATA BASE 1. APPLICM MASTER (READ) 4.2 ADDITIONAL FILES USED: NONE --------------------- 5.0 SPECIAL OUTPUT MESSAGES: N/A ----------------------- 6.0 SPECIAL FEATURES: ---------------- 6.1 CALLING PROGRAMS: NONE 6.2 SUBPROGRAMS CALLED: REG742S 6.3 MESSAGE CODES: NONE 7.0 PROGRAM OPTIONS: NONE --------------- 8.0 PROGRAM 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: 01/26/88 PROGRAMMER NAME: CAROL WILLIS PROGRAM CHANGE REQUEST NO: STCCV031 DESCRIPTION OF CHANGE: UPDATE LABEL DOCUMENTATION 8.3 VERSION NO: V3.13 CHANGE DATE: 09/01/88 PROGRAMMER NAME: CAROL WILLIS PROGRAM CHANGE REQUEST NO: STC-CV-020 DESCRIPTION OF CHANGE: PRINT TOTAL AT END OF REPORT. IF NO ENTRIES ARE QUALIFIED, PRINT A MESSAGE. CALL REG742S TO PRINT LABELS. ADD FULL-TIME PART-TIME OPTION TO INPUT CARD AS FOR APP500. 8.4 VERSION NO: V4.1 CHANGE DATE: 03/20/89 PROGRAMMER NAME: CAROL WILLIS PROGRAM CHANGE REQUEST NO: 00002468 DESCRIPTION OF CHANGE: MODIFIED TO PRINT SECOND ADDRESS LINE ON MAILING LABELS. 8.5 VERSION : V6.11 CHANGE DATE : 05/27/97 PROGRAMMER : PAMELA J DALRYMPLE CHANGE REQUEST #: 00017647 DESCRIPTION : MODIFIED PROGRAM TO INSURE ALL FILES WERE PROPERLY CLOSED BEFORE NORMAL EOJ TO AVOID SC03 ABEND.