RAHLEXF ;HIRMFO/BNT - RAD/NUC MED HL7 Exceptions filer; Jan 08, 2025@09:12:49
Source file <RAHLEXF.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ENX(HLRADT,RAMSG) | ; v2.4 Entry point called from Bridge routine.
|
|
| EN1 | ; v2.3 Entry point called from Bridge routine.
|
|
| RAERR | ; Build array and update Exceptions File.
|
|
| MAIL(SAN,SAF,RAERR,RACN,RADFN,RADT,RAUSR) | ; Send mail message with error text.
|
|
| EXIT | ; Kill variables and return to bridge routine..
|
| FileNo | Call Tags |
|---|---|
| ^RA(79.7 - [#79.7] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | MAIL+16 |
| ^RA(79.7 - [#79.7] | ENX+36, EN1+37 |
| ^TMP("RARPT-HL7" | EN1+7, EN1+33 |
| ^TMP("RARPT-REC" | ENX+11, ENX+15, ENX+25, EN1+11, EN1+15, EN1+25 |
| ^XMB(3.8 - [#3.8] | MAIL+42 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> HL("SAF" | ENX+45, EN1+46 |
| >> HL("SAN" | ENX+22, EN1+22 |
| >> HL("SAP" | ENX+35, EN1+36 |
| >> 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+45, EN1+1~, EN1+8*, EN1+46, RAERR+1, MAIL~, MAIL+21*, MAIL+29 , EXIT+1! |
| RAERR | ENX+19, ENX+45, EN1+19, EN1+46, MAIL~, MAIL+36 |
| RAERRX | ENX+1~, ENX+19*, ENX+37, ENX+38, EN1+1~, EN1+19*, EN1+38, EN1+39, 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*, RAERR+8* |
| RAEXFIL | ENX+1~, ENX+4*, EN1+1~, EN1+4*, RAERR+1, RAERR+2, RAERR+3, RAERR+4, RAERR+5, RAERR+6 , RAERR+7, RAERR+8, EXIT+1! |
| RALNGCS | ENX+1~, ENX+15*, ENX+16*, ENX+45, EN1+1~, EN1+15*, EN1+16*, EN1+46, RAERR+5, EXIT+1! |
| RAMGP | MAIL+11~, MAIL+13*, MAIL+14, MAIL+38, MAIL+42 |
| RAMSG | ENX~, EN1+1~, EN1+33*, RAERR+7, EXIT+1! |
| RAPT | ENX+1~, ENX+11*, ENX+12*, ENX+45, EN1+1~, EN1+11*, EN1+12*, EN1+46, RAERR+4, MAIL+16* , MAIL+17*, MAIL+32, EXIT+1! |
| RARPX | ENX+37*, ENX+38*, EN1+38*, EN1+39*, RAERR+8, EXIT+1! |
| RASAP | ENX+35~*, ENX+36, EN1+36~*, EN1+37 |
| >> RASUB | ENX+11, ENX+15, ENX+25, EN1+11, EN1+15, EN1+25 |
| RAUSR | ENX+1~, ENX+25*, ENX+26*, ENX+45, EN1+1~, EN1+25*, EN1+26*, EN1+46, 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+45, EN1+1~, EN1+22*, EN1+46, 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! |