Routine: GMRCAAC

Package	Total	Call Graph
Consult Request Tracking	7	SELECT^GMRCA2 EXAC^GMRCADC $$GETSIGF^GMRCASF ($$ORTX,GETPROV)^GMRCAU EN^GMRCHL7 (AUDIT,MSG,STATUS)^GMRCP $$GETDT^GMRCUTL1
VA Fileman	1	^DIK

Package

Total

Call Graph

SELECT^GMRCA2 EXAC^GMRCADC $$GETSIGF^GMRCASF ($$ORTX,GETPROV)^GMRCAU EN^GMRCHL7 (AUDIT,MSG,STATUS)^GMRCP $$GETDT^GMRCUTL1

^DIK

Package	Total	Caller Graph
Consult Request Tracking	1	GMRCTIUE

Package

Total

Caller Graph

Name	Comments	DBIA/ICR reference
COMP(GMRCO)	;Clerk action to Complete an order
NOUPD	;Exit without making an update
END

Name	Line Occurrences (* Changed, ! Killed)
^GMR(123 - [#123]	COMP+7, COMP+37, COMP+41, COMP+43

Name	Line Occurrences
END	COMP+3, COMP+4, COMP+16, COMP+22, COMP+23, COMP+25

Name	Field # of Occurrence
^(0	COMP+41

Name	Field # of Occurrence
DA	COMP+35~, COMP+37*
DA(1	COMP+37*
DFN	COMP+19~, COMP+21*, COMP+39
DIK	COMP+35~, COMP+37*!
DUOUT	END!
GETPROV	COMP+22~
GMRC	COMP+6~
GMRC(0	COMP+7*, COMP+10, COMP+20, COMP+24
GMRCA	COMP+19~, COMP+28*
GMRCAD	COMP+19~, COMP+23*, COMP+39, END+2!
GMRCADUZ	COMP+19~, COMP+40*, COMP+43, END+4!
GMRCADUZ(	COMP+41*
GMRCDR	COMP+19~, COMP+32*
GMRCDT	END+2!
>> GMRCERMS	COMP+30, COMP+34
>> GMRCERR	COMP+30, COMP+34
GMRCIFN	COMP+20*, END+4!
GMRCL	END+2!
GMRCMSG	COMP+12~, COMP+13, COMP+14, COMP+30, COMP+34, COMP+36, NOUPD+1, NOUPD+2, END+4!
>> GMRCNM	END+1
GMRCO	COMP~, COMP+3, COMP+4, COMP+7, COMP+37, COMP+39, COMP+41, COMP+42, COMP+43, END+3*
>> GMRCOM	COMP+29*, COMP+39
GMRCORNP	COMP+19~, COMP+39
GMRCORTX	COMP+42*, COMP+43, END+4!
>> GMRCORVP	COMP+20*, COMP+21
GMRCPL	END!
GMRCPLI	END!
GMRCPRI	END!
GMRCQIT	COMP+2!, COMP+22, COMP+23*
GMRCQUIT	COMP+29~
GMRCQUT	COMP+2!, COMP+3, COMP+4, COMP+6~, COMP+15
>> GMRCRB	COMP+39
GMRCSA	END+4!
GMRCSF	COMP+19~, COMP+25*, COMP+42
>> GMRCSFO	COMP+24*, COMP+25
GMRCSTS	COMP+6~, COMP+10, COMP+11, COMP+13, COMP+19~, COMP+28, END+4!
GMRCTYPE	COMP+39, END+2!
GMRCURG	END!
GMRCURGI	END!
GMRCVP	END+1!
>> GMRCVSIT	COMP+39
ORGY	COMP+19~, COMP+20*
ORIFN	COMP+19~, COMP+20, END+3
STS	END+4!
X	END!
XQORM	END!
Y	END!

Information