DISCAS RELEASE 39.0
                        DISCAS CONSOLIDATION - PHASE V

      Formal Release 39.0 contains the final database modifications
      necessary for Accounting Consolidation.  Field office has been
      added to the BILLS and TRIP-RECORD data sets.  This release
      also contains CAP's statistical sampling and AMEX comparison
      process.  The Z user modifications needed for payment
      processing and other miscellaneous problem reports and change
      requests are also included.  Any problems encountered during
      the installation or testing of the release should be reported
      via HPDesk using the DISCAS distribution list.  Questions
      should be directed to Laura Kramer (CFS) 301-903-9932, Chip
      Wilson (CFS) 301-903-0545, or Linda Keller (CFS) 301-903-5281.

      Modifications made since the issuance of Test Release T32.0
      are denoted by '*' throughout the document.

      The following SPR/SCRs were added to Formal Release 39.0 since
      the issuance of T32.0:

      CR97-166       ER97-172       PR97-193       CR98-0006
      PR98-0011      PR98-0017      CR98-0025      PR98-0037
      CR98-0040      PR98-0042      PR98-0046      CR98-0048
      PR98-0050      PR98-0052      PR98-0053      PR98-0056
      PR98-0059      CR98-0061      PR98-0063      PR98-0064
      DP98-8005      DP98-8006


      I.    PROGRAMS

      The following programs were compiled under the MPE/iX
      (C.55.00) Operating System and the associated COBOL II/iX
      compiler (HP31500A.04.16).


      LIST OF PR/CR/ER NUMBERS INCLUDED IN RELEASE 39.0

      CR97-081       CR97-159       CR97-160       CR97-180
      CR97-187       CR98-0004      CR98-0007      CR98-0013
      CR98-0025      CR98-0035      CR98-0036      CR98-0038
      CR98-0041      ER97-084       PR97-094       PR97-188
      PR98-0003      PR98-0005      PR98-0028      PR97-0029
      PR98-0047      CR98-0049

      Copies of the PR/CR/ERs can be retrieved from the HPDesk
      Bulletin Board area.  They are located in yearly folders
      (i.e., CORE 1997, CORE 1996, etc.) inside of the DISCAS
      subject area.  If PR/CR/ER retrieval assistance is required,
      please contact Linda Keller on 301-903-5281.



      PROGRAM                       SUMMARY OF CHANGES
      ********          *********************************************
      AMEXCOMP    -     New command file used to execute the AMEX
                        comparison.  (CR98-0035)

      AMEXEDIT    -     New command file used to execute the AMEX
                        comparsion.  (CR98-0035)

*     ARACHRR     -     Modified to not Email to blank generic
                        addresses.  (CR98-0006)
                        BUILD  : BLDACHRR

      ARACHSU     -     Modified to initialize the ECS switch if the
                        external file value is blank.  (CR98-0007)
                        BUILD  : BLDACHSU

*     ARBATPAY    -     Added Z user logic for payment processing.
                        (ER97-172)
                        COMPILE: COMPPAY
                        BUILD  : BLDFORS

      ARBILLDU    -     Corrected a compile error that resulted from
                        the field office being added to the BILLS data
                        set.  (CR97-159)
                        COMPILE: COMPBILL
                        BUILD  : BLDFORS

      ARBILLOG    -     Added field office to the BILLS data set.
                        (CR97-159)
                        COMPILE: COMPUTIL
                        BUILD  : BLDUTIL

*     ARCIDREC    -     Modified to disallow the recast of contract
                        type CIDs to miscellaneous CIDs and
                        miscellaneous CIDs to contract type CIDs.
                        Recast is allowed for contract type to
                        contract type CIDs, except for the General
                        Ledger.  (CR98-0025)
                        COMPILE: COMPRCST
                        BUILD  : BLDUTIL

*     ARCMPFIS    -     Increased the maximum record count for
                        FISCMPRE to 200,000.  (CR98-0061).
                        COMPILE: COMPFIS
                        BUILD  : BLDFIS

*     ARCOSTAC    -     Included object class from SUMM-BNR for the
                        accrual entries.  (CR98-0041)
                  -     Initialized DAT-LAST-RECAST.  (PR98-0059)
                  -     Changed XID counter to a 9(3) field.
                        (PR98-0064)
                        COMPILE: COMPCOST
                        BUILD  : BLDFORS

*     ARCSTUPD    -     Added Z user logic.  (CR97-166)
                  -     Added object class in SUMM-BNR for 84 BNRs.
                        (CR98-0048)
                  -     Modified to use the FIN-PLAN-SYMBOL item name
                        to ensure the move corresponding will work
                        correctly.  (PR98-0063)
                        COMPILE: COMPFIS
                        BUILD  : BLDFIS

*     ARDISCAL    -     Added Z user logic for payment processing.
                        (ER97-172)
                        COMPILE: COMPPAY
                        BUILD  : BLDFORS

      ARDUNNOT    -     Added code to restrict the dunning processing
                        in a consolidated environment.  (CR97-159)
                        BUILD  : BLDDUNN

      ARENTASD    -     Modified to detect duplicates and allow
                        modification of the waiver flag.  (PR97-188)
                        COMPILE: COMPTABL
                        BUILD  : BLDFORS

*     ARENTDCA    -     Corrected code so 9941/9942 entries are
                        generated when appropriate.  (PR97-193)
                        COMPILE: COMPFIS
                        BUILD  : BLDFIS

      ARENTFIS    -     Modified to properly set the NINES-INDICATOR.
                        (PR98-0029)
                        COMPILE: COMPFIS
                        BUILD  : BLDFIS

*     ARENTOP     -     Added Z user logic for payment processing.
                        (ER97-172)
                        COMPILE: COMPFUND
                        BUILD  : BLDADV
                                 BLDFORS
                                 BLDTRAV

*     ARENTORD    -     Added error message to stop process and alert
                        user when an entry is attempted with a fund
                        type of 58 and the waiver flag is yes.
                        (PR98-0037)
                  -     Corrected problem where the description and
                        debtor information was not correctly updating
                        the REIMB-MM when an entry without the CID
                        consecutively followed an entry with a CID.
                        (PR98-0042)
                        COMPILE: COMPFUND
                        BUILD  : BLDADV
                                 BLDFORS
                                 BLDTRAV

