©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
PSUOP4 ;BIR/CFL - PSU PBM Outpatient Pharmacy create mailman messages ;10 JUL 1999
Source file <PSUOP4.m>
| Package | Total | Call Graph |
|---|---|---|
| Pharmacy Benefits Management | 4 | (DRUGSUM,RECLOOP,RECSUM)^PSUOP5 DIVNM^PSUOP6 DATA^PSUOP7 $$VAL^PSUTL |
| MailMan | 1 | ^XMD |
| VA Fileman | 1 | (,IX)^DIC |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ;
|
|
| VARS | ; Setup variables for contents
|
|
| SETCNT | ;Set message count and line count
|
|
| XMD | ;
|
|
| MSG | ;Set up the number of lines and messages for mailman
|
|
| NODATA | ;Send "No data to report" message
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^XTMP( | EN+6, EN+9, EN+11, EN+14*, EN+16*, EN+22, MSG+4, MSG+6, XMD+4!, XMD+6 , XMD+10*, XMD+11!, XMD+14*, XMD+16*, XMD+18*, XMD+22, NODATA+1* |
| ^XTMP("PSU_" | EN+22*, EN+24, EN+26, EN+27, EN+28!, NODATA+3*, SETCNT+3*, SETCNT+4* |
| Name | Line Occurrences |
|---|---|
| NODATA | MSG+4 |
| SETCNT | MSG+12 |
| XMD | MSG+12, NODATA+6 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> D | VARS+2* |
| >> DIC | MSG+7*, VARS+2* |
| >> DIC(0 | MSG+7*, VARS+2* |
| >> I | XMD+15*, XMD+16, XMD+18 |
| >> NONE | MSG+2*, VARS+12, NODATA+2* |
| >> PSUDASH | EN+2* |
| >> PSUDIV | MSG+5*, MSG+6*, MSG+7, MSG+10, XMD+6, VARS+2, VARS+4, NODATA+2*, NODATA+5, SETCNT+1 , SETCNT+2, SETCNT+3, SETCNT+4 |
| >> PSUDIVNM | MSG+8*, MSG+10, VARS+3*, VARS+4 |
| >> PSUDUZ | MSG+11, VARS+7 |
| >> PSUDV | EN+5*, EN+6*, EN+9, EN+11, EN+14, EN+16 |
| >> PSUFILL | EN+3* |
| >> PSUJOB | EN+22, EN+24, EN+26, EN+27, EN+28, NODATA+3, SETCNT+3, SETCNT+4 |
| PSULC | XMD+1~, XMD+6* |
| >> PSULCT | EN+7*, EN+13*, EN+14, EN+15*, EN+16 |
| >> PSUM | XMD+22*, VARS+1*, VARS+4 |
| >> PSUMASF | MSG+11, VARS+7, VARS+9 |
| PSUMAX | XMD+1~, XMD+2*, XMD+3*, XMD+8 |
| PSUMC | XMD+1~, XMD+5*, XMD+10, XMD+11, XMD+12*, XMD+13*, XMD+14, XMD+16, XMD+18, XMD+22 , VARS+1, VARS+4, VARS+13 |
| >> PSUMLC | XMD+5*, XMD+7*, XMD+8, XMD+10, XMD+11, XMD+12*, XMD+13*, XMD+14, XMD+16, XMD+17* , XMD+18 |
| >> PSUMON | VARS+4 |
| >> PSUMSG("L" | VARS+14*, SETCNT+2 |
| >> PSUMSG("M" | VARS+13*, SETCNT+1 |
| >> PSUMSGT( | SETCNT+1*, SETCNT+2*, SETCNT+3, SETCNT+4 |
| >> PSUMSGT("L" | MSG+3* |
| >> PSUMSGT("M" | MSG+3* |
| >> PSUNOREC | MSG+2* |
| >> PSUOPSUB | EN+6, EN+9, EN+11, EN+14, EN+16, EN+22, MSG+4, MSG+6, XMD+4, XMD+6 , XMD+10, XMD+11, XMD+14, XMD+16, XMD+18, XMD+22, NODATA+1 |
| >> PSUOPTN | SETCNT+3, SETCNT+4 |
| >> PSUPBMG | MSG+11, VARS+7 |
| >> PSURCT | EN+10*, EN+11*, EN+14, EN+16 |
| >> PSURXIEN | EN+8*, EN+9*, EN+11, EN+14, EN+16 |
| >> PSUSMRY | MSG+12, MSG+14 |
| >> PSUSNDR | NODATA+1, NODATA+2 |
| >> PSUST | EN+23*, EN+24*, EN+26, EN+27, EN+28 |
| >> PSUST1 | EN+25*, EN+26*, EN+27, EN+28 |
| PSUTLC | XMD+1~, XMD+21*, XMD+22*, VARS+12*, VARS+14 |
| PSUTMC | XMD+1~ |
| >> PSUTMP | EN+5* |
| >> PSUXMYH | VARS+8 |
| >> PSUXMYS1 | VARS+9 |
| U | EN+27 |
| >> X | MSG+7*, MSG+8*, MSG+10*, XMD+6*, XMD+9, XMD+13, XMD+14, XMD+15, XMD+16, XMD+18 , XMD+22*, VARS+2*, VARS+3*, NODATA+5* |
| >> XMCHAN | VARS+6* |
| >> XMSUB | VARS+4* |
| >> XMTEXT | VARS+5* |
| >> XMY | VARS+8*, VARS+9* |
| >> Y | MSG+8, VARS+3 |
| >> Z | MSG+5*, XMD+15* |