0.010/29/98 KATHY HARCUM 1.0 PROGRAM NARRATIVE ----------------- THIS BATCH PROGRAM WILL DELETE ALL FINANCIAL AID DATA PER ACADEMIC YEAR FOR STUDENTS WHO WERE NOT ENROLLED DURING ANY TERM OF THE FINANCIAL AID ACADEMIC YEAR. ALL TERMS OF THE ACADEMIC YEAR BEING PROCESSED MUST BE CLOSED BEFORE RUNNING THIS PROGRAM. A REPORT IS GENERATED LISTING STUDENT SOCIAL SECURITY NUMBER, STUDENT NAME, AND TERM LAST ENROLLED. IF ANY ACCOUNT DETAIL AND/OR FINANCIAL AID DISBURSEMENT DATA IS FOUND FOR THE STUDENT, THEN THE STUDENT WILL NOT BE ELIGIBLE FOR DELETION AND AN APPROPRIATE MESSAGE IS PRINTED ON THE REPORT. THE TOTAL NUMBER OF STUDENTS NOT ENROLLED AND TOTAL NUMBER OF STUDENTS ACTUALLY DELETED ARE GIVEN AT CONTROL BREAKS. THE ABILITY TO PRINT LABELS, SELECT CAMPUSES, SPECIFY SORT SEQUENCE, AND RUN IN NON-UPDATE MODE IS PROVIDED. SEE THE PARAMETER CARD SECTION FOR FURTHER DETAILS. 2.0 SAMPLE JCL ---------- 2.1 RUN JCL ------- ***** FOR UPDATE OPTION ***** //FIN330 JOB (XXXX,YYYY),'DELETE FINAID',CLASS=O, // MSGCLASS=A,MSGLEVEL=(2,0),REGION=4096K /*ROUTE PRINT RMTZZ /*SETUP ** * * * * * * * * * * * * * * * /*SETUP ** THIS UPDATE JOB LOGS TO DISK. /*SETUP ** GOSIS REPLY REQUIRED. /*SETUP ** * * * * * * * * * * * * * * * //* //FIN330 EXEC FIN330,AGENCY=XXX,COLLEGE=XX,FORM=XXXX, // LABEL=XXXX,QUEUE1=X,QUEUE2=X,SRTSIZE=X //FIN330.PARMCARD DD * INPUT PARAMETERS /* ***** FOR REPORT ONLY/NON-UPDATE OPTION ***** SAME AS ABOVE EXCEPT PROCNAME IS FIN330R. SEE FOLLOWING: //FIN330 EXEC FIN330R,AGENCY=XXX,COLLEGE=XX,FORM=XXXX, ------- SYMBOLIC PARAMETERS ******************* REQUIRED - AGENCY COLLEGE AGENCY CODE NUMBER DEFAULT: NONE (EX: AGENCY=286) COLLEGE TWO CHARACTER COLLEGE NAME ABBREVIATION DEFAULT: NONE (EX: COLLEGE=VW) OPTIONAL - QUEUE1 QUEUE OUTPUT REPORT IS TO BE SPOOLED UNDER DEFAULT: * (I.E. QUEUE=J) QUEUE2 QUEUE LABELS ARE TO BE SPOOLED UNDER DEFAULT: J (I.E. QUEUE=*) FORM FORM NUMBER THE REPORT IS TO BE STORED UNDER DEFAULT: A000 (I.E. FORM=0001) LABEL FORM NUMBER THE LABELS ARE TO BE STORED UNDER DEFAULT: A000 (I.E. FORM=LABL) SRTSIZE AMOUNT OF DASD STORAGE IN CYLINDERS ALLOCATED TO EACH SORT WORK FILE DEFAULT: 3 (I.E. SRTSIZE=5) NOTE: IF USING NOUPDATE OPTION WITH NONUPDATE PSB, CLASS ON JOB CARD SHOULD BE 'F' AND PRIORTY SHOULD BE '3'. (I.E., CLASS=F,PRTY=3) 2.2 INPUT PARAMTERS -------------- 1 - 4 FINANCIAL AID ACADEMIC YEAR (EX: 8687) 5 - 9 CAMPUS SELECTION: MAY SPECIFY UP TO 5 VALID CAMPUS CODES OR @ FOR ALL CAMPUSES. 10 SORT SEQUENCE: '1' - SORT BY CAMPUS/SSN '2' - SORT BY CAMPUS/NAME '3' - SORT BY SSN ONLY '4' - SORT BY NAME ONLY 11 - 18 UPDATE MODE: 'UPDATE ' - UPDATE THE DATA BASE 'NOUPDATE' - DO NOT UPDATE DATA BASE 19 LABEL TYPE: ' ' - DO NOT PRODUCE LABELS '1' - PRODUCE 1UP LABELS '3' - PRODUCE 3UP LABELS 'S' - PRODUCE STOCK LABELS 20 LABEL SELECTION: ' ' - DO NOT PRODUCE LABELS 'A' - PRODUCE LABELS FOR ALL STUDENTS LISTED ON REPORT 'D' - PRODUCE LABELS ONLY FOR STUDENTS DELETED (I.E., STUDENTS WITH A 'NOT DELETED' MESSAGE WILL NOT HAVE LABELS) NOTE: IF NO LABELS ARE WANTED, BOTH LABEL TYPE AND LABEL SELECTION MUST BE BLANK. IF LABELS ARE DESIRED, THEN BOTH FIELDS MUST HAVE APPROPRIATE VALUES. 3.0 JOB SETUP INSTRUCTIONS ---------------------- SPECIAL FORMS QUEUE: *, J FOR LABELS FORMS BUFFER: A000, AND APPROPRIATE FORMS FOR LABELS ALIGNMENT INSTRUCTIONS: TOP OF FORM PRINTED OUTPUT: DELETE REPORT OPTIONAL STUDENT MAILING LABELS FORMS TYPE: 14 7/8" X 11" SPECIAL INSTRUCTIONS: N/A 4.0 FILES ----- 4.1 DATA BASES / SEGMENTS USED CONTROL DATA BASE 1. CAMPUS SEGMENT (READ) 2. TERM SEGMENT (READ) 3. PROGRAM OPTION SEGMENT (READ) STUDENT DATA BASE 1. STUDENT SEGMENT (READ) 2. REGISTRATION SEGMENT (READ) 3. ACCOUNT SEGMENT (READ) FINAID DATA BASE 1. FINMASTR SEGMENT (READ, DELETE) 2. PELL AWARD SEGMENT (READ) 3. PELL DISBURSEMENT SEGMENT (READ) 4. LOAN AWARD SEGMENT (READ) 5. LOAN DISBURSEMENT SEGMENT (READ) 6. SEOG AWARD SEGMENT (READ) 7. SEOG DISBURSEMENT SEGMENT (READ) 8. CSAP AWARD SEGMENT (READ) 9. CSAP DISBURSEMENT SEGMENT (READ) 10. GRNT AWARD SEGMENT (READ) 11. GRNT DISBURSEMENT SEGMENT (READ) 4.2 ADDITIONAL FILES USED: N/A 4.3 INPUT/OUTPUT RECORD LAYOUT: N/A 5.0 SPECIAL OUTPUT MESSAGES: ----------------------- APPROPRIATE ERROR MESSAGES ARE ISSUED FOR PARAMETER CARD, FINS0001 OPTION RECORD, ACADEMIC TERM, AND DLI CALL ERRORS. PROCESSING IS STOPPED AND THE BACKOUT STEP SHOULD EXECUTE. IF A STUDENT ON THE FINAID DATA BASE IS NOT FOUND ON THE STUDENT DATA BASE; THEN THE STUDENT IS DISPLAYED AND BYPASSED, AND PROCESSING CONTINUES. 6.0 SPECIAL FEATURES ---------------- 6.1 CALLING PROGRAMS: N/A 6.2 SUBPROGRAMS CALLED: REG742S 6.3 MESSAGE SEGMENT CODES: N/A 7.0 PROGRAM OPTIONS: --------------- FINS0001 - SUBSYSTEM OPTION RECORD WHICH WILL CONTAIN PERTINENT INFORMATION FOR ANY EXCEPTIONAL FINAID ACADEMIC YEARS. IF THE OPTION RECORD IS NOT FOUND, THEN IT IS ASSUMED THAT NO EXCEPTIONAL YEAR PROCESSING IS REQUIRED. POSIT. OPTION NAME VALUE PROCESSING DESCRIPTION --------------------------------------------------------------------- 1 | ADJUST-TERM-NO | 1 | ADJUST PELL IN 1ST TERM OF YR | | 2 | ADJUST PELL IN 2ND TERM OF YR | | 3 | ADJUST PELL IN 3RD TERM OF YR | | 4 | ADJUST PELL IN 4TH TERM OF YR | | | 2-5 | EXCEPTION YEAR 1 | BBEE | BB IS BEGINNING YEAR AND EE IS | | | ENDING AID YEAR (I.E., 8788) | | | 6-8 | YEAR1 EXCEPTION | YYQ | TERM CODE FOR 1ST TERM TO BE | TERM 1 | | INCLUDED IN EXCEPTION YEAR 1 | | | 9-11 | YEAR1 EXCEPTION | YYQ | TERM CODE FOR 2ND TERM TO BE | TERM 2 | | INCLUDED IN EXCEPTION YEAR 1 | | | 12-14 | YEAR1 EXCEPTION | YYQ | TERM CODE FOR 3RD TERM TO BE | TERM 3 | | INCLUDED IN EXCEPTION YEAR 1 | | | 15-17 | YEAR1 EXCEPTION | YYQ | TERM CODE FOR 4TH TERM TO BE | TERM 4 | | INCLUDED IN EXCEPTION YEAR 1 | | | 18-21 | EXCEPTION YEAR 2 | BBEE | BB IS BEGINNING YEAR AND EE IS | | | ENDING AID YEAR (I.E., 8788) | | | 22-24 | YEAR2 EXCEPTION | YYQ | TERM CODE FOR 1ST TERM TO BE | TERM 1 | | INCLUDED IN EXCEPTION YEAR 2 | | | 25-27 | YEAR2 EXCEPTION | YYQ | TERM CODE FOR 2ND TERM TO BE | TERM 2 | | INCLUDED IN EXCEPTION YEAR 2 | | | 28-30 | YEAR2 EXCEPTION | YYQ | TERM CODE FOR 3RD TERM TO BE | TERM 3 | | INCLUDED IN EXCEPTION YEAR 2 | | | 31-33 | YEAR2 EXCEPTION | YYQ | TERM CODE FOR 4TH TERM TO BE | TERM 4 | | INCLUDED IN EXCEPTION YEAR 2 | | | 8.0 PROGRAM CHANGE HISTORY: ---------------------- 8.1 VERSION NO: V3.11 CHANGE DATE: RELEASE VERSION PROGRAMMER NAME: KATHY HARCUM PROGRAM CHANGE REQUEST NO: STC-TC-201 DESCRIPTION OF CHANGE: THIS PROGRAM WILL DELETE FINANCIAL AID MASTER SEGMENTS (AND ALL DEPENDENT CHILDREN) FOR THOSE STUDENTS WHO HAVE NOT ENROLLED FOR ANY TERM OF THE FINANCIAL AID ACADEMIC YEAR. ALL TERMS OF THE ACADEMIC YEAR MUST BE 'CLOSED'. A REPORT IS GENERATED LISTING THE STUDENTS DELETED. IF THE STUDENT HAS NO ENROLLMENT BUT DOES HAVE ANY TYPE OF FINAID DISBURSEMENT (PELL, SEOG, CSAP, GRANTS, LOANS) OR ANY ACCOUNT DETAILS DURING THE ACADEMIC YEAR; THEY WILL NOT BE DELETED AND A MESSAGE WILL PRINT ON THE REPORT. THESE STUDENTS MUST BE MANUALLY INVESTIGATED AND DELETED. IF THE STUDENT MASTER SEGMENT CAN NOT BE FOUND FOR A STUDENT ON THE FINAID DATA BASE; A MESSAGE WILL BE DISPLAYED AND THE STUDENT BYPASSED. THE REPORT WILL LIST THE STUDENT SSN, STUDENT NAME, TERM LAST ENROLLED (FROM STUDENT MASTER RECORD), AND A 'NOT DELETED' MESSAGE WHEN NECESSARY. LABELS MAY BE PRINTED FOR THOSE STUDENTS ACTUALLY DELETED, OR FOR ALL STUDENTS LISTED ON THE REPORT. AN INPUT PARAMETER CARD WILL BE USED TO SUPPLY THE FINANCIAL AID ACADEMIC YEAR, CAMPUS SELECTION, SORT OPTION, UPDATE MODE, TYPE LABEL, AND LABEL OPTION. 8.2 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. 8.3 VERSION NO: V3.13 CHANGE DATE: 08/08/88 PROGRAMMER NAME: TONY SANTOS PROGRAM CHANGE REQUEST NO: STC-SR-540 DESCRIPTION OF CHANGE: MODIFIED THE PROGRAM'S DISPLAY MESSAGE TO SAY 'FIN330' INSTEAD OF 'REG850' WHEN THE PROGRAM FAILS. 8.4 VERSION NO: V4.20 CHANGE DATE: 02/08/91 PROGRAMMER NAME: CAMPER PROGRAM CHANGE REQUEST NO: 00006620 DESCRIPTION OF CHANGE: - MODIFICATIONS WERE MADE TO THE CALLS TO ALL DATA BASES TO BRING THESE CALLS UP TO THE STANDARD USE OF AN IOAREA. SEE PAGE 29 OF THE 02/90 PROGRAMMING STANDARD, PROCEDURES AND GUIDELINES MANUAL. 8.5 VERSION NO: V5.0 CHANGE DATE: 05/15/93 PROGRAMMER NAME: K. HARCUM PROGRAM CHANGE REQUEST NO: 00012263 DESCRIPTION OF CHANGE: -MODIFIED FOR 5.0 DATA BASE CHANGES: PATH CALL IOAREAS EXPANDED, REVISED COPY MEMBERS. 8.6 VERSION NO: V5.10 CHANGE DATE: 03/29/94 PROGRAMMER NAME: J. HENLEY PROGRAM CHANGE REQUEST NO: 00013964 DESCRIPTION OF CHANGE: -MODIFIED DOCUMENTATION TO REMOVE PSBOPT AND DISP JCL SYMBOLICS AND TO DESCRIBE USE OF FIN330R PROCNAME FOR NON-UPDATE/REPORT ONLY OPTION RUNS. 8.7 VERSION: V5.19 CHANGE DATE: 12/15/94 PROGRAMMER: MACK PEACOCK CHANGE REQUEST #: 00014692 DESCRIPTION: PROGRAM RECOMPILED TO INCLUDE NEW COPYLIB DESCRIPTIONS FOR THE PELLAWRD AND THE PELLQTOT AND THE FINMASTR SEGMENTS 8.8 VERSION: V6.0 CHANGE DATE: 12/01/95 PROGRAMMER: BARBARA TRUITT CHANGE REQUEST #: 00014865 DESCRIPTION: DISK LOGGING RECOVERY CHANGES. CHANGE REQUEST #: 00015420 DESCRIPTION: ADDED CALL TO CTLFINYR FOR TERM CLOSED FLAGS. 8.9 VERSION NO: V7.02 CHANGE DATE: 8/98 PROGRAMMER NAME: KATHY CAMPER PROGRAM CHANGE REQUEST NO: 00018008 DESCRIPTION OF CHANGE: PROGRAM MODIFIED TO WORK WITH NEW COBOL COMPILER. MODIFIED FOR Y2K.