PRCFFU16 ;WISC/SJG-PO OBLIGATION UTILITY ;8/18/94 17:03
Source file <PRCFFU16.m>
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 |
Name | Comments | DBIA/ICR reference |
---|---|---|
V | ;;5.1;IFCAP;;Oct 20, 2000
|
|
EN(IEN) | ; Called from PO obligation processing
; IEN - Internal entry number from 442 |
|
EDIT | ||
PROMPT | ; Prompt user
|
|
MSG1 | ; Display current auto accrual information
|
|
PROMPT1 | ; Prompt for correct values
|
|
MSG3 | ; Prompt for Ending Date
|
|
MSG4 | ; Prompt for Auto Accrual
|
|
MSG5 | ; Exit message
|
|
MSG6 | ; Returning message
|
|
CHK | ;
|
|
FILE() | ; Determine file for lookup
|
|
EOM(DATE) | ; Determine end-of-month default date
|
|
CHK1(DATE) | ;Check for Ending date crossover to next FY.
|
Name | Field # of Occurrence |
---|---|
^%DT | CHK1+1, CHK1+3 |
DD^%DT | MSG3+12 |
^%DTC | MSG3+18, MSG4+5, CHK1+4 |
EN^DDIOL | EN+17, PROMPT+1, MSG3+18, MSG6+1, CHK1+5 |
^DIE | EN+21, EDIT+2 |
^DIR | PROMPT+9, PROMPT1+2, MSG3+15, MSG4+7 |
$$LABEL^PRCFFU15 | PROMPT+1 |
MSG1^PRCFFU15 | MSG1+1 |
MSG5^PRCFFU15 | MSG5+1 |
POVENO^PRCFFU15 | EN+3 |
$$EOM^PRCFFU16 | MSG3+11 |
GENDIQ^PRCFFU7 | EN+6 |
TAG33^PRCFFU9 | EN+22, PROMPT+10 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> ACCEDIT | EN+4*, CHK+4*, CHK+5* |
AUTOACC | EN+4*, EN+23! |
COM | MSG3+11~* |
CONT | MSG3+6~*, MSG3+7 |
CONTEND | EN+23!, MSG3+7*, MSG3+8 |
CONTENDA | EN+23!, MSG3+5, MSG3+10 |
CONTENDA( | MSG3+6, MSG3+7 |
CONTENDE | EN+23! |
CONTENDI | EN+23! |
>> DA | EN+19*, EDIT* |
DATE | EOM~, EOM+2, EOM+5, CHK1~, CHK1+3 |
DEF | EOM+1~, EOM+5*, EOM+6 |
DIE | EN+19*, EN+20*, EN+21!, EDIT*, EDIT+1*, EDIT+2! |
DIR | PROMPT+9!, PROMPT1+2!, MSG3+15!, MSG4+7! |
DIR("?" | PROMPT+3*, PROMPT+4*, PROMPT+5*, PROMPT+6*, PROMPT+7* |
DIR("??" | PROMPT+8*, PROMPT1+1* |
DIR("A" | PROMPT+2*, PROMPT1+1*, MSG3+2*, MSG4+3* |
DIR("B" | PROMPT+2*, PROMPT1+1*, MSG3+3*, MSG3+8*, MSG3+12*, MSG4+3*, MSG4+5*, MSG4+6* |
DIR(0 | PROMPT+2*, PROMPT1+1*, MSG3+2*, MSG4+3* |
>> DIRUT | EN+7, EN+8, PROMPT+10, MSG3+16, MSG4+8, MSG4+9 |
DR | EN+19*, EN+21!, EDIT*, EDIT+2! |
END | MSG3+6~* |
EOM | EOM+1~, EOM+4*, EOM+5 |
>> EXIT | EN+4*, EN+7, EN+8, EN+10, PROMPT1+3*, MSG3+1*, MSG3+16*, MSG4+1, MSG4+2*, MSG4+8* |
FILE | EN+5~*, EN+6, EN+7, EN+8, MSG3+1, MSG3+3, MSG3+4, MSG3+11, MSG3+18, MSG4+2 , MSG4+4, MSG4+5, MSG4+6, CHK+1, CHK+2, FILE+1*, FILE+3*, FILE+4*, FILE+6 |
>> FMEOM | EOM+5*, EOM+6 |
IEN | EN~, EN+3, EN+6, EN+7, EN+8, EN+19, EDIT, MSG3+1, MSG3+3, MSG3+4 , MSG3+11, MSG3+18, MSG4+2, MSG4+4, MSG4+5, MSG4+6, CHK+1, CHK+2 |
LEAP | EOM+1~, EOM+3*, EOM+4 |
MON | EOM+1~, EOM+2*, EOM+4, EOM+5 |
MSG | EN+13!, EN+17! |
MSG(1 | EN+14* |
MSG(2 | EN+15* |
MSG(3 | EN+15* |
MSG(4 | EN+16* |
NEWACC | EN+12, EN+23!, PROMPT+11*, MSG4+2*, MSG4+9*, CHK+3, CHK+5 |
NEWDATE | EN+12, EN+23!, MSG3+1*, MSG3+17*, MSG3+18, MSG3+19, MSG4+5, CHK+3, CHK+4 |
>> OB | EN+8* |
OLDACC | EN+23!, CHK+2*, CHK+3, CHK+5 |
OLDDATE | EN+23!, CHK+1*, CHK+3, CHK+4 |
>> PRC("FY" | CHK1+1 |
>> PRCFA("ACCEDIT" | PROMPT1+3*, CHK+4*, CHK+5* |
>> PRCFA("MOD" | EN+20, EDIT+1, FILE+1, FILE+2 |
>> PRCFA("RETRAN" | EN+20, EDIT+1, FILE+3, FILE+4 |
>> PRCTMP( | EN+7, EN+8, MSG3+1, MSG3+3, MSG3+4, MSG3+11, MSG3+18, MSG4+2, MSG4+4, MSG4+5 , MSG4+6, CHK+1, CHK+2 |
U | EN+20, EDIT+1, MSG3+7, MSG3+11, FILE+1, FILE+2, EOM+6 |
>> X | MSG3+18, MSG4+5, CHK1+1*, CHK1+3*, CHK1+5 |
>> X1 | MSG3+18*, MSG4+5*, CHK1+4* |
>> X2 | MSG3+18*, MSG4+5*, CHK1+2* |
>> Y | EN+7, EN+8, PROMPT+10*, PROMPT1+3, MSG3+11*, MSG3+12, MSG3+17, MSG4+9, CHK1+2, CHK1+4 |
>> Y(0 | PROMPT+11 |
YR | EOM+1~, EOM+2*, EOM+3 |
YY | PROMPT+10~* |