*     ARENTPC     -     Modified to determine object class for data
                        retrieval.  (CR98-0038)
                  -     Added Z user logic for payment processing.
                        (ER97-172)
                        COMPILE: COMPFUND
                        BUILD  : BLDADV
                                 BLDFORS
                                 BLDTRAV

*     ARENTREC    -     Added Z user logic for payment processing.
                        (ER97-172)
                        COMPILE: COMPFUND
                        BUILD  : BLDADV
                                 BLDFORS
                                 BLDTRAV

*     ARENTRW     -     Modified to determine object class for data
                        retrieval.  (CR98-0038)
                  -     Added Z user logic for payment processing.
                        (ER97-172)
                        COMPILE: COMPFUND
                        BUILD  : BLDADV
                                 BLDFORS
                                 BLDTRAV

*     ARENTTVL    -     Incorporated field office in TRIP-RECORD.
                        (CR97-160)
                  -     Modified to initialize field office in the
                        TRIP-RECORD add routine.  (DP98-8005)
                        COMPILE: COMPTVUP
                        BUILD  : BLDTRAV

*     ARENTVOU    -     Added Z user logic for payment processing.
                        (ER97-172)
                        COMPILE: COMPFUND
                        BUILD  : BLDADV
                                 BLDFORS
                                 BLDTRAV

      ARFISBAL    -     Added field office to the TABLE-MM entry for
                        cost centers.  (CR97-180)
                        COMPILE: COMPFIS
                        BUILD  : BLDFIS

      ARFISCMB    -     Added field office to the TABLE-MM entry for
                        cost centers.  (CR97-180)
                        COMPILE: COMPFIS
                        BUILD  : BLDFIS

*     ARINVTRK    -     Added self validation to auto generated
                        payment entries.  (CR98-0013)
                  -     Added Z user logic for payment processing.
                        (ER97-172)
                        COMPILE: COMPPAY
                        BUILD  : BLDFORS

*     ARLOG       -     Added Z user logic for payment processing.
                        (ER97-172)
                        COMPILE: COMPPAY
                        BUILD  : BLDFORS

*     ARLOGTRK    -     Added self validation to auto generated
                        payment entries.  (CR98-0013)
                  -     Added Z user logic for payment processing.
                        (ER97-172)
                        COMPILE: COMPPAY
                        BUILD  : BLDFORS

      ARMANADV    -     Removed garbage from line 7 on the second page
                        of the input screen.  (PR98-0003)
                        COMPILE: COMPADV
                        BUILD  : BLDADV

*     ARMODLOG    -     Added Z user logic for payment processing.
                        (ER97-172)
                        COMPILE: COMPPAY
                        BUILD  : BLDFORS

*     AROBLREF    -     Added Z user logic for payment processing.
                        (ER97-172)
                  -     Corrected code to properly create a new OBLIG-
                        REF using an existing DUNS-NUMBER having a
                        related retired OBLIG-REF.  (PR98-0017)
                  -     Corrected code to create a new OBLIG-REF using
                        an existing DUNS-NUMBER.  (PR98-0056)
                        COMPILE: COMPOBLI
                        BUILD  : BLDFIS
                                 BLDFORS

      ARRCBNR     -     Modified to not continue checking the USER-REF
                        after a match has been found.  (CR98-0049)
                        COMPILE: COMPRCST
                        BUILD  : BLDRCBNR
                                 BLDUTIL

*     ARRPTPAY    -     Added Z user logic for payment processing.
                        (ER97-172)
                        COMPILE: COMPPAY
                        BUILD  : BLDFORS

*     ARSIGFND    -     Added Z user logic for payment processing.
                        (ER97-172)
                        COMPILE: COMPFUND
                        BUILD  : BLDADV
                                 BLDFORS
                                 BLDTRAV

      ARTBLUPD    -     Added field office to the cost centers.
                        (CR97-180)
                        COMPILE: COMPTABL
                        BUILD  : BLDFORS

      ARTMINTF    -     Added logic (TYPE-TRANSACTION P or PF) to
                        accommodate vouchers for blanket and detail
                        travel claims.  (ER97-084)
                  -     Incorporated field office in TRIP-RECORD.
                        (CR97-160)
                  -     Added field office to the TABLE-MM entry for
                        cost centers.  (CR97-180)
                  -     Fixed divide by zero error, caused by
                        incorrect data from the TM+ software.
                        (PR98-0047)
                        BUILD  : BLDTM

*     ARTRAVPY    -     Corrected to retrieve object class from
                        SUMM-BNR when creating FUNDING payment
                        entries.  (PR98-0028)
                  -     Added Z user logic for payment processing.
                        (ER97-172)
                        COMPILE: COMPPAY
                        BUILD  : BLDFORS

*     ARVALDT     -     Added override prompt when transaction amount
                        exceeds TVLPOT allocation amount.  (PR97-094)
                  -     Added Z user logic for payment processing.
                        (ER97-172)
                  -     Modified TVLPOT allocation edit.  (DP98-8006)
                        COMPILE: COMPVALT
                        BUILD  : BLDADV
                                 BLDFORS
                                 BLDTRAV

*     ARVALEXP    -     Added override prompt when transaction amount
                        exceeds TVLPOT allocation amount.  (PR97-094)
                  -     Added Z user logic for payment processing.
                        (ER97-172)
                  -     Modified TVLPOT allocation edit.  (DP98-8006)
                        COMPILE: COMPVALT
                        BUILD  : BLDADV
                                 BLDFORS
                                 BLDTRAV

