©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
PSUCSR0 ;BIR/DJM,DJE - Extract records for CS ;25 AUG 1998
Source file <PSUCSR0.m>
| Package | Total | Call Graph |
|---|---|---|
| Pharmacy Benefits Management | 2 | (EN,SUMMRY)^PSUCSR1 $$VAL^PSUTL |
| MailMan | 1 | ^XMD |
| VA Fileman | 1 | IX^DIC |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| TEST | ||
| DIV(PSUMSG) | ;EP returns PSUMSG("M")= # MESSAGES ("L")= # LINES
; Scan TMP, split lines, transmit per MAX lines in Netmail |
|
| EN(PSUMSG) | ;Scan and process for Division(s)
; PSUMSGT ("M")= # MESSAGES ("L")= # LINES |
|
| VARS(PSUMMS,S,E) | ; Setup variables for contents
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD("DD" | TEST, TEST+1 |
| ^XTMP( | TEST+6!, TEST+7!, TEST+8!, TEST+12, DIV+7!, DIV+9, DIV+11, DIV+12, DIV+18*, DIV+20* , DIV+22*, DIV+27*, DIV+28*, DIV+29*, VARS+4, VARS+6, VARS+7, VARS+8, VARS+9, VARS+10 , VARS+13 |
| ^XTMP("PSU_" | TEST+22* |
| Name | Line Occurrences |
|---|---|
| DIV | TEST+14, TEST+19 |
| VARS | TEST+21 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> D | VARS+11* |
| >> DIC | VARS+11* |
| >> DIC(0 | VARS+11* |
| DUZ | TEST+2, TEST+9 |
| E | VARS~, VARS+3 |
| >> I | DIV+19*, DIV+20, DIV+22 |
| >> PSUCSJB | TEST+4*, TEST+6, TEST+7, TEST+8, TEST+12, DIV+7, DIV+9, DIV+11, DIV+12, DIV+18 , DIV+20, DIV+22, DIV+27, DIV+28, DIV+29, VARS+4, VARS+6, VARS+7, VARS+8, VARS+9 , VARS+10, VARS+13 |
| >> PSUDIV | TEST+3*, TEST+12*, TEST+18*, DIV+9, DIV+11, DIV+12, DIV+28, DIV+30, DIV+31, VARS+7* , VARS+11, VARS+15 |
| >> PSUDIVNM | VARS+12*, VARS+15 |
| >> PSUDTE | TEST+1* |
| >> PSUDTS | TEST* |
| >> PSUDUZ | TEST+2*, TEST+10, DIV+15, VARS+2 |
| >> PSUEDT | TEST+1 |
| >> PSUJOB | TEST+4, TEST+22 |
| >> PSULC | DIV+8*, DIV+10*, DIV+17* |
| >> PSUM | VARS+3*, VARS+4, VARS+6, VARS+7, VARS+8, VARS+9, VARS+10, VARS+13 |
| >> PSUMASF | DIV+15 |
| >> PSUMAX | DIV+2*, DIV+3*, DIV+17 |
| >> PSUMC | TEST+5*, TEST+17, TEST+21, DIV+6*, DIV+7, DIV+17*, DIV+18, DIV+20, DIV+22, DIV+27 , DIV+28, DIV+29, DIV+30, VARS+1*, VARS+5* |
| >> PSUMLC | DIV+6*, DIV+16*, DIV+17*, DIV+18, DIV+20, DIV+21*, DIV+22, DIV+25, DIV+26*, DIV+27 , DIV+31, VARS+6* |
| PSUMMS | VARS~ |
| >> PSUMON | VARS+15 |
| >> PSUMSEQ | TEST+13*, TEST+18*, DIV+6*, DIV+29, VARS+13*, VARS+14*, VARS+15 |
| PSUMSG | EN~, DIV~ |
| PSUMSG( | DIV+30*, DIV+31* |
| >> PSUOMC | DIV+6*, DIV+29, DIV+30 |
| >> PSUPBMG | DIV+15 |
| >> PSURC | DIV+11*, DIV+12 |
| >> PSUSDT | TEST |
| >> PSUSMRY | DIV+14 |
| >> PSUSNDR | TEST+18 |
| >> PSUTIEN | DIV+8*, DIV+9*, DIV+11, DIV+12 |
| >> PSUTLC | DIV+8*, DIV+16*, VARS+1*, VARS+6* |
| >> PSUXMY | TEST+10 |
| >> PSUXMY( | TEST+9*, TEST+10* |
| >> PSUXMYH | VARS+8 |
| >> PSUXMYS1 | VARS+9 |
| >> PSUXMYS2 | VARS+10 |
| S | VARS~, VARS+3 |
| >> X | DIV+12*, DIV+18, DIV+19, DIV+20, DIV+22, VARS+11*, VARS+12* |
| >> XMCHAN | VARS+17* |
| >> XMDUZ | VARS+2* |
| >> XMSUB | VARS+15* |
| >> XMTEXT | VARS+16* |
| >> XMY | VARS+8*, VARS+9*, VARS+10* |
| >> Y | TEST*, TEST+1*, VARS+12 |
| Z | TEST+3*, TEST+11~, TEST+14, TEST+15, TEST+19, TEST+20, TEST+22, DIV+19* |