Routine: ORMBLDRA

Package	Total	Call Graph
Kernel	2	$$FMTHL7^XLFDT $$PATCH^XPDUTL
Order Entry Results Reporting	2	$$USID^ORMBLD DG1^ORWDBA3

Package	Total	Caller Graph
Order Entry Results Reporting	1	ORMBLD

Entry Points

Name	Comments	DBIA/ICR reference
EN	; -- Segments for new Radiology order
MULT(M)	; -- Returns string of MODIFIER~MODIFIER~...
PTR(NAME)	; -- Returns ptr value of prompt in Dialog file
OBX
HL7DATE(DATE)	; -- FM -> HL7 format

Name	Line Occurrences (* Changed, ! Killed)
^DIC(34 - [#34]	OBX+10
^DPT - [#2]	OBX+7
^OR(100 - [#100]	EN+3
^ORD(101.41 - [#101.41]	PTR+1
^ORD(101.42 - [#101.42]	EN+4
^RA(79.1 - [#79.1]	EN+12
^RAMIS(71.2 - [#71.2]	MULT+2, MULT+3
^TMP("ORWORD"	OBX+6

Name	Line Occurrences
$$HL7DATE	EN+15, OBX+9
$$MULT	EN+12
$$PTR	EN+2, EN+3, EN+4, EN+5, EN+6, EN+7, EN+8, EN+9, EN+10, EN+11 , EN+16, OBX+10, OBX+11

Name	Field # of Occurrence
^(	OBX+6

Name	Field # of Occurrence
CATG	EN+1~, EN+7*, OBX+10, OBX+11
CLHIST	EN+1~, EN+11*, OBX+6
DATE	HL7DATE~, HL7DATE+1
I	EN+1~, EN+18, EN+21, OBX+2, OBX+4, OBX+6, OBX+8, OBX+9, OBX+10, OBX+11 , MULT+1~, MULT+2, MULT+3
>> IFN	EN+3, EN+21
ILOC	EN+1~, EN+5, EN+12, EN+18
IP	EN+1~, EN+3*, EN+18
J	EN+1~, OBX+6*
J0	EN+1~, OBX, OBX+5, OBX+6*
LIN	EN+1~, OBX+3*, OBX+4
M	MULT~, MULT+1, MULT+2, MULT+3
MODE	EN+1~, EN+6, EN+13, EN+18
MODS	EN+1~, EN+11, EN+12, EN+18
NAME	PTR~, PTR+1
OI	EN+1~, EN+2*, EN+18
>> ORDIALOG(	EN+2, EN+3, EN+4, EN+5, EN+6, EN+7, EN+8, EN+9, EN+10, EN+16 , OBX+10, OBX+11, MULT+1, MULT+2, MULT+3
>> ORMSG(	OBX+2, OBX+4, OBX+6, OBX+8, OBX+9, OBX+10, OBX+11*
>> ORMSG(4	EN+15, EN+16
>> ORMSG(5	EN+18, EN+19
ORSEX	EN+1~, OBX+7*, OBX+8
>> ORVP	OBX+7
PREG	EN+1~, EN+9, EN+14, OBX+8
PREOP	EN+1~, EN+8*, OBX+9
PROV	EN+1~, EN+16*
QT	EN+1~, EN+15*
RA75	EN+1~, EN+17*, EN+19, OBX+1
REASON	EN+1~, EN+10*, EN+19, OBX+2
START	EN+1~, EN+3*, EN+15
U	EN+3, EN+4, EN+12, EN+19, OBX+7, OBX+10, MULT+2, MULT+3
URG	EN+1~, EN+4*, EN+15
X	MULT+1~, MULT+2, MULT+3*, MULT+4
Z	EN+1~, OBX+10, OBX+11