PRCFDT ;WISC/LEM-PROVIDE 'NET' PERCENT TRANSFORMS ;8/11/95 09:35
Source file <PRCFDT.m>
Package | Total | Call Graph |
---|---|---|
VA FileMan | 3 | ^DIC FILE^DICN ^DIE |
Generic Code Sheet | 1 | DATA^GECSSGET |
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
IFCAP | 2 | PRCF CI FMS ACCOUNTING PRCFDA |
Name | Comments | DBIA/ICR reference |
---|---|---|
V | ;;5.1;IFCAP;;Oct 20, 2000
|
|
INPUT | ||
OUTPUT | ||
DISC | ; COMPUTE FMS LINE LIQ AMT FROM TOTAL AMT & DISCOUNT TERMS
; INPUT: PRCF("CIDA") - IEN FOR PAYMENT/INVOICE TRACKING RECORD ; PRCFA("LAMT") - AMOUNT CERTIFIED FOR THIS INVOICE ; OUTPUT: PRCFA("LIQ") - FMS COMPUTED LIQUIDATION AMOUNT |
|
SUM | ;
; INPUT: PRCF("CIDA") - IEN FOR PAYMENT/INVOICE TRACKING RECORD ; PRCFA("CAMT") - TOTAL INVOICE AMOUNT CERTIFIED FOR PAYMENT ; OUTPUT: OK - 1 IF SUM OF LINE AMOUNTS = TOTAL AMOUNT CERTIFIED ; - 0 IF AMOUNTS NOT EQUAL |
|
SCREEN | ; CHECK BOC
|
|
OBLIG(PRCA) | ; Check for an original entry SO or MO on the P.O.
|
|
LOOKUP(X,PARTIAL) | ; X = STA-PAT # - LOOKUP returns next available PARTIAL #.
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^PRCF(421.9 - [#421.9] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZOSF("TEST" | OBLIG+8 |
^DD(421.5 | OUTPUT+4 |
^PRC(442 - [#442] | OBLIG+1, OBLIG+3, OBLIG+4, OBLIG+7, OBLIG+9 |
^PRCF(421.5 - [#421.5] | OUTPUT+3, OUTPUT+4*, DISC+6, DISC+7, SUM+7, SUM+8 |
^PRCF(421.9 - [#421.9] | LOOKUP+3*, LOOKUP+4, LOOKUP+6* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> AMT | OUTPUT+8* |
CTR | OUTPUT+5~*, OUTPUT+6*, OUTPUT+10 |
DA | OUTPUT+2~, OUTPUT+10* |
DA(1 | OUTPUT+2*, OUTPUT+3, OUTPUT+4, OUTPUT+7 |
DD | OUTPUT+9!, LOOKUP+1! |
DIC | OUTPUT+7~*, OUTPUT+10, LOOKUP+1~* |
DIC(0 | OUTPUT+7*, LOOKUP+1* |
DIE | OUTPUT+10~* |
DISC | DISC+5~, DISC+7*, DISC+8 |
DO | OUTPUT+9!, LOOKUP+1! |
DOC | OBLIG+2~, OBLIG+4*, OBLIG+5, OBLIG+6, OBLIG+7 |
DR | OUTPUT+11~* |
>> FMSL | OUTPUT+10* |
GECSDATA | OBLIG+10~, OBLIG+11, OBLIG+12, OBLIG+13 |
GECSDATA( | OBLIG+12, OBLIG+13 |
HIGHDISC | DISC+5~*, DISC+8*, DISC+10 |
I | OUTPUT+5~*, OUTPUT+6, OUTPUT+8, OUTPUT+10, DISC+5~*, DISC+6*, DISC+7, SUM+6~*, SUM+7*, SUM+8 |
LAMT | SUM+6~, SUM+8*, SUM+9 |
NODE | OUTPUT+3~*, OUTPUT+4 |
>> OK | SUM+6*, SUM+11* |
>> P | LOOKUP+4*, LOOKUP+5*, LOOKUP+6 |
PARTIAL | LOOKUP~, LOOKUP+3*, LOOKUP+6* |
PRCA | OBLIG~, OBLIG+1*, OBLIG+3, OBLIG+5*, OBLIG+6*, OBLIG+12*, OBLIG+13*, OBLIG+15 |
>> PRCF("CAMT" | SUM+5, SUM+11 |
>> PRCF("CIDA" | OUTPUT+2, DISC+4, DISC+6, DISC+7, SUM+5, SUM+7, SUM+8 |
>> PRCF("PODA" | OBLIG+1, OBLIG+3, OBLIG+4, OBLIG+7, OBLIG+9 |
>> PRCF("TAMT" | SUM+6*, SUM+9*, SUM+11 |
>> PRCFA("LAMT" | DISC+4, DISC+10 |
>> PRCFA("LIQ" | DISC+10* |
>> PRCFD( | OUTPUT+5, OUTPUT+8 |
>> PRCFX("SA" | SCREEN+1 |
PRCI | OBLIG+2~*, OBLIG+3*, OBLIG+4, OBLIG+5, OBLIG+6, OBLIG+9, OBLIG+12, OBLIG+13 |
U | OUTPUT+4, OUTPUT+8, DISC+7, SUM+8, OBLIG+7, OBLIG+9, LOOKUP+3, LOOKUP+4, LOOKUP+6 |
X | INPUT, INPUT+1*, INPUT+3!, OUTPUT+8*, SCREEN+1, OBLIG+2~, OBLIG+8*, OBLIG+9*, OBLIG+11, LOOKUP~ |
X0 | INPUT~*, INPUT+1 |
>> Y | OUTPUT*, OUTPUT+9, OUTPUT+10, LOOKUP+2, LOOKUP+3, LOOKUP+4, LOOKUP+6 |