PSUPR0 ;BIR/PDW - PROCUREMENT EXTRACT ENTRY ROUTINE ;25 AUG 1998
Source file <PSUPR0.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ;EP from PSUCP
|
|
CLEAR | ;EP clear ^XTMP of PSUPR nodes
|
|
MANUAL | ;EP Manual entry point for Running Procurement Module to
; exercise detailed message, summary messages, & Reports ; Some startup code borrowed from PSUCP for dates |
|
EXIT | ;EP Tasking Entry Point for Cleaning out XTMP and Variables
; Restore Important Variables |
|
;EP Tasking Entry Point for PRINT REPORT
|
||
PULLQ | ;Q
|
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 |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(4 - [#4] | MANUAL+5 |
^XMB(1 - [#4.3] | MANUAL+5 |
^XTMP( | PULLQ+5!, PULLQ+6*, PULLQ+12*, PULLQ+35*, EXIT+3, EXIT+4!, CLEAR+2! |
^XTMP("PSU_" | EN+6 |
Name | Line Occurrences |
---|---|
MANUAL | MANUAL+13, MANUAL+14, MANUAL+21 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
%DT | MANUAL+6!, MANUAL+7*, MANUAL+11!, MANUAL+12* |
%DT("A" | MANUAL+7*, MANUAL+12* |
%DT(0 | MANUAL+7*, MANUAL+12* |
DIR | MANUAL+19!, MANUAL+22!, MANUAL+26! |
DIR("A" | MANUAL+20*, MANUAL+25* |
DIR("B" | MANUAL+20*, MANUAL+25* |
DIR(0 | MANUAL+20*, MANUAL+25* |
DT | PULLQ+4, PULLQ+6, MANUAL+4 |
DUZ | MANUAL+4 |
>> I | EN+6*, PULLQ+11* |
>> PSUDUZ | PULLQ+35, MANUAL+4* |
>> PSUEDT | MANUAL+15*, MANUAL+18 |
PSUIOP | MANUAL+29!, MANUAL+30* |
>> PSUJOB | EN+4*, EN+6, PULLQ+1, PULLQ+34 |
>> PSUMASF | MANUAL+4* |
>> PSUMON | MANUAL+4* |
PSUMSG | PULLQ+29!, PULLQ+30, PULLQ+35 |
>> PSUNS | MANUAL+32* |
>> PSUPBMG | PULLQ+35, MANUAL+4* |
>> PSUPRJOB | PULLQ+1*, PULLQ+2 |
>> PSUPRSUB | PULLQ+2*, PULLQ+5, PULLQ+6, PULLQ+12, EXIT+3, EXIT+4 |
>> PSURC | MANUAL+28* |
PSURP | MANUAL+27*, MANUAL+29*, MANUAL+30! |
>> PSURX | MANUAL+31* |
>> PSUSDT | MANUAL+10*, MANUAL+12, MANUAL+17 |
>> PSUSMRY | MANUAL+4* |
>> PSUSNDR | MANUAL+5* |
>> PSUSUB | PULLQ+34*, PULLQ+35 |
>> PSUVARS | EN+5*, EN+6 |
U | EN+6, PULLQ+6, MANUAL+5 |
X | PULLQ+6, PULLQ+9!, PULLQ+10*, PULLQ+11, PULLQ+12, PULLQ+13!, EXIT+2!, EXIT+3*, EXIT+8!, CLEAR+1* , CLEAR+2*, MANUAL+5*, MANUAL+8, MANUAL+13 |
X( | PULLQ+11*, EXIT+7 |
>> X1 | PULLQ+4* |
>> X2 | PULLQ+4* |
>> Y | PULLQ+11*, EXIT+7*, MANUAL+9, MANUAL+10, MANUAL+14, MANUAL+15, MANUAL+17*, MANUAL+18*, MANUAL+21, MANUAL+27 |