*     ARXNFIX     -     Added Z user logic for payment processing.
                        (ER97-172)
                        COMPILE: COMPEDVL
                        BUILD  : BLDADV
                                 BLDFORS
                                 BLDTRAV

      BLDADV      -     Removed limit size on RL build statement and
                        added WHOISRL.  (CR98-0036)

      BLDAMEX     -     New build job for the AMEX comparison reports
                        (RPTAMEXC).  (CR98-0035)

      BLDFORS     -     Removed limit size on RL build statement and
                        added WHOISRL.  (CR98-0036)

      BLDSAMPL    -     New build job for STATSAMP.  (CR98-0036)

      BLDSTAT2    -     New build job for STATLTR2.  (CR98-0036)

      BLDSTAT6    -     New build job for STATLTR6.  (CR98-0036)

      BLDTRAV     -     Removed limit size on RL build statement and
                        added WHOISRL.  (CR98-0036)

*     COMPAR39    -     Compare job for Release 39.0.

*     COREFILE    -     Modified for Release 39.0.

*     DISCFIS     -     Modified to increase the MARSRT1 file to
                        200,000.  (CR98-0061)

*     EDITFR19    -     Added Z user logic for payment processing.
                        (ER97-172)
                        COMPILE: COMPEDIT
                        BUILD  : BJALLGL   BJEOYCDR  BJEOYGL
                                 BJEOYTB   BLDACHPC  BLDADV
                                 BLDARFIL  BLDBUD    BLDFIS
                                 BLDFORS   BLDINVST  BLDPPR
                                 BLDRPT    BLDSCX1A  BLDSCX1C
                                 BLDSCX1O  BLDSCX1P  BLDSCX1R
                                 BLDSCX25  BLDTM     BLDTRAV
                                 BRPTDET

      EMORIG      -     New file containing E-Mail 'from' address.
                        (CR98-0036)

*     FORSCOMM    -     Modified copylib member for comparison and
                        reference purposes.  (ER97-172)

*     INEOYCDR    -     Modified to initialize USER-CODE-IND.
                        (ER97-172)
                        BUILD  : BJEOYCDR

*     INITALOT    -     Modified to initialize USER-CODE-IND.
                        (ER97-172)
                        BUILD  : BRCALOT

*     INITBUD     -     Modified to initialize USER-CODE-IND.
                        (ER97-172)
                        COMPILE: COMPFBUD
                        BUILD  : BLDBUD

*     INITCDR     -     Modified to initialize USER-CODE-IND.
                        (ER97-172)
                        BUILD  : BLDFSCDR

*     INITFORS    -     Modified to initialize USER-CODE-IND.
                        (ER97-172)
                        COMPILE: COMPFADV  COMPFFIS  COMPFORS
                                 COMPFTVL  COMPFRPT  COMPFUT
                        BUILD  : BLDADV    BLDFIS    BLDFORS
                                 BLDTRAV   BLDRPT    BLDUTIL

*     INITPP      -     Modified to initialize USER-CODE-IND.
                        (ER97-172)
                        COMPILE: COMPFPP
                        BUILD  : BLDPPR

*     INITTBOP    -     Modified to initialize USER-CODE-IND.
                        (ER97-172)
                        BUILD  : BTBOPEN2

*     INTALLGL    -     Modified to initialize USER-CODE-IND.
                        (ER97-172)
                        BUILD  : BJALLGL

*     INTBATCH    -     Modified to initialize USER-CODE-IND.
                        (ER97-172)
                        COMPILE: COMPBTCH
                        BUILD  : BARFDSIN  BBADBNR   BBADPNE
                                 BBNRCHK   BCHKCID   BCONSEC
                                 BCX1RES   BDBP16FX  BDRWDOWN
                                 BDSETLOK  BFISEDT   BFIXCMB
                                 BGL2TB    BINVREP   BIRSFUND
                                 BJBILDEL  BJDEBDEL  BJDELEMP
                                 BJFYCLOS  BJRECDEL  BJYYTOXX
                                 BLD66CL   BLD66ETP  BLD66PC
                                 BLD66RB   BLD66RR   BLD66RT
                                 BLD66RV   BLD66SU   BLD66TP
                                 BLDACETP  BLDACHCR  BLDACHDU
                                 BLDACHOV  BLDACHPC  BLDACHRR
                                 BLDACHRV  BLDACHSU  BLDACHTP
                                 BLDARFIL  BLDDELFP  BLDDNTC
                                 BLDDUNN   BLDFNDCL  BLDFXBNR
                                 BLDGENCL  BLDGLSTR  BLDMEMO
                                 BLDNFNCL  BLDPCSI   BLDPPFED
                                 BLDRPTPG  BLDSCX10  BLDSCX11
                                 BLDSCX12  BLDSCX13  BLDSCX14
                                 BLDSCX15  BLDSCX16  BLDSCX17
                                 BLDSCX18  BLDSCX19  BLDSCX1A
                                 BLDSCX1C  BLDSCX1O  BLDSCX1P
                                 BLDSCX1R  BLDSCX20  BLDSCX21
                                 BLDSCX22  BLDSCX23  BLDSCX24
                                 BLDSCX25  BLDSCX26  BLDSCX27
                                 BLDSCX28  BLDSCX29  BLDSCX2A
                                 BLDSCX2D  BLDSCX2N  BLDSCX2O
                                 BLDSCX2R  BLDSCX3C  BLDSCX3N
                                 BLDSCX3O  BLDSCX4   BLDSCX5
                                 BLDSCX7   BLDSCX9   BLDTBCID
                                 BLDTM     BLDXREF3  BOTVLETR
                                 BP087     BRPTDET   BRPTFTVL
                                 BTBCID

*     INTEOYGL    -     Modified to initialize USER-CODE-IND.
                        (ER97-172)
                        BUILD  : BJEOYGL

*     INTEOYTB    -     Modified to initialize USER-CODE-IND.
                        (ER97-172)
                        BUILD  : BJEOYTB

*     INTFISED    -     Modified to initialize USER-CODE-IND.
                        (ER97-172)
                        BUILD  : BFISBAL

*     INTRCPT     -     Modified to initialize USER-CODE-IND.
                        (ER97-172)
                        BUILD  : BLDRCPT

