Routine: RAHLR1A

Information

RAHLR1A ;HISC/GJC - Generate Common Order (ORM) Message ;11/10/99 10:42

Source Information

Source file <RAHLR1A.m>

Call Graph

Call Graph Total: 11

Package	Total	Call Graph
Radiology Nuclear Medicine	5	$$GETSIUID^RAAPI $$NAMCODE^RACPTMSC ALLERGY^RADEM ($$CPTMOD,$$ESCAPE,$$OBR21)^RAHLRU ($$REPEAT,$$RTNSUB,$$SPECSRC,BLSEG)^RAHLRU1
Kernel	2	$$FMTHL7^XLFDT $$HLNAME^XLFNAME
Uncategorized	2	NPFON^MAG7UFO ($$STUDYUID,$$ZDS)^MAGDRAHL
VA Fileman	2	$$GET1^DIQ ^DIWP

Caller Graph

Caller Graph Total: 2

Package	Total	Caller Graph
Radiology Nuclear Medicine	2	RAHLR1 RAHLRPT1

Entry Points

Name	Comments	DBIA/ICR reference
OBXCPTM	;Compile 'OBX' segment for CPT modifiers
EN	;Called from RAHLR1; used to build the OBR, OBX, & ZDS segments
OBXALL	;Compile 'OBX' Segment for Allergies
OBXPMOD	;Compile 'OBX' segment for procedure modifiers
OBXTCOM	;Compile 'OBX' segment for tech comments
EXIT	;clean up symbol table are return to RAHLR1
OBXHIST	;Compile 'OBX' Segment for Clinical History
OBXPRC	;Compile 'OBX' Segment for Procedure
OBRPRC	;OBR segment
ZDS(RADTI,RACNI,RAZDAYCS)	;Compile the 'ZDS' segment

External References

Name	Field # of Occurrence
$$GET1^DIQ	OBRPRC+23
^DIWP	OBXHIST+18
NPFON^MAG7UFO	OBRPRC+32
$$STUDYUID^MAGDRAHL	ZDS+22
$$ZDS^MAGDRAHL	ZDS+17, ZDS+23
$$GETSIUID^RAAPI	ZDS+16
$$NAMCODE^RACPTMSC	OBRPRC+7
ALLERGY^RADEM	OBXALL+1
$$CPTMOD^RAHLRU	OBXCPTM+6
$$ESCAPE^RAHLRU	OBRPRC+13, OBRPRC+14, OBRPRC+33, OBRPRC+59, OBXPRC+4, OBXPMOD+6, OBXHIST+4, OBXHIST+24, OBXALL+7, OBXTCOM+6
$$OBR21^RAHLRU	OBRPRC+52
$$REPEAT^RAHLRU1	OBRPRC+20, OBRPRC+64
$$RTNSUB^RAHLRU1	ZDS+17, ZDS+23
$$SPECSRC^RAHLRU1	OBRPRC+19
BLSEG^RAHLRU1	OBRPRC+75, OBXPRC+6, OBXPMOD+7, OBXCPTM+7, OBXHIST+5, OBXHIST+9, OBXHIST+25, OBXALL+8, OBXTCOM+7
$$FMTHL7^XLFDT	OBRPRC+64
$$HLNAME^XLFNAME	OBRPRC+26

