0.003/13/99 DIANE LIVELY 1.0 PROGRAM NARRATIVE ----------------- THIS PROGRAM PRINTS A REPORT THAT SHOWS MEMBERSHIP ITEMS. ONLY OBJECT CODE 1221 IS INCLUDED. THE PROGRAM COMPUTES THE TOTAL BUDGET AMOUNT, TOTAL ENCUMBRANCES, TOTAL EXPENDITURES, AND THE BALANCE FOR EACH FRS ACCOUNT, COST CENTER, CAMPUS, AND FOR THE COLLEGE. THERE IS A PAGE BREAK ON CAMPUS. A SEPARATOR LINE IS PRINTED WHEN THERE IS A CHANGE ON THE COST CENTER. BUDGET TRANSFERS ARE ALSO SHOWN ON THE REPORT. THESE TRANSACTIONS ARE NOT COUNTED IN THE TOTALS. THEY ARE LISTED ON THE REPORT WITH 'BUDGET TRANSFER' AS THE VENDOR AND THE AMOUNT SHOWING WHERE THE BUDGET AMOUNT WOULD NORMALLY APPEAR. NOTE: THIS IS THE FRS VERSION OF ACC973, AND CANNOT BE RUN FOR BUDGET YEARS PRIOR TO 9394. THE BUDGET SEGMENTS AND TRANSACTION SEGMENTS ARE READ FOR THE BUDGET YEAR SPECIFIED ON THE PARMCARD. ALL RECORDS FOR OBJECT CODE 1221 ARE PROCESSED. THERE IS AN OPTION TO EXCLUDE ONE FRS DEPARTMENT/CAMPUS CODE. THERE IS ALSO AN OPTION TO INCLUDE ONLY ONE FUND GROUP OR ALL. THE RECORDS ARE SORTED BY COST CENTER, FRS ACCOUNT (FUND GROUP, DEPARTMENT, CAMPUS), TYPE OF RECORD (BUDGET, ENCUMBRANCE, EXPENDITURE, OR BUDGET TRANSFER) AND THE TRANSACTION DATE. OTHER FIELDS SHOWN INCLUDE TRANSACTION DESCRIPTION, BATCH NUMBER, PURCHASE ORDER NUMBER, VOUCHER NUMBER, AND STATUS CODE. THE COLLEGE NAME IS OBTAINED FROM THE BUDGET CAMPUS SEGMENT IN THE CONTROL DATA BASE (CAMPUS 1). THE FRS DEPARTMENT/CAMPUS MASTER IS READ FOR THE FRS DEPARTMENT NAME. THE COST CENTER MASTER IS READ FOR THE COST CENTER NAME AND MANAGER'S NAME. THE CONTROL OPTION SEGMENT FOR THE BUDGET YEAR IS READ TO OBTAIN THE DATE THE DATA BASE WAS LAST UPDATED BY ACC410. 2.0 SAMPLE JCL: ---------- 2.1 RUN JCL ------- //XXACC673 JOB (WWWW,XXXX,9,29),ACC673, // MSGCLASS=A,CLASS=F,PRTY=3 /*ROUTE PRINT YYYYYYYY //ACC673 EXEC ACC673, // AGENCY=DDD, // COLLEGE=DD, // COPIES=1, // DBTYPE=PROD, // FORM=A000, // QUEUE='*', // RUNTYPE=PROD, // SRTSIZE=3 //ACC673.PARMCARD DD * ----SEE INPUT CARD BELOW---- /* // SYMBOLIC DESCRIPTION ******************** REQUIRED - AGENCY COLLEGE AGENCY CODE NUMBER (E.G. AGENCY=291) COLLEGE TWO CHARACTER COLLEGE NAME ABBREVIATION (E.G. COLLEGE=BR) OPTIONAL - COPIES THE NUMBER OF COPIES OF OUTPUT DEFAULT: 1 (E.G. COPIES=3) DBTYPE INDICATES WHETHER TO USE TEST OR PRODUCTION DATA BASES DEFAULT: PROD (E.G. DBTYPE=TEST) FORM FORM NUMBER THE REPORT IS TO BE STORED UNDER DEFAULT: A000 (E.G. FORM=0001) QUEUE QUEUE CLASS THE OUTPUT IS TO BE SPOOLED UNDER DEFAULT: * (E.G. QUEUE=A) RUNTYPE INDICATES WHETHER TO USE 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 ---------------- WWWW - PROGRAMMER NUMBER XXXX - ROOM NUMBER YYYYYYYY - PRINTER INPUT CARD CC DESCRIPTION -- ----------- 1 - 4 BUDGET YEAR (I.E. 9394, MUST BE 9394 OR AFTER) 5 - 9 FRS DEPARTMENT/CAMPUS CODE TO EXCLUDE 10 FRS FUND GROUP CODE (SPACE OR '@' FOR ALL) 3.0 JOB SETUP INSTRUCTIONS: ---------------------- SPECIAL FORMS QUEUE: STANDARD FORMS BUFFER: STANDARD ALIGNMENT INSTRUCTIONS: STANDARD PRINTED OUTPUT: FRS ACCOUNTING BUDGET MEMBERSHIP REPORT FORMS TYPE: 11 X 14 7/8 SPECIAL INSTRUCTIONS: A PARMCARD MUST BE PREPARED PRIOR TO RUNNING THIS JOB. 4.0 FILES: ----- 4.1 DATA BASE SEGMENTS USED CONTROL DATA BASE 1. CTLBCAMP (READ ONLY) 2. CTLFDEPT (READ ONLY) 3. CTLCSTCR (READ ONLY) 4. CTLPROPT (READ ONLY) ACCOUNTING DATA BASE 1. ACBBUDGT (READ ONLY) 2. ACBTRANS (READ ONLY) 4.2 ADDITIONAL FILES USED: NONE 4.3 INPUT/OUTPUT RECORD LAYOUTS: N/A 5.0 SPECIAL OUTPUT MESSAGES ----------------------- 5.1 *** FATAL ERROR - ACC673 NO PARM RECORD *** FATAL ERROR - ACC673 5.2 *** FATAL ERROR - ACC673 BUDGET YEAR ON PARMCARD IS INVALID *** FATAL ERROR - ACC673 MEANING: THE BUDGET YEAR ON THE PARMCARD IS NOT NUMERIC OR THE ENDING YEAR SUBTRACTED BY THE BEGINNING YEAR DOES NOT EQUAL +1. 5.3 *** FATAL ERROR - ACC673 BUDGET YEAR MUST BE 9394 OR AFTER FOR FRS *** FATAL ERROR - ACC670 MEANING: THE BUDGET YEAR ON THE PARMCARD IS LESS THAN 9394. USE ACC973 FOR YEARS PRIOR TO FRS. 5.4 *** FATAL ERROR - ACC673 FRS DEPARTMENT/CAMPUS ON PARMCARD IS INVALID *** FATAL ERROR - ACC673 MEANING: THE FRS DEPT/CAMPUS ON THE PARMCARD TO EXCLUDE WAS NOT FOUND IN THE CONTROL DATA BASE. 5.5 *** FATAL ERROR - ACC673 INVALID FUND GROUP CODE ON PARMCARD *** FATAL ERROR - ACC673 MEANING - MUST BE SPACES OR '@' FOR ALL, OR ELSE NUMERIC. 5.6 PROGRAM OPTION SEGMENT NOT FOUND MEANING: WHEN THE PROGRAM OPTION SEGMENT IS FOUND, THE "AS OF" DATE APPEARS IN THE HEADING. THERE SHOULD BE A PROGRAM OPTION SEGMENT FOR EVERY BUDGET YEAR ON THE DATA BASE. 6.0 SPECIAL FEATURES ---------------- 6.1 CALLING PROGRAMS: NONE 6.2 SUBPROGRAMS CALLED: UTL100S 6.3 MESSAGE SEGMENT CODES: NONE 7.0 PROGRAM OPTIONS: ---------------- ACCS00 XX - WHERE XX EQUALS LAST TWO DIGITS OF THE BUDGET YEAR. POSITION NAME VALUE DESCRIPTION 1 STATUS P BUDGET YEAR IS PAST C BUDGET YEAR IS CURRENT F BUDGET YEAR IS FUTURE 2 N/A 3-10 DATE XX/XX/XX DATE ACC410 LAST UPDATED THE DATA 8.0 PROGRAM CHANGE HISTORY: ----------------------- 8.1 VERSION NO: V5.17 CHANGE DATE: 10/15/94 PROGRAMMER NAME: DIANE LIVELY PROGRAM CHANGE REQUEST NO: 14673 DESCRIPTION OF CHANGE: FRS VERSION OF ACC973. 8.2 VERSION NO: V6.01 CHANGE DATE: 02/15/96 PROGRAMMER NAME: DIANE LIVELY PROGRAM CHANGE REQUEST NO: 16469 DESCRIPTION OF CHANGE: PROGRAM CHANGED TO HANDLE BUDGET TRANSFERS (RECORD TYPE 4) AS PRINTED BUT NOT COUNTED IN ANY TOTALS. 8.3 RELEASE V7.02 DATE 09/16/98 PROGRAMMER DIANE LIVELY, JSRCC REQUEST NO NONE DESCRIPTION CHANGED PROGRAM FOR THE NEW COMPILER AND Y2K.