Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: RAHLTCPX

Package: Radiology Nuclear Medicine

Routine: RAHLTCPX


Information

RAHLTCPX ;HIRMFO/RTK,RVD,GJC - Rad/Nuc Med HL7 TCP/IP Bridge;02/11/08

Source Information

Source file <RAHLTCPX.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
Radiology Nuclear Medicine 7 ASTATUS^RAHLACK  ENX^RAHLEXF  EN1^RAHLO  ESIG^RAHLO3  $$GETSFLAG^RAHLRU  ($$VFIER,PARSEG,SR)^RAHLRU1  EN2^RAUTL20  
Health Level Seven 1 GENACK^HLMA1  
Kernel 1 $$DT^XLFDT  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Radiology Nuclear Medicine 1 RAHLTCPB  

Entry Points

Name Comments DBIA/ICR reference
PV1 ;Ignored at this time.
ERR ;
PROCESS ; -- pull message text
112 ;
PID ; Pick data off the 'PID' segment.
OBX3 ;set the values for OBX-3.1 & OBX-3.2
XIT1
EN1 ; Main entry point; Build the ^TMP("RARPT-REC" global
INIT ; -- initialize
XIT ;
DEESC(RASTR) ;Replace escape sequences with their field separator and escape character
OBX ; Pick data off the 'OBX' segments
MSH ;
GENACK ; Compile the 'ACK' segment, generate the 'ACK' message.
OBR ; Pick data off the 'OBR' segment.
ORC ; Pick data off the 'ORC' segment

External References

Name Field # of Occurrence
GENACK^HLMA1 GENACK+11
ASTATUS^RAHLACK GENACK+13
ENX^RAHLEXF ERR+4
EN1^RAHLO XIT+2, XIT+5
ESIG^RAHLO3 OBR+57
$$GETSFLAG^RAHLRU INIT+7
$$VFIER^RAHLRU1 OBR+34, OBR+55
PARSEG^RAHLRU1 PROCESS+6
SR^RAHLRU1 OBR+36, OBR+45
EN2^RAUTL20 112+4
$$DT^XLFDT INIT+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT("SSN" PID+16
^RADPT("ADC" OBR+17, OBR+18
^RADPT("ADC1" OBR+20, OBR+21
^TMP( OBR+8!*, OBR+14*, OBR+24*, OBR+25*, OBR+31*, OBR+39*, OBR+40*, OBR+48*, OBR+49*, OBR+50*
, OBR+56*, OBR+59, OBR+60*, 112+1!*, OBX+35*, XIT+3, XIT+4!, XIT1+1!
^TMP("RARPT-REC" INIT+3!, INIT+4*, INIT+5*, INIT+6*, PID+19*, PID+22*, OBR+8, OBX+34*, XIT+2, XIT+4!*
, XIT1!
^TMP("RARPT-REC-" 112+1!
^XUSEC("RA VERIFY" OBR+35

Label References

Name Line Occurrences
$$DEESC OBX+29
112 OBR+32
@( PROCESS+7
ERR XIT+1, XIT+2, XIT+5
GENACK ERR+5
INIT EN1+5
PROCESS EN1+5
XIT EN1+5, OBR+26, OBR+27
XIT1 XIT+1, XIT+2, XIT+5

Naked Globals

Name Field # of Occurrence
^("RAWHOCHANGE" OBR+40*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ARR EN1+2~, PROCESS+6!, OBR+10~
ARR(1 PROCESS+6*
CNT 112+3~
>> HL("DTM" INIT+9
>> HL("ECH" INIT+11, INIT+12, INIT+13, INIT+14
>> HL("EID" GENACK+10
>> HL("EIDS" GENACK+10
>> HL("ESIG" INIT+6
>> HL("ETN" INIT+7
>> HL("FS" INIT+10, GENACK+9
>> HL("MID" INIT+2, GENACK+9
>> HL("MTN" INIT+7
>> HL("SAN" INIT+5, INIT+7, GENACK+4, GENACK+5, GENACK+13
>> HL("VER" INIT+7
>> HLA("HLA" GENACK+9*
HLARYTYP GENACK+2~, GENACK+10*, GENACK+11
HLCS EN1+2~, INIT+11*, OBR+14, OBR+54, OBX+15, OBX+18, OBX+21, OBX+24, OBX+25
HLDTM EN1+2~, INIT+9*, ERR+4
>> HLECH INIT+14*, DEESC+19, DEESC+20, DEESC+21, DEESC+22
>> HLEID GENACK+10*, GENACK+11
>> HLEIDS GENACK+10*, GENACK+11
HLFORMAT GENACK+2~, GENACK+10*, GENACK+11
HLFS EN1+2~, INIT+10*, PROCESS+4, PROCESS+5, PROCESS+7, DEESC+18
>> HLMTIENS GENACK+11
>> HLNEXT PROCESS+2
>> HLNODE PROCESS+3*, PROCESS+4, PROCESS+5, PROCESS+6, PROCESS+7
>> HLNODE( PROCESS+3*!
>> HLNODE(1 PROCESS+3!
>> HLQUIT PROCESS+2
>> HLREP INIT+13*, OBR+44
HLRESLT GENACK+11!
HLSCS EN1+2~, INIT+12*
I OBR+44*, OBR+49, OBR+50, OBR+59*, XIT+5~
>> J PROCESS+3*
MSA1 EN1+2~, GENACK+3*, GENACK+5*, GENACK+9
PAR EN1+2~, PROCESS+6!
PAR(2 ORC+10, ORC+11
PAR(20 PID+22
PAR(26 OBR+29, OBR+30, OBR+31, OBR+34, OBR+55
PAR(3 PID+17
PAR(33 OBR+34
PAR(34 OBR+42, OBR+44
PAR(36 OBR+54
PAR(4 PID+16, OBR+13, OBR+14, OBX+14, OBX+15, OBX+18, OBX+21
PAR(6 OBX+27
RACKYES EN1+4~, INIT+2*, XIT+2*, XIT+5*, ERR+3*, GENACK+1
RACN 112+3~
>> RACNI OBR+18*, OBR+21*, OBR+23, OBR+25, OBR+27, 112+1, 112+4
RACNPPP EN1+4~, INIT+2*, ORC+11*, OBR+59, 112+1*, OBX+35, XIT+2, XIT+3, XIT+5, XIT1+1
RACSESC DEESC+13~, DEESC+14*, DEESC+19
>> RADFN PID+16*, PID+17*, PID+18, PID+19, OBR+17, OBR+18, OBR+20, OBR+21
>> RADTI OBR+17*, OBR+18, OBR+20*, OBR+21, OBR+22, OBR+24, OBR+26, 112+1, 112+2, 112+4
RAERR EN1+3~, INIT+2!, PROCESS+9*, PROCESS+10*, PROCESS+11*, PID+18*, OBR+26*, OBR+27*, OBR+29*, OBR+30*
, OBR+34*, OBR+35*, OBR+37*, OBR+38*, OBR+55*, OBX+14*, OBX+15*, OBX+20*, OBX+25*, ERR+2
, GENACK+5, GENACK+9
>> RAERRCHK XIT+1, XIT+2, XIT+5, ERR+1*, ERR+3*
RAESESC DEESC+13~, DEESC+14*, DEESC+21
RAESIG EN1+3~
RAEXIT EN1+2~, PROCESS+2, PROCESS+8, PID+18*, OBR+29*, OBR+30*, OBR+34*, OBR+35*, OBR+37*, OBR+38*
, OBR+55*, OBX+14*, OBX+15*, OBX+20*, ERR+3*
RAFSESC DEESC+13~, DEESC+14*, DEESC+18
RAHLTCPB EN1+3~, INIT+2*
RAI EN1+2~, OBR+10~, OBX+18*, OBX+24*, OBX+35*, XIT+3*, XIT+5, XIT1+1*
>> RALONGCN OBR+14*, OBR+15, OBR+16, OBR+17, OBR+18, OBR+19, OBR+20, OBR+21
RANODE EN1+3~, OBX+27*, OBX+34, OBX+35
RANOSEND EN1+3~, INIT+7*
RAOBX3 OBX+13*, OBX+15, OBX+18, OBX+36!
RAOBX3( OBX+18*
RAOBX3(1 OBX+27, OBX+28, OBX+33, OBX+34, OBX+35
RAOBX3(3 OBX+20
RAPRSET EN1+4~
RAPRSET( 112+1!, 112+2, 112+4*!
RAPRTSET 112+3~
RARCNT EN1+2~
RARCNT( OBX+28*, OBX+34, OBX+35
RARE33 EN1+4~, OBR+44*, OBR+45, OBR+48, OBR+49, OBR+50
RARR OBR+10~, OBR+44*
RARRR EN1+4~, INIT+2*, ORC+10*, ORC+11*, OBR+8, OBR+9*, OBR+14, OBR+24, OBR+25, OBR+31
, OBR+32, OBR+39, OBR+40, OBR+48, OBR+49, OBR+50, OBR+56, OBR+59, OBR+60, 112+1
, OBX+35*, XIT+3*, XIT+4, XIT1+1*
RARSDNT OBR+10~, OBR+48*, OBR+56
RARSESC DEESC+13~, DEESC+14*, DEESC+20
RASCESC DEESC+13~, DEESC+14*, DEESC+22
RASEG EN1+3~
RASEG("OBR" PROCESS+10, OBR+7*
RASEG("OBX" PROCESS+11, OBX+14*
RASEG("ORC" ORC+10*
RASEG("PID" PROCESS+9, PID+23*
>> RASSN PID+22*
>> RASSNVAL PID+16*
>> RAST32 OBR+34*
RASTR OBX+21*, OBX+24*, OBX+25, OBX+36!, DEESC~, DEESC+18*, DEESC+19*, DEESC+20*, DEESC+21*, DEESC+22*
, DEESC+24
RASTR(0 OBX+21*, OBX+25
RASTRE EN1+4~, OBR+37, OBR+38, OBR+45, OBR+46, OBR+48, OBR+49, OBR+50
RASUB EN1+3~, INIT+2*, INIT+3, INIT+4, INIT+5, INIT+6, PID+19, PID+22, OBR+14, OBR+24
, OBR+25, OBR+31, OBR+39, OBR+40, OBR+48, OBR+49, OBR+50, OBR+56, OBR+59, OBR+60
, 112+3~, OBX+34, OBX+35, ERR+4, GENACK+13
RAT35 EN1+4~, OBR+55*
>> RATELE GENACK+5
RATRANSC OBR+10~, OBR+54*, OBR+55, OBR+56
RAVERF EN1+3~, OBR+10~, OBR+34*, OBR+35, OBR+36, OBR+39, OBR+40, OBR+56
RAX EN1+2~, OBR+10~, OBX+13~, OBX+24*, OBX+27*, OBX+29*, OBX+33*, OBX+34, OBX+35
RAX1 OBR+10~
RAX2 OBR+10~
RAXX EN1+2~, OBR+59!*, OBR+60, 112+4!
RAXXX OBR+60~*
RAY EN1+2~
RAYES DEESC+15~, DEESC+16, DEESC+17*, DEESC+18*, DEESC+19*, DEESC+20*, DEESC+21*, DEESC+22*
RESULT GENACK+2~, GENACK+11, GENACK+12, GENACK+13
U PROCESS+5, PID+16, PID+17, OBR+37, GENACK+13

Marked Items

Name Field # of Occurrence
$T(OBX3+RAI OBX+24
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All