*     INTRINVS    -     Modified to initialize USER-CODE-IND.
                        (ER97-172)
                        BUILD  : BLDINVST

      JAMEXTR     -     New job stream for the AMEX comparison
                        reports.  (CR98-0035)

      JAMEXTRT    -     New job stream for the AMEX comparison
                        reports.  (CR98-0035)

      JSSAMPLE    -     New job stream to execute STATSAMP (stat
                        sampling process).  (CR98-0036)

      JSTATLT6    -     New job stream to execute STATLTR6 (60 day
                        followup stat sampling report).  (CR98-0036)

      JSTATLTR    -     New job stream to execute STATLTR2 (30 day
                        notice stat sampling report).  (CR98-0036)

      LJ209L      -     Laser jet environment file necessary to print
                        the AMEX comparison reports and stat sampling
                        reports.  (CR98-0035, CR98-0036)

      LOADAMEX    -     New command file to transfer the American
                        Express transaction file to the HP for use in
                        the AMEX comparison reports and stat sampling
                        process.  (CR98-0035)

      LP209P      -     Line printer environment file necessary to
                        print the AMEX comparison reports and stat
                        sampling reports.  (CR98-0035, CR98-0036)

      REJCODE     -     Added two new rejections codes.  (CR98-0036)

*     REL39DOC    -     Installation instructions for Release 39.0.

      RPTAMEXC    -     New reports comparing DISCAS and American
                        Express data.  (CR98-0035)
                        BUILD  : BLDAMEX

      RPTFSCDR    -     Added object class to the Contract Data
                        Reports.  (CR98-0004)
                        COMPILE: COMPRPT5
                        BUILD  : BJEOYCDR
                                 BLDFSCDR
                                 BLDRPT
                                 BLDUTIL

*     SAFCALC     -     Added Z user logic for payment processing.
                        (ER97-172)
                        COMPILE: COMPFUND
                        BUILD  : BLDADV
                                 BLDFORS
                                 BLDTRAV
                                 BLDARFIL

      SAPPLYX     -     Added logic for the Non-Fund record to carry
                        the order number value if an asterisk exists
                        in the order number field of the standard map.
                        (PR98-0005)
                        COMPILE: COMPVALT
                        BUILD  : BLDADV
                                 BLDFORS
                                 BLDTRAV

*     SBALUPD     -     Added Z user logic for payment processing.
                        (ER97-172)
                        COMPILE: COMPVALT
                        BUILD  : BLDADV
                                 BLDFORS
                                 BLDTRAV

      SBATBIL     -     Added code to restrict batching of receivables
                        in a consolidated environment.  (CR97-159)
                        COMPILE: COMPBILL
                        BUILD  : BLDFORS

*     SCF66EX     -     Added Z user logic for payment processing.
                        (ER97-172)
                        COMPILE: COMPPAY
                        BUILD  : BLDFORS

*     SCNTXALL    -     Added Z user logic for payment processing.
                        (ER97-172)
                        COMPILE: COMPFUND
                        BUILD  : BLDADV
                                 BLDFORS
                                 BLDTRAV

*     SCX24RCR    -     Corrected code that reported balanced records
                        as being out of balance.  (PR98-0050)
                        BUILD  : BLDSCX24

*     SEDITFE     -     Added entry 'EDITUSERREFFO' that obtains
                        USER-REF data based on the passed field office
                        of the data record.  (CR98-0049)
                  -     Added field office to the TABLE-MM entry for
                        cost centers.  (CR97-180)
                  -     Added Z user logic for payment processing.
                        (ER97-172)
                        COMPILE: COMPEDIT
                        BUILD  : BFISEDT   BJALLGL   BJDELEMP
                                 BJEOYCDR  BJEOYGL   BJEOYTB
                                 BJFYCLOS  BLDACHPC  BLDADV
                                 BLDARFIL  BLDBUD    BLDFIS
                                 BLDFORS   BLDFSCDR  BLDINVST
                                 BLDPPR    BLDRPT    BLDSCX1A
                                 BLDSCX1C  BLDSCX1O  BLDSCX1P
                                 BLDSCX1R  BLDSCX25  BLDTM
                                 BLDTRAV   BRPTDET

*     SFENTCOM    -     Modified to properly detect if a user is not
                        allowed to enter a prior month entry.
                        (PR98-0046)
                        COMPILE: COMPFUND
                        BUILD  : BLDADV
                                 BLDFORS
                                 BLDTRAV

*     SGENBIL     -     Added field office to the BILLS data set, and
                        added code to restrict the bill generation in
                        a consolidated environment.  (CR97-159)
                  -     Modified to delete REIMB-WORK entries if the
                        BILLS entry zeros the bill amount and all
                        other amounts are zero.  (PR98-0053)
                        COMPILE: COMPBILL
                        BUILD  : BLDFORS

*     SINVPAY     -     Added Z user logic for payment processing.
                        (ER97-172)
                        COMPILE: COMPPAY
                        BUILD  : BLDFORS

      SINVTRK     -     Added self validation to auto generated
                        payment entries.  (CR98-0013)
                        COMPILE: COMPPAY
                        BUILD  : BLDFORS

      SPRTBIL     -     Added code to restrict the printing of bills
                        and dunnings in a consolidated environment.
                        (CR97-159)
                        COMPILE: COMPBILL
                        BUILD  : BLDFORS

      SRCCOPY     -     Modified to activate validity edit 6 and also
                        modified validity edit 24.  (CR97-081)
                  -     Added field office to the TABLE-MM entry for
                        cost centers.  (CR97-180)
                        BUILD  : BLDSRCCP

      SRCGLTB     -     Retrieved GL-RECAST-FLAG based on the
                        BNR-RECAST record not the user-id.
                        (CR98-0049)
                        COMPILE: COMPRCST
                        BUILD  : BLDRCBNR
                                 BLDUTIL

*     SREJVOU     -     Modified to incorporate stat sampling process.
                        (CR98-0036)
                  -     Modified to bypass blank FUNDING XIDs when
                        doing the related transaction lookup.
                        (PR98-0052)
                        COMPILE: COMPFUND
                        BUILD  : BLDADV
                                 BLDFORS
                                 BLDTRAV

