PSUAR3 ;BIR/PDW - PBM AR/WS EXTRACT DETAILED MAIL GENERATOR ; 1/12/09 12:12pm
Source file <PSUAR3.m>
Package | Total | Call Graph |
---|---|---|
Pharmacy Benefits Management | 2 | XMD^PSUAR3 $$VAL^PSUTL |
MailMan | 1 | ^XMD |
VA FileMan | 1 | IX^DIC |
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 |
---|---|---|
Pharmacy Benefits Management | 2 | PSUAR0 PSUAR3 |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN(PSUMSG) | ;Scan and process for Division(s)
; PSUMSGT ("M")= # MESSAGES ("L")= # LINES |
|
XMD(PSUMSG) | ;EP returns PSUMSG("M")= # MESSAGES ("L")= # LINES
|
|
VARS | ; Setup variables for contents
|
|
NODATA | ;EP Build a NODATA Message
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^XTMP( | EN+8, EN+10, XMD+7!, XMD+9, XMD+12*, XMD+14*, XMD+16*, XMD+20, VARS+14* |
^XTMP("PSU_" | EN+5 |
Name | Line Occurrences |
---|---|
NODATA | EN+8 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> D | VARS+2*, NODATA+5* |
>> DIC | VARS+2*, NODATA+5* |
>> DIC(0 | VARS+2*, NODATA+5* |
DUZ | VARS+6, NODATA+3 |
>> I | EN+5*, XMD+13*, XMD+14, XMD+16 |
>> PSUARSUB | EN+8, EN+10, XMD+7, XMD+9, XMD+12, XMD+14, XMD+16, XMD+20, VARS+14 |
>> PSUDIV | EN+9*, EN+10*, EN+12, EN+13, XMD+9, VARS+2, VARS+4, NODATA+1*, NODATA+2, NODATA+5* , NODATA+9, NODATA+16 |
>> PSUDIVNM | VARS+3*, VARS+4, NODATA+6*, NODATA+9 |
>> PSUDUZ | EN+7, VARS+9 |
>> PSUJOB | EN+5 |
PSULC | XMD+1~, XMD+9*, XMD+11* |
>> PSUM | XMD+20*, VARS+1*, VARS+4, NODATA+7*, NODATA+9 |
>> PSUMASF | EN+7, VARS+9, NODATA+2 |
PSUMAX | XMD+1~, XMD+3*, XMD+4*, XMD+11 |
PSUMC | XMD+1~, XMD+8*, XMD+11*, XMD+12, XMD+14, XMD+16, XMD+20, VARS+1, VARS+4, VARS+12 , NODATA+7*, NODATA+9 |
>> PSUMLC | XMD+8*, XMD+10*, XMD+11*, XMD+12, XMD+14, XMD+15*, XMD+16 |
>> PSUMON | VARS+4, NODATA+9 |
PSUMSG | EN~, XMD~, VARS+14 |
PSUMSG( | EN+12*, EN+13*, NODATA+2*, NODATA+16* |
PSUMSG("L" | VARS+13* |
PSUMSG("M" | VARS+12* |
>> PSUPBMG | EN+7, VARS+9 |
>> PSUSMRY | VARS+10 |
>> PSUSNDR | NODATA+1, NODATA+5 |
PSUTLC | XMD+1~, XMD+19*, XMD+20*, VARS+13 |
PSUTMC | XMD+1~ |
>> PSUVARS | EN+4*, EN+5 |
>> PSUXMYH | VARS+7, NODATA+4 |
U | EN+5 |
X | XMD+9*, XMD+12, XMD+13, XMD+14, XMD+16, XMD+20*, VARS+2*, VARS+3*, NODATA+5*, NODATA+6* , NODATA+10~ |
X(1 | NODATA+11* |
>> XMCHAN | VARS+8*, NODATA+13* |
>> XMDUZ | VARS+6*, NODATA+3* |
>> XMSUB | VARS+4*, NODATA+9* |
>> XMTEXT | VARS+5*, NODATA+12* |
>> XMY | VARS+7*, NODATA+4* |
>> Y | VARS+3, NODATA+6 |
>> Z | EN+9*, EN+11, XMD+13* |
>> Z("L" | EN+13 |
>> Z("M" | EN+12 |