PRCFOOR3 ;WISC@ALTOONA/CTB-OUTSTANDING OBLIGATION RECONCILIATION ;12/15/94 3:59 PM
Source file <PRCFOOR3.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| V | ;;5.1;IFCAP;;Oct 20, 2000
|
|
| X | ||
| CLEAN | ;CLEAN ALL RECORDS FROM 420.96 FOR STATION
|
|
| IFCAP | ;LOOP THROUGH PO FILE FOR OPEN IFCAP RECORDS
|
|
| ADD1(PODA) | ;ADD RECORD TO 420.96 WITH STATUS OF 1
|
|
| CHECK(PODA,FSO) | ;QUIT WHEN CLOSED, NOT YET COMPLETE, OR NO MATCH ON SITE
|
|
| ERRMSG(X) | ;
|
|
| MSG | ;
|
|
| FILE(XDA,LINE) | ; check each transmission line sent and file in 420.6
|
|
| GET(X) | ;GET IFCAP PO NUMBER
|
|
| GETBAL(X) | ;
|
|
| ADD(ID,FMSFCP,FMSBAL,IFPODA,IFBAL,FMSLINE) | ;
|
|
| VALIDCP(SITE,CP) | ;VALIDATE FUND CONTROL POINT NUMBER
|
|
| FY |
