0.005/15/91 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 CAMPUS/DEPARTMENT, 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.

          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
     CAMPUS-DEPARTMENT CODE.  THE RECORDS ARE SORTED BY COST CENTER,
     CAMPUS/DEPARTMENT, TYPE OF RECORD (BUDGET, ENCUMBRANCE, OR
     EXPENDITURE) AND THE TRANSACTION DATE.  OTHER FIELDS SHOWN INCLUDE
     TRANSACTION DESCRIPTION, REQUISITION 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 CAMPUS/DEPARTMENT MASTER IS
     READ FOR THE 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 ACC310.

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

     2.1  RUN JCL
          -------

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

       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)
          5 - 8       CAMPUS/DEPARTMENT CODE TO EXCLUDE


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

     SPECIAL FORMS QUEUE:      STANDARD

     FORMS BUFFER:             STANDARD

     ALIGNMENT INSTRUCTIONS:   STANDARD

     PRINTED OUTPUT:           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.  CTLDEPT  (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 - ACC973
          NO PARM RECORD
          *** FATAL ERROR - ACC973

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

          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  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.

     5.4  *** FATAL ERROR - ACC973
          CAMPUS/DEPT ON PARMCARD IS INVALID
          *** FATAL ERROR - ACC973

          MEANING:  THE CAMPUS/DEPT ON THE PARMCARD TO EXCLUDE WAS
                    NOT FOUND IN THE CONTROL DATA BASE.



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.23
          CHANGE DATE:               05/15/91
          PROGRAMMER NAME:           DIANE LIVELY
          PROGRAM CHANGE REQUEST NO: 7754
          DESCRIPTION OF CHANGE:     RELEASE VERSION