PSUOPMD ;BIR/CFL,DAM - PSU PBM Multidose Outpatient Pharmacy create mailman messages ;17 NOV 2004
Source file <PSUOPMD.m>
Package | Total | Call Graph |
---|---|---|
MailMan | 1 | ^XMD |
Pharmacy Benefits Management | 1 | $$VAL^PSUTL |
VA FileMan | 1 | ^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 | 1 | PSUOP0 |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ;
|
|
MSG | ;Set up the number of lines and messages for mailman
|
|
XMD | ;
|
|
OLD | ; THIS SUBROUTINE STOPS MULTI-LINED MESSAGES FORM SPANNING MAILMAN MSG
|
|
OLD5 | ; * IF A RECORD EXCEEDS THE 10,000 CHARACTER 5 TIMES
|
|
OLD4 | ; * IF A RECORD EXCEEDS THE 10,000 CHARACTER 4 TIMES
|
|
OLD3 | ;
|
|
OLD2 | ;
|
|
OLD1 | ;
|
|
VARS | ; Setup variables for contents
|
|
NODATA | ;Send "No data to report" message
|
|
SETCNT | ;Set message count and line count
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^XTMP( | EN+6, EN+9, EN+11, EN+13*, EN+15*, EN+17*, EN+18, EN+20*, EN+21, EN+23* , EN+24, EN+26*, MSG+4, MSG+6, XMD+4!, XMD+6, XMD+11*, XMD+13*, XMD+15*, XMD+19 , OLD+1, OLD+2, OLD+3, OLD+4, OLD+5, OLD5+1*, OLD5+2!, OLD5+3*, OLD5+4!, OLD5+5* , OLD5+6!, OLD5+7*, OLD5+8!, OLD5+9*, OLD5+10!, OLD4+1*, OLD4+2!, OLD4+3*, OLD4+4!, OLD4+5* , OLD4+6!, OLD4+7*, OLD4+8!, OLD3+1*, OLD3+2!, OLD3+3*, OLD3+4!, OLD3+5*, OLD3+6!, OLD2+1* , OLD2+2!, OLD2+3*, OLD2+4!, OLD1+1*, OLD1+2!, NODATA+1* |
^XTMP("PSU_" | SETCNT+3*, SETCNT+4* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> DIC | MSG+7*, NODATA+4* |
>> DIC(0 | MSG+7*, NODATA+4* |
>> I | XMD+12*, XMD+13, XMD+15 |
>> NONE | MSG+2*, VARS+10, NODATA+2* |
>> PSUDASH | EN+2* |
>> PSUDIV | MSG+5*, MSG+6*, MSG+7, XMD+6, VARS+2, NODATA+2*, NODATA+4, SETCNT+1, SETCNT+2, SETCNT+3 , SETCNT+4 |
>> PSUDIVNM | MSG+8*, VARS+2, NODATA+5* |
>> PSUDUZ | MSG+9, VARS+5 |
>> PSUDV | EN+5*, EN+6*, EN+9, EN+11, EN+13, EN+15, EN+17, EN+18, EN+20, EN+21 , EN+23, EN+24, EN+26 |
>> PSUFILL | EN+3* |
>> PSUJOB | SETCNT+3, SETCNT+4 |
PSULC | XMD+1~, XMD+6* |
>> PSULCT | EN+7*, EN+12*, EN+13, EN+14*, EN+15, EN+16*, EN+17, EN+19*, EN+20, EN+22* , EN+23, EN+25*, EN+26 |
>> PSUM | XMD+19*, VARS+1*, VARS+2 |
>> PSUMASF | MSG+9, VARS+5, VARS+7 |
PSUMAX | XMD+1~, XMD+2*, XMD+3*, XMD+8 |
PSUMC | XMD+1~, XMD+5*, XMD+11, XMD+13, XMD+15, XMD+19, OLD+1, OLD+2, OLD+3, OLD+4 , OLD+5, OLD5+1, OLD5+2, OLD5+3, OLD5+4, OLD5+5, OLD5+6, OLD5+7, OLD5+8, OLD5+9 , OLD5+10, OLD4+1, OLD4+2, OLD4+3, OLD4+4, OLD4+5, OLD4+6, OLD4+7, OLD4+8, OLD3+1 , OLD3+2, OLD3+3, OLD3+4, OLD3+5, OLD3+6, OLD2+1, OLD2+2, OLD2+3, OLD2+4, OLD1+1 , OLD1+2, VARS+1, VARS+2, VARS+11 |
>> PSUMLC | XMD+5*, XMD+7*, XMD+8, XMD+9*, XMD+11, XMD+13, XMD+14*, XMD+15, OLD+1, OLD+2 , OLD+3, OLD+4, OLD+5, OLD5+2, OLD5+4, OLD5+6, OLD5+8, OLD5+10, OLD5+11*, OLD4+2 , OLD4+4, OLD4+6, OLD4+8, OLD4+9*, OLD3+2, OLD3+4, OLD3+6, OLD3+7*, OLD2+2, OLD2+4 , OLD2+5*, OLD1+2, OLD1+3* |
>> PSUMON | VARS+2 |
>> PSUMSG("L" | VARS+12*, SETCNT+2 |
>> PSUMSG("M" | VARS+11*, SETCNT+1 |
>> PSUMSGT( | SETCNT+1*, SETCNT+2*, SETCNT+3, SETCNT+4 |
>> PSUMSGT("L" | MSG+3* |
>> PSUMSGT("M" | MSG+3* |
>> PSUNOREC | MSG+2* |
PSUOLD1 | XMD+1~, OLD+1*, OLD+10, OLD5+9, OLD5+12!, OLD4+7, OLD4+10!, OLD3+5, OLD3+8!, OLD2+3 , OLD2+6!, OLD1+1, OLD1+4! |
PSUOLD2 | XMD+1~, OLD+2*, OLD+9, OLD5+7, OLD5+12!, OLD4+5, OLD4+10!, OLD3+3, OLD3+8!, OLD2+1 , OLD2+6! |
PSUOLD3 | XMD+1~, OLD+3*, OLD+8, OLD5+5, OLD5+12!, OLD4+3, OLD4+10!, OLD3+1, OLD3+8! |
PSUOLD4 | OLD+4*, OLD+7, OLD5+3, OLD5+12!, OLD4+1, OLD4+10! |
PSUOLD5 | OLD+5*, OLD+6, OLD5+1, OLD5+12! |
>> PSUOPSUB | EN+6, EN+9, EN+11, EN+13, EN+15, EN+17, EN+18, EN+20, EN+21, EN+23 , EN+24, EN+26, MSG+4, MSG+6, XMD+4, XMD+6, XMD+11, XMD+13, XMD+15, XMD+19 , OLD+1, OLD+2, OLD+3, OLD+4, OLD+5, OLD5+1, OLD5+2, OLD5+3, OLD5+4, OLD5+5 , OLD5+6, OLD5+7, OLD5+8, OLD5+9, OLD5+10, OLD4+1, OLD4+2, OLD4+3, OLD4+4, OLD4+5 , OLD4+6, OLD4+7, OLD4+8, OLD3+1, OLD3+2, OLD3+3, OLD3+4, OLD3+5, OLD3+6, OLD2+1 , OLD2+2, OLD2+3, OLD2+4, OLD1+1, OLD1+2, NODATA+1 |
>> PSUOPTN | SETCNT+3, SETCNT+4 |
>> PSUPBMG | MSG+9, VARS+5 |
>> PSURCT | EN+10*, EN+11*, EN+13, EN+15, EN+17, EN+18, EN+20, EN+21, EN+23, EN+24 , EN+26 |
>> PSURXIEN | EN+8*, EN+9*, EN+11, EN+13, EN+15, EN+17, EN+18, EN+20, EN+21, EN+23 , EN+24, EN+26 |
>> PSUSMRY | VARS+8 |
>> PSUSNDR | NODATA+1, NODATA+2 |
PSUTLC | XMD+1~, XMD+18*, XMD+19*, VARS+10*, VARS+12 |
PSUTMC | XMD+1~ |
>> PSUTMP | EN+5* |
>> PSUXMYH | VARS+6 |
>> PSUXMYS1 | VARS+7 |
>> X | MSG+7*, MSG+8*, XMD+6*, XMD+9, XMD+10, XMD+11, XMD+12, XMD+13, XMD+15, XMD+19* , NODATA+4*, NODATA+5* |
>> XMCHAN | VARS+4* |
>> XMSUB | VARS+2* |
>> XMTEXT | VARS+3* |
>> XMY | VARS+6*, VARS+7* |
>> Y | MSG+8, NODATA+5 |
>> Z | MSG+5*, XMD+12* |