*     SRPTVALP    -     Added Z user logic for payment processing.
                        (ER97-172)
                        COMPILE: COMPPAY
                        BUILD  : BLDFORS

      STATLET2    -     New form letter file used to generate the 30
                        day notices (stat sampling).  (CR98-0036)

      STATLETR    -     New form letter file used to generate the post
                        payment audit letter (stat sampling).
                        (CR98-0036)

      STATLTR2    -     New program to generate the 30 day notices
                        (stat sampling).  (CR98-0036)
                        BUILD  : BLDSTAT2

      STATLTR6    -     New program to generate the 60 day travelers
                        follow-up report (stat sampling).  (CR98-0036)
                        BUILD  : BLDSTAT6

      STATSAMP    -     New program for the stat sampling process.
                        Allows selection, tracking, and follow-up of
                        travel vouchers eligible for audit.
                        (CR98-0036)
                        BUILD  : BLDSAMPL

      STATVERI    -     New form letter to generate the travel
                        verification (SREJVOU).  (CR98-0036)

      SUNDOBIL    -     Added code to restrict the ungeneration of
                        bills in a consolidated environment.
                        (CR97-159)
                        COMPILE: COMPBILL
                        BUILD  : BLDFORS

*     SUPBNR      -     Added Z user logic for payment processing.
                        (ER97-172)
                        COMPILE: COMPVALT
                        BUILD  : BLDADV
                                 BLDFORS
                                 BLDTRAV

*     SUPPOT      -     Added Z user logic for payment processing.
                        (ER97-172)
                        COMPILE: COMPVALT
                        BUILD  : BLDADV
                                 BLDFORS
                                 BLDTRAV

*     SUPREIMB    -     Modified to include BNR and cost center when
                        checking for unbilled receivables.
                        (CR98-0040)
                        COMPILE: COMPVALT
                        BUILD  : BLDADV
                                 BLDFORS
                                 BLDTRAV

*     SVALID      -     Modified to edit BNRs for advice entries.
                        (CR97-187)
                  -     Added Z user logic for payment processing.
                        (ER97-172)
                        COMPILE: COMPVALT
                        BUILD  : BLDADV
                                 BLDFORS
                                 BLDTRAV

*     TVL8004S    -     Initialized TRANS-CLASS-CODE and DAT-LAST-
                        RECAST fields in FUNDING, and moved the
                        current date to DAT-LAST-ACTION.  (PR98-0011)
                        COMPILE: COMPTVUP
                        BUILD  : BLDTRAV


      II.   DATABASE ADDITIONS AND MODIFICATIONS

      A.    The following data item has been added to the BILLS and
            TRIP-RECORD data sets in FINDB:

                  FIELD-OFFICE


      B.    Prior to making the database changes:

            1.    Backup the FINDB database.

            2.    Set the file space limit for the database account
                  and the PUB group within the account, to unlimited.
                  Make sure there is enough available space on the
                  system to support an additional copy of the
                  database being modified.

            *******************************************************
            NOTE!!

            In making certain database changes, DBGENERAL creates a
            duplicate copy of the database being changed.  Therefore,
            the filespace for the account and PUB group within the
            account must be set to unlimited and the free space must
            exist on the system to ensure successful completion of
            the database changes.  If for any reason DBGENERAL cannot
            complete the database changes successfully and aborts the
            process, some of the data sets may be deleted, making it
            necessary to restore the database from a backup.  In
            addition, DBGENERAL will disable logging and remove the
            LOGID.
            *******************************************************


      C.    Modify FINDB

            Logon as the creator of the FINDB database in the PUB
            group to perform the following database changes.

            1.    Run DBUTIL.PUB.SYS to disable logging in the FINDB
                  database and to retrieve the user class/passwords
                  for FINDB.

                  Make sure you know the logid and its password
                  before logging is disabled.  To find this
                  information:

                  :RUN DBUTIL.PUB.SYS
                  >>SHOW FINDB LOGID
                  >>EXIT

                  :LISTLOG logid;PASS  (must be logged on as logid
                                        creator)


                  To disable logging:

                  :RUN DBUTIL.PUB.SYS
                  >>DISABLE FINDB FOR LOGGING
                  >>EXIT


            2.  Run DBGENERAL to modify the database.

               o  RUN DBGENRL.PUB.BRADMARK

                    - Enter the DBGENERAL password.


               o  Select option 5.4 (SETUP SET-ITEM CHANGES)

                   - Enter the database name: FINDB

                   - Enter the database password.

                   - Enter the dataset name:  BILLS

                   - Select function "A" - Add field

                           Item Name :  FIELD-OFFICE
                         Place After :  BILLING-NUM

                           Item Name :  <RETURN>


                   - Enter "E" to exit this option.

                   - The fields to be added are displayed.  If the
                     fields to be added are correct, press <RETURN>.
                     If the fields are not correct, follow the
                     instructions given by DBGENERAL to make
                     necessary corrections before proceeding to the
                     next step.

                   - When asked whether or not to save the items for
                     processing, enter "Y" and <RETURN>.


               o  Select option 5.4 (SETUP SET-ITEM CHANGES)

                   - Enter the database name: FINDB

                   - Enter the database password.

                   - Enter the dataset name:  TRIP-RECORD

                   - Select function "A" - Add field

                           Item Name :  FIELD-OFFICE
                         Place After :  ORG-CODE

                           Item Name :  <RETURN>

                   - Enter "E" to exit this option.

                   - The fields to be added are displayed.  If the
                     fields to be added are correct, press <RETURN>.
                     If the fields are not correct, follow the
                     instructions given by DBGENERAL to make
                     necessary corrections before proceeding to the
                     next step.

                   - When asked whether or not to save the items for
                     processing, enter "Y" and <RETURN>.


              o   Select option 5.6 (ACTIVATE CHANGES) from the
                  Master menu.

                   - Enter the database name: FINDB

                   - Enter the database password.

                   - Enter "Y" when asked if there is a backup of the
                     database.

                   - When prompted, select option 4 to proceed to
                     activate changes.

                   - When prompted, select option 1 to activate
                     structural changes by first generating the
                     schema file.

                   - Messages will be displayed indicating the
                     processing status.

                   - After the message "Schema file DBGSCMA
                     successfully created" is displayed, answer "Y"
                     to the prompt "Do you wish to continue? (Y/N)".

                   - Select the desired output for the compiled
                     schema listing.

                   - Messages will be displayed indicating the
                     processing status.

                     Messages to look for are:

                        NUMBER OF ERROR MESSAGES :  error count
                        ROOT FILE XDBGDB CREATED

                        XDBGDB work database successfully built

                        Performing internal consistency checks...

                        Estimating disk space required to implement
                        requested changes

                        Verifying file space available ...

                        NOTE! Sufficient disk space is available to
                        rebuild largest set

                   - Enter "Y" when prompted with:

                        Do you want to continue ? (Y/N)

                   - Messages will be displayed for each detail and
                     master as they are processed.  When completed,
                     the following message will be displayed:

                        Rename operation successfully completed

                        Structural changes successfully completed

                        Removing structural change requests from
                        control database ...

                        The next stage involves the creation of any
                        missing automatic master set entries and
                        building chains for all new paths.

                   - Message will be displayed:

                        No path changes necessary


               o  Exit DBGENERAL.


            3.    Run DBUTIL.PUB.SYS to enable logging in the FINDB
                  database.

                  To enable logging:

                  :RUN DBUTIL.PUB.SYS
                  >>ENABLE FINDB FOR LOGGING
                  >>EXIT


            4.    Run DDGEN to update COREDB.

                  o     Logon as the database creator in the PUB group
                        of the database account.

                  o     Check the DDGEN command file or UDC to ensure
                        that the DISC parameter on the TEMPCOPY FILE
                        statement is greater than or equal to 8000.

                  o     Run DDGEN.PUB to update the COREDB and the
                        copylib with the changes performed above.  The
                        program will show the four default databases;
                        enter the ones you are using - one per line
                        followed by a <RETURN>.  After the last one is
                        entered, enter a blank line.  DO NOT enter
                        COREDB as one of the databases.  Be sure to
                        include FINDB in the list of databases.

                  o     Upon successful completion of DDGEN:

                        :PURGE OLDCOPY
                        :RENAME ACCTCOPY,OLDCOPY
                        :RENAME TEMPCOPY,ACCTCOPY
                          (a group qualifier may be needed)


      III.  FORMSFILE MODIFICATIONS

            No formsfile modifications are required for this release.


