0.010/01/88 ANNE JONES, TNCC
1.0  PROGRAM NARRATIVE
     -----------------

          THIS PROGRAM PRINTS AN EXPENDITURE REGISTER FOR A SPECIFIED
     BUDGET YEAR BY COST CENTER IN TRANSACTION DATE ORDER.  THE PROGRAM
     TOTALS THE EXPENDITURE AMOUNT FOR EACH DEPARTMENT WITHIN THE COST
     CENTER AND FOR EACH COST CENTER.  THERE IS A PAGE BREAK ON COST
     CENTER.  AT THE END OF THE REPORT, THE GRAND TOTAL AMOUNT IS
     PRINTED.

          THE PROGRAM READS THE BUDGET ITEM SEGMENTS AND TRANSACTIONS
     IN THE ACCOUNTING BUDGET DATA BASE.  A DETAIL LINE IS PRINTED
     FOR EACH TRANSACTION WITH RECORD TYPE '3' FOR THE BUDGET YEAR
     SPECIFIED ON THE PARMCARD.  FIELDS PRINTED INCLUDE COST CENTER,
     CAMPUS, DEPARTMENT, APPROPRIATION, SUB-PROGRAM, OBJECT CODE,
     TRANSACTION DESCRIPTION (VENDOR), DATE, REQUISITION NUMBER,
     PURCHASE ORDER NUMBER, VOUCHER NUMBER, STATUS CODE, AND
     TRANSACTION AMOUNT.  THE DATA IS SORTED BY APPROPRIATION, COST
     CENTER, DEPARTMENT, TRANSACTION DATE AND VOUCHER NUMBER.

          THE COLLEGE HEADING IS OBTAINED FROM BUDGET CAMPUS MASTER
     IN THE CONTROL DATA BASE (CAMPUS 1).  THE PROGRAM OPTION SEGMENT
     FOR THE BUDGET YEAR IS READ FOR THE DATE THE DATA BASE WAS LAST
     UPDATED BY ACC310.

          THIS PROGRAM IS WRITTEN IN DYL-280.
*
2.0  SAMPLE JCL:
     ----------

     2.1  RUN JCL
          -------

          //XXACC934  JOB (WWWW,XXXX,9,29),ACC934,
          //        MSGCLASS=A,CLASS=F,PRTY=3
          /*ROUTE  PRINT YYYYYYYY
          //ACC934  EXEC ACC934,
          //    AGENCY=DDD,
          //    COLLEGE=DD
          //ACC934.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)

       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:           EXPENDITURE REGISTER BY COST CENTER

     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.  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  "PARMCARD INVALID"

          MEANING - THE BUDGET YEAR ON THE PARMCARD WAS NOT NUMERIC

     5.2  "NO RECS FOUND FOR YR"

          MEANING - THERE WERE NO BUDGET ITEM SEGMENTS FOUND FOR
                    THE BUDGET YEAR SPECIFIED ON THE PARMCARD

     5.3  "OPTION NOT FOUND"

          MEANING - THE PROGRAM OPTION SEGMENT FOR THE BUDGET YEAR
                    WAS NOT FOUND.  EVERY BUDGET YEAR ON THE DATA
                    SHOULD HAVE A PROGRAM OPTION SEGMENT.

     5.4  "NO EXP TRANS FOUND"

          MEANING - THERE WERE NO TRANSACTIONS FOUND WITH RECORD
                    TYPE 3.

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:                V3.13
          CHANGE DATE:               09/13/88
          PROGRAMMER NAME:           ANNE JONES, TNCC
          PROGRAM CHANGE REQUEST NO: NONE
          DESCRIPTION OF CHANGE:     RELEASE VERSION