PRCFFU7 ;WISC/SJG-OBLIGATION PROCESSING UTILITIES, CON'T ;7/24/00 23:10
Source file <PRCFFU7.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
V | ;;5.1;IFCAP;;Oct 20, 2000
|
|
LIST(POIEN,AMIEN) | ;
; POIEN - Internal Entry Number of Purchase Order ; AMIEN - Internal Entry Number of Amendment |
|
VAR | ; Initialize some variables
|
|
GENDIQ(DIC,DA,DR,PARAM,PARAM1) | ; Generic call to DIQ1 utility
|
|
TOTAL | ; Calculate total for changes
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^PRC(442 - [#442] | VAR+5, VAR+6, VAR+10 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
AMDSTAT | VAR+14~, VAR+16*, VAR+18 |
AMIEN | LIST~, VAR+5, VAR+6, VAR+10, VAR+14, VAR+16, VAR+17 |
AMT | VAR+2*, VAR+21!, TOTAL+3*, TOTAL+4, TOTAL+5* |
AUTH | VAR+14~, VAR+17*, VAR+18 |
CHG | VAR+7*, VAR+8, VAR+12, VAR+21! |
DA | GENDIQ~ |
DA( | GENDIQ+4* |
DIC | GENDIQ~ |
DIQ | GENDIQ+1~* |
DIQ(0 | GENDIQ+1* |
DR | GENDIQ~ |
DR( | GENDIQ+4* |
LOOP | VAR+5*, VAR+6, VAR+9, VAR+10, VAR+11, VAR+21! |
LOOP1 | VAR+4*, VAR+21! |
LOOP2 | VAR+21! |
LOOP3 | VAR+21!, TOTAL+1*, TOTAL+2, TOTAL+3, TOTAL+5 |
LOOP4 | VAR+21!, TOTAL+2*, TOTAL+3, TOTAL+5 |
OLD | VAR+21! |
OLD( | VAR+9*, VAR+11* |
OLDVAL | VAR+10*, VAR+11, VAR+21! |
PARAM | GENDIQ~, GENDIQ+1 |
PARAM1 | GENDIQ~, GENDIQ+2, GENDIQ+3 |
POIEN | LIST~, VAR+5, VAR+6, VAR+10, VAR+15 |
>> PRCFA( | VAR+4* |
>> PRCFA("CANCEL" | VAR+20 |
>> PRCFA("FCP" | VAR+8 |
>> PRCFA("MOMNOTREQ" | VAR+3*, VAR+20* |
>> PRCFA("MOMREQ" | VAR+3*, VAR+20* |
>> PRCFA("VEND" | VAR+8 |
>> PRCFA("ZERO" | VAR+20* |
>> PRCFCHG("BOC" | VAR+1!, VAR+19, VAR+20, TOTAL+1, TOTAL+2, TOTAL+3, TOTAL+5* |
>> PRCTMP( | VAR+16, VAR+17 |
STRING | VAR+6*, VAR+7, VAR+9, VAR+21! |
SUBFILE | GENDIQ+1~, GENDIQ+3*, GENDIQ+4 |
SUBFLD | GENDIQ+1~, GENDIQ+3*, GENDIQ+4 |
SUBINFO | VAR+14~*, VAR+15 |
SUBREC | GENDIQ+1~, GENDIQ+3*, GENDIQ+4 |
TAG | VAR+12*, VAR+21! |
>> TOTAMT | VAR+2*, VAR+19*, TOTAL+4* |
U | VAR+7, GENDIQ+3, TOTAL+3, TOTAL+5 |