*     IV.   COPYLIB MODIFICATIONS

            The FORSCOMM copylib member has been modified for this
            release.  The modified member has been included for
            reference as file, FORSCOMM.

            Using an editor, locate the last FORSCOMM line and add
            the following line to FORSCOMM:

            /T ACCTCOPY,UNN
            /A ??? (next available line number after the last
                    FORSCOMM line)
               02  USER-CODE-IND       PIC X(02).         FORSCOMM
            /K ACCTCOPY,UNN

            Stream the job BLDCOPY and BLDSRCCP to rebuild the
            copylibs.  In BLDCOPY, ensure that the DISC parameter on
            the file statement for FINCOPY is at least 8000.


      V.    INSTALLATION INSTRUCTIONS

      A.    PROGRAM NOTES

      The following programs contain site specific changes for
      installation of this release.

*     o     Program ARACHRR

            In WORKING-STORAGE, FOOTER-2 and FOOTER-3 contain site-
            specific customer service information.


      o     Program ARENTTVL

            In paragraph GET-TYPE-TRANS the STD-MAP-CODE in FUNDING
            must be changed to a site specific standard map code for
            travel entries with fund type starting with 4.  There are
            two report formats, and each site must determine which
            report will be used:  SOPTIONIIREPORT or SOPTIONIII-
            REPORT.  Replace the 'xx' with the TYPE-TRANSACTION to be
            used when the FUNDING record is created for local travel.


*     o     Program ARENTVOU

            In WORKING-STORAGE under FUNDING-INFO, STD-MAP-CODE
            variables and TYPE-TRANSACTION variables can be changed
            dependent on site needs.


      o     Program ARRCBNR

            The lockword and the group for JBNRRCST must be changed
            to the local lockword and group in the SELECT statement.


      o     Program ARTMINTF

            In WORKING-STORAGE, the ADD-EMPLOYEE-SWITCH variable can
            be changed to F (false) if your site does not wish to
            have the traveler added to the EMPLOYEE data set as a
            non-DOE employee when processing a Travel Authorization
            document.

            In WORKING-STORAGE, the PERIOD-OF-PAYMENT variable can be
            modified to reflect the site payment date preferred by
            each site.  This value is used to calculate the fourth
            and fifth positions of the payment DCS.

            In paragraph GET-TYPE-TRANS, the default value for the
            creation of the STD-MAP-CODE for FUND-TYPE 4A is O 10.
            The default value for the creation of the STD-MAP-CODE
            for FUND-TYPE 4x is O 60.  Consult program ARENTTVL for
            the values used at your site.


      o     Program ARTRAVPY

            In paragraph DETERMINE-STD-MAP-CODE, a site-specific
            change must be made for the standard map code depending
            upon the funding method of the entry.


      o     Programs ARVALDT and ARVALEXP

            In paragraph EDIT-EARLY-PAYMENT, the core version allows
            for a 7-day early payment, each site can independently
            modify this to another allotted time.

            The value of variable KEY-PARM should be changed to a
            local password to override the TVLPOT entries when
            amounts are varying.


