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 |