PSULR5 ;BIR/PDW - LAB extract summary message generator ;10 JUL 1999
Source file <PSULR5.m>
| Package | Total | Call Graph | 
|---|---|---|
| Registration | 2 | PID^VADPT $$SETSTR^VALM1 | 
| MailMan | 1 | ^XMD | 
| Pharmacy Benefits Management | 1 | $$VAL^PSUTL | 
| VA Fileman | 1 | IX^DIC | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| EN | ;EP generate Total & Cost summary | |
| MSG1 | ;  Generate 1st summary message | |
| MSG2 | ; SUMMARY BY PATIENT | |
| EN1 | ||
| SET | ;EP  Set data into message | |
| DIV | ;EP Loop by Division | |
| NODATA | ;EP SEND NO DATA MESSAGE | |
| MESSAGE | ;EP Generate Summary Messages for a Division | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^DD("DD" | MSG1+13, MSG1+14, NODATA+4, NODATA+5 | 
| ^XTMP( | EN1+6, DIV+1, MSG1+5, MSG1+6, MSG1+8, MSG1+34*, MSG2+20, MSG2+23, MSG2+26, SET+2 , NODATA+21*, NODATA+24* | 
| ^XTMP("PSU_" | MSG1+19, MSG1+21, MSG1+22 | 
| Name | Line Occurrences | 
|---|---|
| MESSAGE | DIV+1 | 
| NODATA | EN1+6 | 
| SET | MSG2+26 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| >> D | MSG1+16*, NODATA+7* | 
| >> DFN | MSG1+4*, MSG1+5*, MSG1+6, MSG1+8, MSG2+19*, MSG2+20*, MSG2+23, MSG2+26, SET+2, SET+9 , SET+10 | 
| >> DFN1 | MSG2+19*, MSG2+20*, SET+9, SET+10* | 
| >> DIC | MSG1+16*, NODATA+7* | 
| >> DIC(0 | MSG1+16*, NODATA+7* | 
| DUZ | MSG1+10, NODATA+1 | 
| >> PSUCD | MSG2+22*, MSG2+23*, MSG2+26, SET+2, SET+11, SET+12 | 
| >> PSUCD1 | MSG2+19*, MSG2+23*, SET+10*, SET+11, SET+12* | 
| >> PSUDC | MSG1+6*, MSG1+8 | 
| >> PSUDIV | DIV+1*, MSG1+5, MSG1+6, MSG1+8, MSG1+16, MSG1+19, MSG1+21, MSG1+22, MSG1+30, MSG1+34 , MSG2+20, MSG2+23, MSG2+26, MSG2+29, SET+2, NODATA+6*, NODATA+7, NODATA+9, NODATA+21, NODATA+22 , NODATA+24 | 
| >> PSUDIVNM | MSG1+17*, MSG1+22*, MSG1+25, MSG1+30, MSG2+6, MSG2+29, NODATA+8*, NODATA+9, NODATA+14, NODATA+22 | 
| >> PSUDTE | MSG1+14*, MSG1+25, MSG2+6, NODATA+5*, NODATA+14 | 
| >> PSUDTS | MSG1+13*, MSG1+25, MSG2+6, NODATA+4*, NODATA+14 | 
| >> PSUDUZ | NODATA+19 | 
| >> PSUEDT | MSG1+14, NODATA+5 | 
| >> PSUG | MSG2+3*, MSG2+4, MSG2+5, MSG2+6, MSG2+7, MSG2+14, MSG2+16, MSG2+28, SET+18 | 
| PSUITT | EN1~ | 
| >> PSUJOB | EN1+1, MSG1+19, MSG1+21, MSG1+22 | 
| >> PSULC | MSG2+17*, MSG2+28, SET+17*, SET+18 | 
| >> PSULD | SET+4*, SET+5, SET+6, SET+7*, SET+16 | 
| >> PSULD0 | SET+5*, SET+7 | 
| >> PSULRF | SET+4*, SET+15 | 
| >> PSULRJOB | EN1+1*, EN1+2 | 
| >> PSULRR | SET+3*, SET+14 | 
| >> PSULRSUB | EN1+2*, EN1+6, DIV+1, MSG1+5, MSG1+6, MSG1+8, MSG1+34, MSG2+20, MSG2+23, MSG2+26 , SET+2, NODATA+21, NODATA+24 | 
| >> PSULRT | SET+3*, SET+13 | 
| >> PSUMON | MSG1+30, MSG2+29, NODATA+9, NODATA+22 | 
| PSUMSG | MSG1+15~, MSG1+34, MSG1+35! | 
| PSUMSG(1 | MSG1+24* | 
| PSUMSG(2 | MSG1+25* | 
| PSUMSG(3 | MSG1+26* | 
| PSUMSG(4 | MSG1+27* | 
| PSUMSG(5 | MSG1+28* | 
| PSUMSG(6 | MSG1+29* | 
| >> PSUND | MSG1+7*, MSG1+8*, MSG2+25*, MSG2+26*, SET+2 | 
| >> PSUP | MSG1+2*, MSG1+5*, MSG1+27 | 
| PSUREC | EN1~ | 
| >> PSUSDT | MSG1+13, NODATA+4 | 
| >> PSUSMRY | MSG2+33 | 
| >> PSUSNDR | NODATA+6 | 
| >> PSUT | MSG1+2*, MSG1+8*, MSG1+28 | 
| >> PSUXMYS1 | MSG1+11, NODATA+2 | 
| >> PSUXMYS2 | MSG2+32 | 
| U | MSG1+21, MSG1+22, SET+3, SET+4 | 
| VA | SET+10! | 
| VA("PID" | SET+10 | 
| X | MSG1+16*, MSG1+17*, MSG2+8*, MSG2+9*, MSG2+10*, MSG2+11*, MSG2+12*, MSG2+13*, MSG2+14, MSG2+15* , MSG2+16, SET+2*, SET+3, SET+4, SET+6*, SET+7, SET+8*, SET+10*, SET+12*, SET+13* , SET+14*, SET+15*, SET+16*, SET+18, NODATA+7*, NODATA+8*, NODATA+12!, NODATA+21, NODATA+24 | 
| X(1 | NODATA+13*, NODATA+23* | 
| X(2 | NODATA+14* | 
| X(3 | NODATA+15* | 
| X(4 | NODATA+16* | 
| X(5 | NODATA+17* | 
| >> XMCHAN | MSG1+32*, MSG2+31*, NODATA+11* | 
| >> XMDUZ | MSG1+10*, NODATA+1* | 
| >> XMSUB | MSG1+30*, MSG2+29*, NODATA+9*, NODATA+22* | 
| >> XMTEXT | MSG1+31*, MSG2+30*, NODATA+10*, NODATA+18* | 
| >> XMY | MSG1+11*, MSG2+32*, NODATA+2* | 
| >> XMY( | NODATA+19* | 
| >> Y | MSG1+13*, MSG1+14*, MSG1+17, NODATA+4*, NODATA+5*, NODATA+8 |