FileNo	Call Tags
^VA(200 - [#200]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^RADPT - [#70]	OBXPMOD+4, OBXPMOD+5, OBXCPTM+4, OBXCPTM+5, OBXHIST+11, OBXHIST+17, OBXHIST+18, OBXTCOM+4, OBXTCOM+5
^RAMIS(71 - [#71]	OBRPRC+56, OBRPRC+57, OBRPRC+58, OBXPRC+4
^RAMIS(71.2 - [#71.2]	OBXPMOD+6
^RAMIS(73.1 - [#73.1]	OBRPRC+59
^UTILITY($J	OBXHIST+15!, OBXHIST+22, OBXHIST+24, OBXHIST+29!

Name	Line Occurrences
ZDS	OBRPRC+77

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	EN+15~
DFN	OBXALL+1~*
DIW	OBXHIST+29!
DIWF	OBXHIST+16*, OBXHIST+29!
DIWI	OBXHIST+29!
DIWL	OBXHIST+16*, OBXHIST+29!
DIWR	OBXHIST+16*, OBXHIST+29!
DIWT	OBXHIST+29!
DIWTC	OBXHIST+29!
DIWX	OBXHIST+29!
DN	EN+15~
DT	OBRPRC+7, OBXCPTM+6
FT	EN+15~, OBXALL+7, OBXTCOM+5, OBXTCOM+6
GMRAL	OBXALL+5, EXIT+1!
>> HLA("HLS"	ZDS+17, ZDS+23
>> HLCS	OBRPRC+73
>> HLECH	OBRPRC+13, OBRPRC+14, OBRPRC+20, OBRPRC+26, OBRPRC+33, OBRPRC+52, OBRPRC+64, OBXPRC+3, OBXPRC+4, OBXPMOD+2 , OBXCPTM+2, OBXCPTM+6, OBXHIST+3, OBXHIST+7, OBXHIST+13, OBXALL+3, OBXTCOM+2, ZDS+13
>> HLECH(	ZDS+13*, ZDS+18!, ZDS+24!
I	EN+15~, OBRPRC+31~, OBRPRC+33, OBXPMOD+3, OBXPMOD+4, OBXPMOD+5, OBXCPTM+3, OBXCPTM+4, OBXCPTM+5, OBXHIST+21* , OBXHIST+22, OBXHIST+24, OBXALL+4, OBXALL+6, OBXALL+7, OBXTCOM+3, OBXTCOM+4, OBXTCOM+5, ZDS+13~, ZDS+18* , ZDS+24*
J	EN+15~, OBXPMOD+3, OBXPMOD+6, OBXCPTM+3, OBXCPTM+6, OBXHIST+21, OBXHIST+23, OBXALL+4, OBXALL+7, OBXTCOM+3* , OBXTCOM+5*, OBXTCOM+6
M	OBRPRC+31~, OBRPRC+33, OBRPRC+34
PI	EN+15~
PI(	OBXALL+6, OBXALL+7
PTR	EN+15~, OBXPMOD+5, OBXPMOD+6, OBXCPTM+5, OBXCPTM+6
RACNI	OBRPRC+77, OBXPMOD+4, OBXPMOD+5, OBXCPTM+4, OBXCPTM+5, OBXHIST+11, OBXHIST+17, OBXHIST+18, OBXTCOM+4, OBXTCOM+5 , ZDS~, ZDS+16, ZDS+22
>> RADFN	OBXPMOD+4, OBXPMOD+5, OBXCPTM+4, OBXCPTM+5, OBXHIST+11, OBXHIST+17, OBXHIST+18, OBXALL+1, OBXTCOM+4, OBXTCOM+5 , ZDS+16
RADIWL	OBXHIST+16*, OBXHIST+22, OBXHIST+24, OBXHIST+29!
RADTI	OBRPRC+77, OBXPMOD+4, OBXPMOD+5, OBXCPTM+4, OBXCPTM+5, OBXHIST+11, OBXHIST+17, OBXHIST+18, OBXTCOM+4, OBXTCOM+5 , ZDS~, ZDS+16, ZDS+22
RAI	OBXHIST+16, OBXHIST+17, OBXHIST+18, OBXHIST+29!
RAOBR	OBRPRC+75, EXIT+1!
RAOBR(16	OBRPRC+20*
RAOBR(17	OBRPRC+26*
RAOBR(18	OBRPRC+34*
RAOBR(19	OBRPRC+37*
RAOBR(2	OBRPRC+1*
RAOBR(20	OBRPRC+44*
RAOBR(21	OBRPRC+49*
RAOBR(22	OBRPRC+52*
RAOBR(25	OBRPRC+59*
RAOBR(28	OBRPRC+64*
RAOBR(3	OBRPRC+6*
RAOBR(30	OBRPRC+67*
RAOBR(31	OBRPRC+71*
RAOBR(32	OBRPRC+73*
RAOBR(4	OBRPRC+6*
RAOBR(5	OBRPRC+13, OBRPRC+14
RAOBR(6	OBRPRC+16*
RAOBX	OBXPRC+6!, OBXPMOD+7, OBXPMOD+10!, OBXCPTM+7, OBXCPTM+9!, OBXHIST+5, OBXHIST+9, OBXHIST+25, OBXHIST+29!, OBXALL+8 , OBXALL+10!, OBXTCOM+7, EXIT+1!
RAOBX(12	OBXPRC+5, OBXPMOD+3, OBXCPTM+3, OBXHIST+3, OBXHIST+7, OBXHIST+21, OBXALL+4, OBXTCOM+3
RAOBX(2	OBXPRC+2, OBXPMOD+1, OBXPMOD+6, OBXPMOD+9, OBXCPTM+1, OBXCPTM+6, OBXCPTM+8, OBXHIST+2, OBXHIST+6, OBXHIST+12 , OBXHIST+23, OBXHIST+27, OBXALL+2, OBXALL+7, OBXALL+9, OBXTCOM+1, OBXTCOM+6*
RAOBX(3	OBXPRC+3, OBXPMOD+2, OBXCPTM+2, OBXHIST+2, OBXHIST+6, OBXHIST+12, OBXALL+3, OBXTCOM+2
RAOBX(4	OBXPRC+3, OBXPMOD+2, OBXCPTM+2, OBXHIST+3, OBXHIST+7, OBXHIST+13, OBXALL+3, OBXTCOM+2
RAOBX(6	OBXPRC+4, OBXPMOD+6, OBXCPTM+6, OBXHIST+4, OBXHIST+8, OBXHIST+24, OBXALL+7, OBXTCOM+6
>> RAORC(9	OBRPRC+67
>> RASIUID	ZDS+16, ZDS+17, ZDS+21, ZDS+22, ZDS+23
RAX	EN+15~, OBRPRC+31~
RAX(	OBRPRC+33
RAXX	EN+15~, OBXPRC+2, OBXPMOD+1, OBXPMOD+6, OBXPMOD+9, OBXCPTM+1, OBXCPTM+6, OBXCPTM+8, OBXHIST+2, OBXHIST+6* , OBXHIST+12, OBXHIST+23, OBXHIST+27, OBXALL+2, OBXALL+7, OBXALL+9, OBXTCOM+1, OBXTCOM+6, EXIT+1!
RAZCPT	OBRPRC+7*, EXIT+1!
RAZCPT(0	OBRPRC+7*, OBRPRC+13
RAZCPTM	OBXCPTM+9!
RAZDAYCS	OBRPRC+6, OBRPRC+37, OBRPRC+44, OBRPRC+49, OBRPRC+77, ZDS~, ZDS+22
RAZDIV	EXIT+1!
RAZIEN	OBRPRC+56*, OBRPRC+57, OBRPRC+58, EXIT+1!
RAZILOC	EXIT+1!
RAZITYPE	EXIT+1!
RAZMODAL	OBRPRC+58*, OBRPRC+59, EXIT+1!
RAZNME	OBRPRC+24!, OBRPRC+26, EXIT+2!
RAZNME("FIELD"	OBRPRC+25*
RAZNME("FILE"	OBRPRC+24*
RAZNME("IENS"	OBRPRC+24*
>> RAZORD	OBRPRC+16, OBRPRC+23, OBRPRC+24, OBRPRC+26, OBRPRC+32, OBRPRC+64, OBRPRC+70
>> RAZORD1	OBRPRC+73, OBXHIST+1, OBXHIST+4
RAZPHONE	EXIT+2!
RAZPMOD	OBRPRC+19*, OBRPRC+20, EXIT+2!
>> RAZPROC	OBRPRC+7, OBRPRC+14
>> RAZRXAM	OBRPRC+52
RAZTMODE	OBRPRC+70*, OBRPRC+71, EXIT+2!
>> RAZXAM	OBRPRC+14, OBRPRC+19, OBRPRC+56, OBRPRC+57, OBRPRC+58, OBXPRC+4
U	OBRPRC+7, OBRPRC+13, OBRPRC+14, OBRPRC+16, OBRPRC+19, OBRPRC+23, OBRPRC+24, OBRPRC+26, OBRPRC+32, OBRPRC+56 , OBRPRC+57, OBRPRC+58, OBRPRC+59, OBRPRC+64, OBRPRC+70, OBXPRC+4, OBXPMOD+6
X	EN+15~, OBXHIST+18*
Y	EN+15~
Z	EN+15~

Customize PDF page

Package: Radiology Nuclear Medicine

Routine: RAHLR1A

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Caller Graph Total: 2

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: