Routine: RAHLTCPX

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
VA FileMan	1	$$GET1^DIQ

Package	Total	Caller Graph
Radiology Nuclear Medicine	1	RAHLTCPB

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

Name	Field # of Occurrence
$$GET1^DIQ	INIT+11
GENACK^HLMA1	GENACK+12
ASTATUS^RAHLACK	GENACK+14
ENX^RAHLEXF	ERR+4
EN1^RAHLO	XIT+2, XIT+5
ESIG^RAHLO3	OBR+73
$$GETSFLAG^RAHLRU	INIT+7
$$VFIER^RAHLRU1	OBR+50, OBR+71
PARSEG^RAHLRU1	PROCESS+6
SR^RAHLRU1	OBR+52, OBR+61
EN2^RAUTL20	112+4
$$DT^XLFDT	INIT+4

FileNo	Call Tags
^RA(79.7 - [#79.7]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^DPT("SSN"	PID+16
^RA(79.7 - [#79.7]	INIT+11
^RADPT - [#70]	PID+23
^RADPT("ADC"	OBR+21, OBR+22, OBR+32, OBR+33
^RADPT("ADC1"	OBR+25, OBR+26, OBR+27, OBR+31
^TMP(	OBR+8!, OBR+38, OBR+39, OBR+40, OBR+47, OBR+55, OBR+56, OBR+64, OBR+65, OBR+66 , OBR+72, OBR+75, OBR+76, 112+1!, OBX+41, OBX+48*, XIT+3, XIT+4!, XIT1+1!
^TMP("RARPT-REC"	INIT+3!, INIT+4, INIT+5, INIT+6, PID+27, PID+31, OBR+8, OBX+35, OBX+40, OBX+45 , OBX+47, XIT+2, XIT+4!, XIT1!
^TMP("RARPT-REC-"	112+1!
^XUSEC("RA VERIFY"	OBR+51

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

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

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+14
>> HL("ECH"	INIT+16, INIT+17, INIT+18, INIT+19
>> HL("EID"	GENACK+11
>> HL("EIDS"	GENACK+11
>> HL("ESIG"	INIT+6
>> HL("ETN"	INIT+7
>> HL("FS"	INIT+15, GENACK+10
>> HL("MID"	INIT+2, GENACK+10
>> HL("MTN"	INIT+7
>> HL("SAN"	INIT+5, INIT+7, GENACK+5, GENACK+6, GENACK+14
>> HL("SAP"	INIT+10
>> HL("VER"	INIT+7
>> HLA("HLA"	GENACK+10*
HLARYTYP	GENACK+3~, GENACK+11*, GENACK+12
HLCS	EN1+2~, INIT+16*, OBR+15, OBR+70, OBX+15, OBX+18, OBX+21, OBX+24, OBX+25
HLDTM	EN1+2~, INIT+14*, ERR+4
>> HLECH	INIT+19*, DEESC+19, DEESC+20, DEESC+21, DEESC+22
>> HLEID	GENACK+11*, GENACK+12
>> HLEIDS	GENACK+11*, GENACK+12
HLFORMAT	GENACK+3~, GENACK+11*, GENACK+12
HLFS	EN1+2~, INIT+15*, PROCESS+4, PROCESS+5, PROCESS+7, DEESC+18
>> HLMTIENS	GENACK+12
>> 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+18*, OBR+60
HLRESLT	GENACK+12!
HLSCS	EN1+2~, INIT+17*
I	OBR+60, OBR+65, OBR+66, OBR+75, XIT+5~
>> J	PROCESS+3*
MSA1	EN1+2~, GENACK+4, GENACK+6, GENACK+10
PAR	EN1+2~, PROCESS+6!
PAR(2	ORC+10, ORC+11
PAR(20	PID+31
PAR(26	OBR+45, OBR+46, OBR+47, OBR+50, OBR+71
PAR(3	PID+17
PAR(33	OBR+50
PAR(34	OBR+58, OBR+60
PAR(36	OBR+70
PAR(4	PID+16, OBR+15, 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+22, OBR+27, OBR+33*, OBR+37, OBR+40, 112+1, 112+4
RACNPPP	EN1+4~, INIT+2, ORC+11, OBR+75, 112+1*, OBX+41, OBX+48, XIT+2, XIT+3, XIT+5 , XIT1+1
RACSESC	DEESC+13~, DEESC+14*, DEESC+19
>> RADFN	PID+16, PID+17, PID+18, PID+21, PID+23, PID+27, OBR+21, OBR+22, OBR+26, OBR+27 , OBR+32, OBR+33
RADLIMLEN	OBR+15!*, OBR+16!, OBR+20, OBR+25, OBR+31, OBR+36!, OBR+37!, OBR+41!
>> RADTI	OBR+21, OBR+22, OBR+26, OBR+27, OBR+32*, OBR+33, OBR+36, OBR+39, 112+1, 112+2 , 112+4
RAERR	EN1+3~, INIT+2!, PROCESS+9, PROCESS+10, PROCESS+11, PID+18, PID+21, PID+24, OBR+16, OBR+36 , OBR+37, OBR+45, OBR+46, OBR+50, OBR+51, OBR+53, OBR+54, OBR+71, OBX+14, OBX+15 , OBX+20, OBX+25, ERR+2, GENACK+6, GENACK+10
>> 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, PID+21, PID+25, OBR+45, OBR+46, OBR+50, OBR+51* , OBR+53, OBR+54, OBR+71, 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+41, OBX+48, XIT+3, XIT+5, XIT1+1
RAII	OBX+38~, OBX+39*
RAL	OBX+38~, OBX+39*
>> RALONGCN	OBR+15, OBR+21, OBR+22, OBR+25, OBR+26, OBR+27, OBR+31, OBR+32, OBR+33, OBR+34 , OBR+38
RANODE	EN1+3~, OBX+27*, OBX+35, OBX+40, OBX+41, OBX+45, OBX+47, OBX+48
RANOSEND	EN1+3~, INIT+7*, INIT+11!
RAOBX3	OBX+13*, OBX+15, OBX+18, OBX+49!
RAOBX3(	OBX+18*
RAOBX3(1	OBX+27, OBX+28, OBX+34, OBX+35, OBX+40, OBX+41, OBX+42, OBX+45, OBX+47, OBX+48
RAOBX3(3	OBX+20
>> RAOPT("REPROC"	INIT+9, GENACK+2
RAPRSET	EN1+4~
RAPRSET(	112+1!, 112+2, 112+4*!
RAPRTSET	112+3~
RARCNT	EN1+2~
RARCNT(	OBX+28, OBX+35, OBX+40, OBX+41, OBX+42, OBX+45, OBX+47, OBX+48
RARE33	EN1+4~, OBR+60*, OBR+61, OBR+64, OBR+65, OBR+66
RARR	OBR+10~, OBR+60*
RARRR	EN1+4~, INIT+2, ORC+10, ORC+11, OBR+8, OBR+9, OBR+38, OBR+39, OBR+40, OBR+47 , OBR+48, OBR+55, OBR+56, OBR+64, OBR+65, OBR+66, OBR+72, OBR+75, OBR+76, 112+1 , OBX+41, OBX+48, XIT+3, XIT+4, XIT1+1
RARSDNT	OBR+10~, OBR+64*, OBR+72
RARSESC	DEESC+13~, DEESC+14*, DEESC+20
RASAP	INIT+10~*, INIT+11
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+32*
>> RASSN	PID+31*
>> RASSNVAL	PID+16*
>> RAST32	OBR+50*
RASTR	OBX+21, OBX+24, OBX+25, OBX+49!, DEESC~, DEESC+18, DEESC+19, DEESC+20, DEESC+21, DEESC+22* , DEESC+24
RASTR(0	OBX+21*, OBX+25
RASTRE	EN1+4~, OBR+53, OBR+54, OBR+61, OBR+62, OBR+64, OBR+65, OBR+66
RASUB	EN1+3~, INIT+2*, INIT+3, INIT+4, INIT+5, INIT+6, PID+27, PID+31, OBR+38, OBR+39 , OBR+40, OBR+47, OBR+55, OBR+56, OBR+64, OBR+65, OBR+66, OBR+72, OBR+75, OBR+76 , 112+3~, OBX+35, OBX+40, OBX+41, OBX+45, OBX+47, OBX+48, ERR+4, GENACK+14
RAT35	EN1+4~, OBR+71*
>> RATELE	GENACK+6
RATRANSC	OBR+10~, OBR+70*, OBR+71, OBR+72
RAVERF	EN1+3~, OBR+10~, OBR+50*, OBR+51, OBR+52, OBR+55, OBR+56, OBR+72
RAX	EN1+2~, OBR+10~, OBX+13~, OBX+24, OBX+27, OBX+29, OBX+35, OBX+37, OBX+39, OBX+44* , OBX+45, OBX+47, OBX+48
RAX1	OBR+10~
RAX2	OBR+10~
RAXM	OBX+38~, OBX+39*, OBX+40, OBX+41
RAXX	EN1+2~, OBR+75!*, OBR+76, 112+4!
RAXXX	OBR+76~*
RAY	EN1+2~
RAYES	DEESC+15~, DEESC+16, DEESC+17, DEESC+18, DEESC+19, DEESC+20, DEESC+21, DEESC+22
RESULT	GENACK+3~, GENACK+12, GENACK+13, GENACK+14
U	PROCESS+5, PID+16, PID+17, OBR+53, OBX+35, OBX+37, GENACK+14

Customize PDF page

Package: Radiology Nuclear Medicine

Routine: RAHLTCPX

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 1

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items