0.002/01/90 DIANE LIVELY
1.0  PROGRAM NARRATIVE
     -----------------

          THIS PROGRAM PRINTS AN 'OVER-BUDGET WARNING' REPORT FOR COST
     CENTER MANAGERS.

          THE PROGRAM READS THE BUDGET ITEM SEGMENTS FOR THE BUDGET
     YEAR SPECIFIED ON THE PARMCARD.  IT TOTALS THE BUDGET, ENCUMBRANCE,
     EXPENDITURE, AND BALANCE AMOUNTS FOR EACH DEPARTMENT.  IF THE
     BALANCE IS NEGATIVE, THE DEPARTMENT WILL BE PRINTED ON THE REPORT.
     FIELDS PRINTED ON THE REPORT INCLUDE CAMPUS, DEPARTMENT, DEPARTMENT
     NAME, BUDGET AMOUNT, ENCUMBRANCE AMOUNT, EXPENDITURE AMOUNT, AND
     THE AMOUNT OVER BUDGET.  A PAGE IS PRINTED FOR EACH COST CENTER
     SHOWING COST CENTER NAME, MANAGER NAME, AND COST CENTER TOTALS.

          THE BUDGET CAMPUS SEGMENT (CAMPUS 1) IS READ FOR THE COLLEGE
     NAME.  THE PROGRAM OPTION SEGMENT FOR THE BUDGET YEAR IS READ
     TO OBTAIN THE DATE THE DATA BASE WAS LAST UPDATED BY ACC310.
     THE CAMPUS/DEPARTMENT MASTER IS READ FOR THE DEPARTMENT NAME.
     THE COST CENTER MASTER IS READ FOR THE COST CENTER NAME AND
     MANAGER NAME.

2.0  SAMPLE JCL:
     ----------

     2.1  RUN JCL
          -------

          //XXACC955  JOB (WWWW,XXXX,9,29),ACC955,
          //        MSGCLASS=A,CLASS=F,PRTY=3
          /*ROUTE  PRINT YYYYYYYY
          //ACC955  EXEC ACC955,
          //    AGENCY=DDD,
          //    COLLEGE=DD,
          //    COPIES=1,
          //    FORM=A000,
          //    QUEUE='*',
          //    RUNTYPE=PROD,
          //    DBTYPE=PROD,
          //    SRTSIZE=3
          //ACC955.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. 8788)


3.0  JOB SETUP INSTRUCTIONS:
     ----------------------

     SPECIAL FORMS QUEUE:      STANDARD

     FORMS BUFFER:             STANDARD

     ALIGNMENT INSTRUCTIONS:   STANDARD

     PRINTED OUTPUT:           OVER BUDGET WARNING

     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.  CTLDEPT  (READ ONLY)
          3.  CTLCSTCR (READ ONLY)
          4.  CTLPROPT (READ ONLY)

          ACCOUNTING DATA BASE
          1.  ACBBUDGT (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 - ACC955
          NO PARM RECORD
          *** FATAL ERROR - ACC955

     5.2  *** FATAL ERROR - ACC955
          BUDGET YEAR ON PARMCARD IS INVALID
          *** FATAL ERROR - ACC955

          MEANING - THE BUDGET YEAR ON THE PARMCARD IS NOT NUMERIC OR
                    ENDING YEAR SUBTRACTED BY BEGINNING YEAR DOES NOT
                    EQUAL +1.

     5.3  PROGRAM OPTION SEGMENT NOT FOUND

          MEANING - WHEN THE PROGRAM OPTION SEGMENT IS FOUND, THE
                    "AS OF" DATE IS SHOWN IN THE HEADING.  EVERY
                    BUDGET YEAR ON THE DATA BASE SHOULD HAVE A PROGRAM
                    OPTION SEGMENT.

6.0  SPECIAL FEATURES
     ----------------
     6.1  CALLING PROGRAMS: NONE
     6.2  SUBPROGRAMS CALLED:  NONE
     6.3  MESSAGE SEGMENT CODES: NONE

7.0  PROGRAM OPTIONS:
     ----------------
     ACCS0XX - 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      UPDATE      Y      ACC100 CAN BE USED TO UPDATE DATA
                           N      DO NOT ALLOW ONLINE UDPATE

       3-10    DATE     XX/XX/XX  DATE ACC310 LAST UPDATED THE DATA


8.0  PROGRAM CHANGE HISTORY:
     -----------------------

     8.1  VERSION NO:                V4.08
          CHANGE DATE:               10/25/89
          PROGRAMMER NAME:           DIANE LIVELY
          PROGRAM CHANGE REQUEST NO: 4198
          DESCRIPTION OF CHANGE:     RELEASE VERSION

     8.2  VERSION NO:                V4.09
          CHANGE DATE:               12/01/89
          PROGRAMMER NAME:           DIANE LIVELY
          PROGRAM CHANGE REQUEST NO: 4523
          DESCRIPTION OF CHANGE:     CORRECTED LOAD LIBRARY NAME IN
            PROC.  CHANGED TOTAL FROM 'TOTAL COST CENTER' TO 'TOTAL
            OVER-BUDGET'.