©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
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 |
| Package | Total | Caller Graph |
|---|---|---|
| Pharmacy Benefits Management | 2 | PSUAR0 PSUAR3 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| NODATA | ;EP Build a NODATA Message
|
|
| 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
|
| 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 |