Routine: ORMBLDGM

Package	Total	Call Graph
Order Entry Results Reporting	2	$$USID^ORMBLD DG1^ORWDBA3
Kernel	1	$$FMTHL7^XLFDT
VA Fileman	1	$$GET1^DIQ

Package	Total	Caller Graph
Order Entry Results Reporting	1	ORMBLD

Entry Points

Name	Comments	DBIA/ICR reference
CS1
PTR(NAME)	; -- Returns ptr value of prompt in Dialog file
CSLT	; -- Segments for new Consult order
HL7DATE(DATE)	; -- FM -> HL7 format

FileNo	Call Tags
^GMR(123.5 - [#123.5]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^ORD(101.41 - [#101.41]	PTR+1
^ORD(101.42 - [#101.42]	CS1
^TMP("ORWORD"	CS1+8, CS1+9, CS1+10

Name	Line Occurrences
$$PTR	CSLT+2, CSLT+3, CSLT+4, CSLT+5, CSLT+6, CSLT+7, CSLT+8, CSLT+11, CSLT+12, CSLT+13

Name	Field # of Occurrence
^(	CS1+10

Name	Field # of Occurrence
ATTN	CSLT+1~, CSLT+8*, CS1+3
CATG	CSLT+1~, CSLT+6*, CS1+1
CODE	CSLT+1~, CSLT+12*, CS1+14
CTYPE	CSLT+1~, CSLT+3*, CS1+7
DATE	HL7DATE~, HL7DATE+1
DIAG	CSLT+1~, CSLT+11, CSLT+14, CS1+11, CS1+12, CS1+14
I	CSLT+1~, CS1+8, CS1+10
>> IFN	CS1+5
J	CSLT+1~, CS1+8, CS1+9, CS1+10
NAME	PTR~, PTR+1
OI	CSLT+1~, CSLT+2*, CS1+2
>> ORDIALOG(	CSLT+2, CSLT+3, CSLT+4, CSLT+5, CSLT+6, CSLT+7, CSLT+8, CSLT+11, CSLT+12, CSLT+13
>> ORMSG(	CS1+7, CS1+9, CS1+10, CS1+15
>> ORMSG(3	CS1+1*
>> ORMSG(4	CS1*
>> ORMSG(5	CS1+3*
PLACE	CSLT+1~, CSLT+7, CS1+1, CS1+3
PROB	CSLT+1~, CSLT+13*, CS1+15
QT	CSLT+1~, CS1*
RSERV	CSLT+1~, CSLT+4, CS1+6, CS1+7
TYPE	CS1+12~, CS1+14, CS1+15
U	CS1, CS1+6, CS1+7, CS1+14
URG	CSLT+1~, CSLT+5*, CS1
USID	CSLT+1~, CS1+2*, CS1+3, CS1+6
VALUE	CS1+12~, CS1+14, CS1+15
WP	CSLT+1~, CSLT+5*, CS1+8, CS1+9, CS1+10
Z	CSLT+1~, CS1+3, CS1+7, CS1+8, CS1+9, CS1+10, CS1+15