Routine: GMRCHL7A

Package	Total	Call Graph
Consult Request Tracking	4	$$FMDATE^GMRCHL7 (DC,MODIFY,NEW)^GMRCHL7B (EXIT,INIT,NTE,PID,PV1,REJECT,RETURN)^GMRCHL7U CPRSPURG^GMRCPURG
VA Fileman	1	^DIE

Package	Total	Caller Graph
Consult Request Tracking	2	GMRCIAC1 GMRCIACT

Entry Points

Name	Comments	DBIA/ICR reference
RTN(GMRCORN,DA)	;Put ^OR(100, ien for order into ^GMR(123,
EN(MSG)	;Entry point to routine
OBR(GMRCOBR)	;Get fields from OBR segment and set into GMRC variables
URG(X)	;Return Urgency give Z-code from HL-7 segment; see ORC+9
ORC(GMRCORC)	;Get fields from ORC segment and set into GMRC variables
ZSV(GMRCZSV)	;Get service from ZSV segment and set into GMRCSS
OBX(GMRCOBX)	;Get fields from OBX segment and set into GMRC variables

External References

Name	Field # of Occurrence
^DIE	RTN+2
$$FMDATE^GMRCHL7	ORC+11, OBR+19, OBR+21
DC^GMRCHL7B	EN+31
MODIFY^GMRCHL7B	EN+33
NEW^GMRCHL7B	EN+27
EXIT^GMRCHL7U	EN+25, EN+26, EN+30, EN+35
INIT^GMRCHL7U	EN+8
NTE^GMRCHL7U	EN+21
PID^GMRCHL7U	EN+15
PV1^GMRCHL7U	EN+16
REJECT^GMRCHL7U	EN+29
RETURN^GMRCHL7U	EN+28, EN+31
CPRSPURG^GMRCPURG	EN+26

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^GMR(123 - [#123]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^GMR(123 - [#123]	RTN+2
^ORD(101 - [#101]	ORC+9, OBR+20

Label References

Name	Line Occurrences
$$URG	ORC+9
OBR	EN+18
OBX	EN+20
ORC	EN+17
RTN	EN+32
ZSV	EN+19

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DA	RTN~, RTN+2
DFN	EN+4~
DIE	RTN+1*, RTN+3!
DR	RTN+1*, RTN+3!
GMRCACT	EN+4~
GMRCAD	ORC+11*, EN+6~
GMRCADD	EN+4~
>> GMRCAPP	ORC+7*
>> GMRCATN	OBR+21*
>> GMRCCMT(	OBX+24*
>> GMRCCMT(1	OBX+23*
GMRCFAC	EN+4~, EN+9*
>> GMRCINTR	OBR+22*
>> GMRCMSG	OBX+6, OBX+7, OBX+9, OBX+13, OBX+15, OBX+21, OBX+23, EN+8, EN+9, EN+10 , EN+13, EN+14, EN+15, EN+16, EN+17, EN+18, EN+19, EN+20, EN+21, EN+22
GMRCMTP	EN+4~, EN+10*
>> GMRCNATO	ORC+12*
>> GMRCNOD	EN+8, EN+13, EN+14*, EN+20, EN+21, EN+22
GMRCO	ORC+10*, EN+4~, EN+21, EN+26, EN+28, EN+30, EN+31, EN+32
GMRCOBR	OBR~, OBR+10, OBR+14, OBR+18, OBR+19, OBR+20, OBR+21, OBR+22
GMRCOBX	OBX~, OBX+6, OBX+10, OBX+24
GMRCOCR	ORC+12*, EN+4~
>> GMRCODT	ORC+11, OBR+19
>> GMRCOFN	EN+22*
>> GMRCOID	OBX+7*, OBX+8, OBX+12, OBX+22
GMRCORC	ORC~, ORC+7, ORC+8, ORC+10, ORC+11, ORC+12
GMRCORFN	ORC+7*, EN+5~, EN+32
GMRCORN	RTN~
GMRCORNP	ORC+8*, EN+4~
GMRCOTXT	OBR+18, ZSV+3, EN+6~
GMRCPLCR	ORC+8*, EN+5~
>> GMRCPLI	OBR+20*
GMRCPNM	EN+4~
>> GMRCPR	OBR+10*, OBR+11, OBR+13
GMRCPRCD	OBX+19*, EN+6~
>> GMRCPRDG	OBX+13, OBX+17, OBX+18*
>> GMRCPRI	OBR+12, OBR+14, OBR+15*
GMRCPRPB	OBX+21*, EN+7~
GMRCRB	EN+5~
GMRCRECV	EN+7~, EN+10*, EN+12
GMRCREJ	EN+7~, EN+27, EN+29
>> GMRCRFQ(	OBX+10*
>> GMRCRFQ(1	OBX+9*
>> GMRCS123	OBR+22*
>> GMRCS38	ORC+8*
GMRCSBR	EN+6~
GMRCSEND	EN+5~, EN+9*
GMRCSS	OBR+12, ZSV+2, EN+6~
>> GMRCSTDT	OBR+21*
GMRCSTS	EN+5~
GMRCTRLC	ORC+7*, EN+5~, EN+6~, EN+21, EN+25, EN+26, EN+27, EN+28, EN+31, EN+32 , EN+33
>> GMRCTYPE	OBR+11*
>> GMRCURGI	ORC+8, ORC+9
>> GMRCVAL	OBX+7*
>> GMRCVTYP	OBX+7*, OBX+13, OBX+14
GMRCWARD	EN+5~
GMRCZSS	ZSV+1*, ZSV+2, EN+6~
GMRCZSV	ZSV~, ZSV+1, ZSV+3
LN	OBX+10, OBX+24, OBX+26!
MSG	EN~, EN+21, EN+29
MSG(	OBX+6, OBX+10, OBX+24, EN+8, EN+14, EN+22!
ORC	EN+6~
ORIFN	EN+5~
PRDXSEG	OBX+15~*, OBX+17, OBX+19
>> SEP1	ORC+7, ORC+8, ORC+10, ORC+11, ORC+12, OBR+10, OBR+14, OBR+18, OBR+19, OBR+20 , OBR+21, OBR+22, ZSV+1, OBX+7, OBX+9, OBX+13, OBX+15, OBX+21, OBX+23, EN+9 , EN+10, EN+22
>> SEP2	ORC+7, ORC+8, ORC+10, ORC+12, OBR+10, OBR+14, OBR+18, ZSV+1, OBX+7
X	URG~, URG+1, URG+2, URG+3

Customize PDF page

Package: Consult Request Tracking

Routine: GMRCHL7A

Information

Source Information

Call Graph

Call Graph Total: 5

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: