Monthly Detail - File layout is stored in macro BRMONTHD.
Input file: SIS.DETAIL.MONTHLY.
The file contains accounting detail transactions for all institutions for the month specified. The file is NOT sorted. Transactions appear in the order that the accounting feeds were run.
The file contains records for all institutions specified in the &IDENT portion of the file name, sorted by institution, external, sid, term, and subcode.
When PURGE-SUBCODE equals '00010', the record contains the fields defined in the PURGE-ATTRIBUTES portion of the file definition.
When the PURGE-SUBCODE equals '00100' or greater, the record contains the fields defined in the PURGE-DETAIL portion of the file definition.
The file contains records for all institutions, sorted by sid, frozen file record type, institution, academic unit, and external indicator.
There is 1 type '1' record for each IABRCAA record within the institution.
There are 0 to many type '2' records, depending upon how many non-blank external (IABRCNS) records exist for the account. The number of type '2' records for the account is stored on the '1' record.
There are 1 to many type '5' records, depending upon how many detail transaction (IABRCBD/IABRCTR) records exist for the account. The number of type '5' records is stored on the '1' record.
The account balances on '1' and '2' records were calculated as the frozen file was written so they may be used without recalculation.
Dates are stored on the file in year, month, day (YYMMDD) order. Eight character dates are in century, year, month, day (CCYYMMDD) order.
Three PeopleSoft chart field combinations (FOPPS) are stored on this file.
Refer to production job TERO to see how to setup jcl or to navigate the file.
Note: This routine calculates balances off of the SIS database. It does not calculate balances using data from the BRS Frozen File.
To access the COBOL subroutine change your Easytrieve program as follows:
1. In your jcl, change your STEPLIB to
//STEPLIB DD DSN=EASY.IDMS12.LOADLIB,DISP=SHR
//
DD DSN=UMS.PROD.LOAD,DISP=SHR
//
DD DSN=CEE.SCEERUN,DISP=SHR
//
DD DSN=IDMS.SISP.LOADLIB,DISP=SHR
//
DD DSN=IDMS.SYSTEM50.LOADLIB,DISP=SHR
2. In your jcl, add a SYSIDMS statement if one does not already exist.
//SYSIDMS DD DSN=UMS.PROD.DATA(SI50L1),DISP=SHR
3. In your jcl, add a PANDD statement if one does not already exist.
//PANDD DD DSN=UMS.PROD.EZTMACRO,DISP=SHR
4. In your Easytrieve program
a) Add
this PARM statement as THE FIRST LINE of the program.
PARM ENVIRONMENT COBOL
b) Call
the macro for the balances work record (%BRBALREC) in the area where
you are defining files and work fields.
c) Call
the macro for the procedure that accesses the COBOL subroutine
(%BRGETBAL) in the area where you define your procedures or anywhere between
the JOB statement and the first REPORT statement.
5. That's all of the "technical stuff". The
COBOL subroutine (SISR079) is designed to read to
the SIS database and calculate
the account balance (as defined by the campus), the current
balance, the balance due now,
the past due balance and the future term balance. In order
to
have the calculations completed
you will need to provide
- an institution for STD-INST-WORK
- an external for STD-EXT-WORK
- a student id number for
STD-SID-WORK
then PERFORM GET-BALANCE.
When your program returns
from the GET-BALANCE procedure (defined by macro
%BRGETBAL) it would be wise
to check the value of SISR079-CODE-WORK. If this
field is not '000' something
went wrong in the reading of the database. If the code is '000'
the balances have been calculated
for you and can be interrogated or printed as you see fit.
The balance fields are:
account balance =
CALC-KEY-BAL-WORK
current balance
= CALC-CURR-TERMS-BAL-WORK
future balance
= CALC-FUTURE-TERMS-BAL-WORK
due now balance = CALC-DUE-NOW-BAL-WORK
past due balance = CALC-PAST-DUE-BAL-WORK
This page was last updated on 1-27-06.