03 PROJECT-FUND-SOURCE-TABLE. *************************************************************** * * * TABLE: PROJECT-FUND-SOURCE-TABLE * * * * KEY: AGENCY * * PROJECT-5 * * SUB-PROJECT * * PHASE * * FUND-TYPE * * PROGRAM-PROVIDER * * * * LENGTH: 271 * * * *************************************************************** 05 DOCD-IOAREA. 10 PFST-KEY-FIELDS. 15 AGENCY PIC X(03). 15 PROJECT-DATA. 20 PROJECT-5 PIC X(05). 20 SUB-PROJECT PIC X(02). 20 PHASE PIC X(01). 15 FUND-TYPE PIC X(01). 15 PROGRAM-PROVIDER PIC X(11). 10 PFST-RESULT-FIELDS. 15 BUDGET-FY. 20 BUDGET-FY-CC PIC X(02). 20 BUDGET-FY-YY PIC X(02). 15 FUND PIC X(04). 15 FUND-SOURCE PIC X(03). 15 AGREEMENT-DATE. 20 AGREEMENT-CC PIC X(02). 20 AGREEMENT-YY PIC X(02). 20 AGREEMENT-MM PIC X(02). 20 AGREEMENT-DD PIC X(02). 15 AGREEMENT-AMOUNT PIC S9(14). 15 AGREEMENT-ORIG PIC S9(14). 15 FUND-SRC-STATUS-IND PIC X(01). 15 CONTRIBUTION-PERCENT PIC S9(07). 15 CONTRI-PERCENT-ORIG PIC S9(07). 15 BILLED-AMT PIC S9(14). 15 INVOICE-AMT PIC S9(14). 15 COLLECTED-AMOUNT PIC S9(14). 15 LAST-BILL-DATE. 20 LAST-BILL-YEAR. 25 LAST-BILL-YEAR-CC PIC X(02). 25 LAST-BILL-YEAR-YY PIC X(02). 20 LAST-BILL-MONTH PIC X(02). 20 LAST-BILL-DAY PIC X(02). 15 BILLING-CYCLE-IND PIC X(01). 15 SPONSOR-CODE PIC X(02). 15 PRIORITY-NUMBER PIC X(02). 15 SUSPENSE-AMOUNT PIC S9(14). 15 CONST-TO-DATE PIC S9(14). 15 CE-LIMIT PIC S9(14). 15 CE-TO-DATE PIC S9(14). 15 TEMP-CONST-TO-DATE PIC S9(14). 15 TEMP-CE-LIMIT PIC S9(14). 15 TEMP-CE-TO-DATE PIC S9(14). 15 FRM-AMOUNT PIC S9(14). 15 DIS-AMOUNT PIC S9(14). 15 DEMO-ID PIC X(05). 10 PFST-CALCULATED-FIELDS. 15 AVAILABLE-AMOUNT PIC S9(14).