*     o     Program SCF66EX

            During the certification process, when the payee's name
            is extracted, it is in LASTNAME, FIRSTNAME format.  In
            the program, the default flips so that it is printed as
            FIRSTNAME LASTNAME on the check.  If the site uses
            LASTNAME, FIRSTNAME, then modify the variable REQUEST-
            FLIP-FLAG to be N.

            The variable PR-ENCLOSURE should be modified to a 0
            (zero) if someone is picking up the checks at the
            Treasury Office directly; otherwise, PR-ENCLOSURE should
            be a 1 (one) for the checks to be delivered.


      o     Program SUNDOBIL

            Under the INTRINSIC FILE EQUATIONS part of WORKING-
            STORAGE, the group of the following files might need to
            be modified:  OPAC.PUB, GOALS.PUB, and BILPRINT.PUB.


      B.   MODIFY COMPILES/BUILDS/STREAM JOBS

      1.    The following files were modified for Release 39.0.  The
            complete file is included in this release or you may
            modify your site's version as follows:


            o   For BLDADV

            The following modification was made to the jobstream:

            BUILDRL RLBLDAD.PUB


            The following addition was made to the jobstream:

            COPYRL FROM=WHOISRL.PUB


            o   For BLDFORS

            The following modification was made to the jobstream:

            BUILDRL RLBLDFO.PUB


            The following addition was made to the jobstream:

            COPYRL FROM=WHOISRL.PUB


            o   For BLDTRAV

            The following modification was made to the jobstream:

            BUILDRL RLBLDTV.PUB


            The following addition was made to the jobstream:

            COPYRL FROM=WHOISRL.PUB


*           o   For DISCFIS

            The following modification was made to the command file:

            FILE MARSRT1;SHR;DISC=200000,32,1


      2.    Use the compare job COMPAR39 to compare your existing
            programs with the programs contained in this release.
            The jobstreams with the job template change are not
            included in the compare job.  This step is not required,
            but is recommended.

      3.    Identify existing programs and job streams which contain
            your office dependent references.  Rename your source
            copies of the current programs containing office-
            dependent references and restore specific programs.

      4.    Make office dependent changes, as necessary.  This
            includes ensuring all compile and build jobs contain the
            proper name and password on the JOB statement.

      5.    Stream the following DISCAS compile and build jobs to
            install the modified/new programs (programs detailed in
            Section I):

            NOTE:       PRIOR TO STREAMING ANY OF THE COMPILES OR
                        BUILDS, YOU MUST REBUILD THE COPYLIB (BLDCOPY
                        AND BLDSRCCP) AFTER INSTALLING THE DATABASE
                        AND FORMSFILE MODIFICATIONS.


      *     Because of the modification to FORSCOMM, all compile and
            build jobs must be restreamed.

      *     Compiles:

            COMPADJ            COMPADV             COMPBILL
            COMPBTCH           COMPBUD1            COMPBUD2
            COMPBUD7           COMPCOST            COMPDEPR
            COMPEDIT           COMPEDVL            COMPFADV
            COMPFBUD           COMPFFIS            COMPFIS
            COMPFMS            COMPFORS            COMPFPP
            COMPFRPT           COMPFTVL            COMPFUND
            COMPFUT            COMPLDS             COMPNONF
            COMPOBLI           COMPPACC            COMPPAY
            COMPPCS            COMPPPUP            COMPRCST
            COMPRPT1           COMPRPT2            COMPRPT3
            COMPRPT4           COMPRPT5            COMPRPT6
            COMPRPT7           COMPRPT8            COMPSTDM
            COMPTABL           COMPTVRP            COMPTVUP
            COMPUCRS           COMPUTIL            COMPVALT


      *     Rebuild XLDISCAS before streaming the following build
            jobs:

            :STREAM BLDCORE


      *     Builds:

            BARFDSIN           BBADBNR             BBADPNE
            BBNRCHK            BCHKCID             BCONSEC
            BCX1RES            BDBP16FX            BDRWDOWN
            BDSETLOK           BFISBAL             BFISEDT
            BFIXCMB            BFIXEDI             BGL2TB
            BINVREP            BIRSFUND            BJALLGL
            BJBILDEL           BJDEBDEL            BJDELEMP
            BJEOYCDR           BJEOYGL             BJEOYTB
            BJFYCLOS           BJRECDEL            BJYYTOXX
            BLD66CL            BLD66DU             BLD66ETP
            BLD66PC            BLD66RB             BLD66RR
            BLD66RT            BLD66RV             BLD66SU
            BLD66TP            BLDAC25             BLDACETP
            BLDACHCR           BLDACHDU            BLDACHOV
            BLDACHPC           BLDACHRR            BLDACHRV
            BLDACHSU           BLDACHTP            BLDADV
            BLDARFIL           BLDAUDIT            BLDBUD
            BLDC2108           BLDD2108            BLDDAFRE
            BLDDDGEN           BLDDELFP            BLDDNTC
            BLDDUNN            BLDFIS              BLDFNDCL
            BLDFORS            BLDFSCDR            BLDFXBNR
            BLDGENCL           BLDGENII            BLDGLSTR
            BLDINVSP           BLDINVST            BLDMEMO
            BLDNFNCL           BLDPCSI             BLDPPFED
            BLDPPR             BLDPPST             BLDR2108
            BLDRCBNR           BLDRCPT             BLDRDFL
            BLDRPT             BLDRPTPG            BLDS2108
            BLDSCX10           BLDSCX11            BLDSCX12
            BLDSCX13           BLDSCX14            BLDSCX15
            BLDSCX16           BLDSCX17            BLDSCX18
            BLDSCX19           BLDSCX1A            BLDSCX1C
            BLDSCX1O           BLDSCX1P            BLDSCX1R
            BLDSCX20           BLDSCX21            BLDSCX22
            BLDSCX23           BLDSCX24            BLDSCX25
            BLDSCX26           BLDSCX27            BLDSCX28
            BLDSCX29           BLDSCX2A            BLDSCX2D
            BLDSCX2N           BLDSCX2O            BLDSCX2R
            BLDSCX3C           BLDSCX3N            BLDSCX3O
            BLDSCX4            BLDSCX5             BLDSCX7
            BLDSCX9            BLDTBCID            BLDTM
            BLDTRAV            BLDUTIL             BLDXREF0
            BLDXREF1           BLDXREF2            BLDXREF3
            BOTVLETR           BP087               BRCALOT
            BRPTB              BRPTDET             BRPTFTVL
            BRPTPMT            BSIGNRV             BTBCD
            BTBCID             BTBDB               BTBOPEN2
            BLDSAMPL           BLDSTAT2            BLDSTAT6
            BLDAMEX


      VI.   USER DOCUMENTATION AND NOTES

            1.  With field office being added to TRIP-RECORD and
                BILLS data sets, existing records in these sets need
                to have this item initialized.  Query can be used to
                initialize these fields.

            2.  Field office was added to the cost centers that
                reside in TABLE-MM.  These cost centers will need to
                be reviewed, deleted, and reentered.  The field
                office should not be entered on the entry screen, it
                will be determined by the user-id.

            3.  The following menu options have been modified for a
                consolidated environment:

                FIS Module

                   FIS Submittal
                   FIS Corrections
                   FIS Direct Entry
                   Create Card File
                   FIS Auto Entry
                   DCA Entry Screen
                   Create File for FIS
                   Auto Gen Pay Split
                   Create FIS Compare
                   MARS Merge

                Advice Module

                   Auto Advice


                Budget Module

                   New Plan Supp/Upd CE
                   Begin New Cycle


                Accounting Module

                *  Obligation Reference
                *  Single Fund Entry
                *  F.E. - Operating
                *  F.E. - P&CE
                *  F.E. - Reimb. Work
                *  Misc Non-Fund Entry
                *  P&CE Non-Fund Entry
                *  Receivables Entry
                *  Log Invoices
                *  Va/Track Invoices
                *  Log/Val/Track Inv
                *  Va/Trk Paid Invoice
                *  Log/Reject Vouchers
                *  Modify Invoices
                *  Modify Transaction
                *  Modify Receivables
                *  Discount Calculation
                *  Validation
                *  Expanded Validation
                *  Invalidate XIDs
                *  Invalid Payment Rpt
                *  Validated Payments
                *  Payment Invalidation
                *  Payment Certification
                *  Generate GTR Payments
                   Decertify Payments
                *  Payment Batching
                   Add TFCS Payee Info
                   Add ACH Info
                   Employee ACH Entry
                   Paid Payments Auto
                   Tape Creation Menu
                   Depreciation

                   Bill Processing ++
                        Bill Accumulation Method
                        Generate Bills for Batch Number
                        Print Bills for Batch Number
                        Print Dunnings - New (Y) Old (X)
                        Ungenerate Partial Batch Number


                Batch Processes

                   Dunnings ++


                ++ Ensures processing of user's data only.



            *   Utility Module

                *  Invoice Update
                *  Obl-Ref Address Mod


                Please review existing menus and remove/add options
                as appropriate.


            4.  The specifications and user notes for the AMEX
                comparison and stat sampling are included in the
                change requests submitted by CAP (CR98-0035 and CR98-
                0036, respectively).  Also included with the formal
                memo regarding Test Release T32.0, were CAP's stat
                sampling user instructions.  These instructions
                should be reviewed and altered accordingly to
                incorporate stat sampling at each office.

                It should be noted that in CAP's user instructions,
                it is assumed that a AMEX directory exists on the C
                drive.  Also, the following file should be built (on
                the HP) before the LOADAMEX command file is
                activated:

                 :BUILD AMEXFILE.PUB;REC=-222,1,F,ASCII;DISC=250000

                This file will grow as each AMEX file is processed.
                Please decide how many months of data is to be
                retained, and maintain this file accordingly.

                To initially execute the stat sampling process, the
                LOADAMEX command file needs to be executed if not
                already done so for the AMEX comparison.  The
                LOADAMEX requires Reflection 1 for Windows, Version
                4.11 or equivalent.

                The file, EMORIG, should contain the 'from' E-Mail
                address used by the stat sampling process.  Refer to
                the Invoice Status Report process or the ACH
                Remittance Letters for this information, or specify
                a different address.

                To utilize some of the features in the stat sampling
                process, ask your systems manager to add the
                following statement to the Streamj job stream:

                        !SETVAR STREAMJ,TRUE

                The environment files sent with this release (LJ209L
                and LP209P) must reside in ENV.SYS.  These files must
                be modified (with TTUTIL) to reside in another group
                and account, or you may wish to use your own
                environment files.

                Letter files (STATVERI, STATLETR, and STATLET2) will
                need to be modified for local address and customer
                service information.


