PSUAR0 ; BIR/PDW - Master Routine for AR/WS PBMS Extraction ;25 AUG 1998
Source file <PSUAR0.m>
Package | Total | Call Graph |
---|---|---|
Pharmacy Benefits Management | 7 | EN^PSUAR1 EN^PSUAR2 EN^PSUAR3 EN^PSUAR4 EN^PSUAR5 EN^PSUAR6 VARKILL^PSUTL |
VA Fileman | 1 | C^%DTC |
Name | Comments | DBIA/ICR reference |
---|---|---|
;EP for Print Cycle
|
||
PULL | ; pull variables from ^XTMP
|
|
EN | ; EP ENTRY FROM PSUCP
|
|
COMPUTE | ;EP for Compute Cycle of AR/WS Extract
|
|
EXIT | ;EP for Cleaning up & Restoring variables
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^XTMP( | COMPUTE+3!, COMPUTE+5*, COMPUTE+10*, COMPUTE+16*, COMPUTE+17*, EXIT+1, EXIT+2! |
^XTMP("PSU_" | PULL+4, PULL+8 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
AMISAR | COMPUTE+20! |
DT | COMPUTE+4, COMPUTE+5 |
>> I | PULL+4*, PULL+8*, COMPUTE+9* |
PSUAMIS | COMPUTE+20! |
PSUAR | COMPUTE+20! |
>> PSUARJOB | COMPUTE+1*, COMPUTE+2, EXIT+2 |
>> PSUARM | COMPUTE+14, COMPUTE+16, COMPUTE+17 |
>> PSUARSUB | COMPUTE+2*, COMPUTE+3, COMPUTE+5, COMPUTE+10, EXIT+1 |
>> PSUJOB | PULL+2*, PULL+4, PULL+6*, PULL+8, COMPUTE+1, COMPUTE+15 |
>> PSUMASF | COMPUTE+16 |
>> PSUPBMG | COMPUTE+17 |
>> PSUSUB | COMPUTE+15*, COMPUTE+16, COMPUTE+17 |
>> PSUVARS | PULL+3*, PULL+4, PULL+7*, PULL+8 |
U | PULL+4, PULL+8, COMPUTE+5 |
>> X | COMPUTE+5, COMPUTE+8*, COMPUTE+9, COMPUTE+10 |
>> X( | COMPUTE+9* |
>> X1 | COMPUTE+4* |
>> X2 | COMPUTE+4* |
>> Y | COMPUTE+9*, EXIT+6* |
Z | EXIT+1*, EXIT+7! |
Z( | EXIT+6 |