RAHLEXF ;HIRMFO/BNT - RAD/NUC MED HL7 Exceptions filer;01/06/99
Source file <RAHLEXF.m>
Package | Total | Call Graph |
---|---|---|
VA Fileman | 3 | DD^%DT FIND^DIC UPDATE^DIE |
Health Level Seven | 2 | $$GETAPP^HLCS2 $$FMDATE^HLFNC |
MailMan | 1 | ^XMD |
Package | Total | Caller Graph |
---|---|---|
Radiology Nuclear Medicine | 2 | RAHLTCPB RAHLTCPX |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN1 | ; Entry point called from Bridge routine.
|
|
ENX(HLRADT,RAMSG) | ; Entry point called from Bridge routine.
|
|
EXIT | ; Kill variables and return to bridge routine..
|
|
MAIL(SAN,SAF,RAERR,RACN,RADFN,RADT,RAUSR) | ; Send mail message with error text.
|
|
RAERR | ; Build array and update Exceptions File.
|
FileNo | Call Tags |
---|---|
^VA(200 - [#200] | FIND^DIC |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DPT - [#2] | MAIL+16 |
^TMP("RARPT-HL7" | EN1+7, EN1+32 |
^TMP("RARPT-REC" | ENX+11, ENX+15, ENX+25, EN1+11, EN1+15, EN1+25 |
^XMB(3.8 - [#3.8] | MAIL+42 |
Name | Line Occurrences |
---|---|
EXIT | ENX+40, EN1+40 |
ENX+38, EN1+38 | |
RAERR | ENX+35, EN1+35 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> HL("SAF" | ENX+38, EN1+38 |
>> HL("SAN" | ENX+22, EN1+22 |
>> HLMTIENS | MAIL+30 |
HLRADT | ENX~, ENX+7*, ENX+8, EN1+1~, EN1+7*, EN1+8 |
RACN | MAIL~, MAIL+19*, MAIL+32 |
RADFN | MAIL~, MAIL+16 |
RADT | ENX+1~, ENX+8*, ENX+38, EN1+1~, EN1+8*, EN1+38, RAERR+1, MAIL~, MAIL+21*, MAIL+29 , EXIT+1! |
RAERR | ENX+19, ENX+38, EN1+19, EN1+38, MAIL~, MAIL+36 |
RAERRX | ENX+1~, ENX+19*, EN1+1~, EN1+19*, RAERR+3, EXIT+1! |
RAERTXT | MAIL+11~ |
RAERTXT(1 | MAIL+28* |
RAERTXT(10 | MAIL+38* |
RAERTXT(11 | MAIL+39* |
RAERTXT(2 | MAIL+29*, MAIL+30* |
RAERTXT(3 | MAIL+31* |
RAERTXT(4 | MAIL+32* |
RAERTXT(5 | MAIL+33* |
RAERTXT(6 | MAIL+34* |
RAERTXT(7 | MAIL+35* |
RAERTXT(8 | MAIL+36* |
RAERTXT(9 | MAIL+37* |
RAEX | ENX+1~, EN1+1~, EXIT+1! |
RAEX(0 | RAERR+1*, RAERR+2*, RAERR+3*, RAERR+4*, RAERR+5*, RAERR+6*, RAERR+7* |
RAEXFIL | ENX+1~, ENX+4*, EN1+1~, EN1+4*, RAERR+1, RAERR+2, RAERR+3, RAERR+4, RAERR+5, RAERR+6 , RAERR+7, EXIT+1! |
RALNGCS | ENX+1~, ENX+15*, ENX+16*, ENX+38, EN1+1~, EN1+15*, EN1+16*, EN1+38, RAERR+5, EXIT+1! |
RAMGP | MAIL+11~, MAIL+13*, MAIL+14, MAIL+38, MAIL+42 |
RAMSG | ENX~, EN1+1~, EN1+32*, RAERR+7, EXIT+1! |
>> RAOUT("DILIST" | ENX+28, ENX+29, EN1+28, EN1+29 |
RAPT | ENX+1~, ENX+11*, ENX+12*, ENX+38, EN1+1~, EN1+11*, EN1+12*, EN1+38, RAERR+4, MAIL+16* , MAIL+17*, MAIL+32, EXIT+1! |
>> RASUB | ENX+11, ENX+15, ENX+25, EN1+11, EN1+15, EN1+25 |
RAUSR | ENX+1~, ENX+25*, ENX+26, ENX+27, ENX+29*, ENX+38, EN1+1~, EN1+25*, EN1+26, EN1+27 , EN1+29*, EN1+38, RAERR+6, MAIL~, MAIL+20*, MAIL+39, MAIL+43, EXIT+1! |
SAF | MAIL~, MAIL+22*, MAIL+26, MAIL+29 |
SAN | MAIL~, MAIL+13, MAIL+22 |
SFAC | ENX+1~, ENX+22*, ENX+38, EN1+1~, EN1+22*, EN1+38, RAERR+2, EXIT+1! |
X | ENX+1~, ENX+8*, EN1+1~, EN1+8*, EXIT+1! |
XMDUZ | MAIL+11~, MAIL+24* |
XMSUB | MAIL+11~, MAIL+26* |
>> XMTEXT | MAIL+40* |
XMY | MAIL+11~ |
XMY( | MAIL+43* |
XMY("G." | MAIL+42* |
Y | ENX+1~, EN1+1~, MAIL+11~, MAIL+21*, EXIT+1! |