*           5.  A new version of COREFILE is included in this
                release, which reflects new programs and recently
                obsoleted programs.

                Use the compare job COMPAR39 results for COREFILE to
                see the differences between the old and new version
                of this file.

                -  Stream the job JRPTPGM to produce the new Core
                   Report.


*           6.  Core DISCAS Software Utilities - Reloading the Cross-
                Reference Database.

            o   Reloading the cross reference database is necessary
                after a new Core DISCAS release.  Each time a Core
                DISCAS software release has been issued and new
                calls, copylib modules, files, or entry points have
                been added to the source code, XREFDB will need to be
                reloaded with the most current information.  The
                following are the steps required to reload the XREFDB
                database.

                Because the loading of a database is an add process,
                XREFDB needs to be erased prior to running the load
                process.

            :RUN DBGENRL.PUB.BRADMARK
             Menu Option            : 4.4 (Erase base/set)
             Source Database        : XREFDB
             PASSWORD               : <<write password>>
             Data Set               : @

            All XREFDB will be erased and ready for loading.

            Create the following MPE files as follows:

            Create the following file equations:

        FILE INPUT1=FILELIST.PUB;REC=-80,1,F,ASCII;SAVE;NOCCTL
        FILE INPUT2=COMPLIST.PUB;REC=-80,1,F,ASCII;SAVE;NOCCTL
        FILE INPUT3=BLDLIST.PUB;REC=-80,1,F,ASCII;SAVE;NOCCTL

            o  Execute the following MPEX commands:

        LISTF @.SOURCE.BASELINE(CODE='EDTCT'),FILENAME;*INPUT1
        LISTF @.COMPS.BASELINE(CODE=''),FILENAME;*INPUT2
        LISTF @.BUILDS.BASELINE(CODE=''),FILENAME;*INPUT3

            -   Or stream the job JXREFILE to set up the files.

            -   Once the files are created in the PUB group, ensure
                the file equations contained in JXREF are directed
                toward the correct group and account.  JXREF can be
                streamed to load the information into XREFDB.  NOTE:
                Elapsed time on the HP3000/947 in Germantown was 20
                minutes.




                 *********  END OF DOCUMENT  *********