PRCFFUD ;WISC/SJG-UTILITY FOR CARRY FORWARD ;7/24/00 23:14
Source file <PRCFFUD.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| V | ;;5.1;IFCAP;**181**;Oct 20, 2000;Build 6
|
|
| OBDT() | ; Check if obligation processing date is valid for the open quarter
|
|
| QUIT | ||
| NEW410 | ; Create an entry in File 410 for any PO that does not have a request
|
|
| AMEND | ; Create an entry in File 410 for each amendment to a purchase order
; Case 1 - amendment with no cancelled documents |
|
| PO | ; Updating Running Balance Status Field (#449) in File 410 for
; purchase order |
|
| AMD | ; Updating Running Balance Status Field (#449) in File 410 for
; purchase order amendment |
|
| EDIT410(TRDAIEN,TRSTAT) | ; Edit running balance status and running balance quarter fields in 410
|
|
| AMDAMT() | ; Get dollar amount for AMENDMENT from amendment multiple
|
|
| AMDAMT1() | ; Get dollar amount for AMENDMENT from zero node
|
|
| MSG1 | ;
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|