Routine: GMRCS

Package	Total	Caller Graph
Consult Request Tracking	2	GMRCMCP GMRCSLM

Name	Comments	DBIA/ICR reference
SELCT	;Select a Consult Type from the protocol file
SELPT
EXIT	;Exit action logic
SELPR	;Get Procedure

Name	Line Occurrences (* Changed, ! Killed)
^ORD(101 - [#101]	SELPR+2

Name	Field # of Occurrence
DFN	SELPT*, SELPT+1!, EXIT+3!
DIC	SELCT+1!, SELPT!
DIC("A"	SELCT+1, SELPT
DIC("B"	SELCT+1*
DIC(0	SELCT+1, SELPT
GETPROV	EXIT+3!
GMRCA	EXIT+1!
GMRCACT	EXIT+1!
GMRCACTM	EXIT+1!
GMRCAGE	EXIT+1!
GMRCCT	SELCT+1*, SELPR+4!, EXIT+1!
GMRCCTX	EXIT+1!
GMRCDEV	EXIT+3!
GMRCDG	EXIT+1!
GMRCDGT	EXIT+1!
GMRCDIC	EXIT+3!
GMRCDOB	EXIT+1!
GMRCDTM	EXIT+1!
GMRCEND	EXIT+3!
GMRCGL	EXIT+3!
GMRCGRP	EXIT+1!
GMRCH	EXIT+1!
GMRCHDR	EXIT+1!
GMRCIFN	EXIT+1!
GMRCLFG	EXIT+1!
GMRCNM	EXIT+1!
GMRCNPG	EXIT+1!
GMRCORNP	EXIT+3!
GMRCORVP	EXIT+3!
GMRCPG	EXIT+1!
GMRCPLI	EXIT+3!
GMRCPNM	EXIT+1!
GMRCPR	SELPR+4!, SELPR+5*, EXIT+1!
GMRCPRI	EXIT+3!
GMRCPRNM	SELPR+1!, SELPR+4!
GMRCQUT	SELPT+1, SELPR+1!, SELPR+4
GMRCRB	EXIT+1!
GMRCRPG	EXIT+1!
GMRCSN	EXIT+2!
GMRCSR	EXIT+3!
GMRCSRDT	EXIT+3!
GMRCSRS	EXIT+3!
GMRCSS	EXIT+2!
GMRCSSNM	EXIT+2!
GMRCTC	EXIT+2!
GMRCTITL	EXIT+2!
GMRCTM	EXIT+2!
GMRCTYPE	EXIT+2!
GMRCURGI	EXIT+3!
GMRCVP	EXIT+2!
GMRCWARD	EXIT+2!
HEAD	EXIT+3!
LASTA	EXIT+3!
MCBRANCH	EXIT+3!
MCC	EXIT+3!
MCK	EXIT+3!
MCPROC	EXIT+3!
O	EXIT+4!
ORACTION	EXIT+4!
ORANSI	EXIT+4!
ORATTEND	EXIT+4!
OREND	EXIT+4!
ORGY	EXIT+4!
ORI	EXIT+4!
ORINDX	EXIT+4!
ORIOSL	EXIT+4!
ORL	EXIT+4!
ORNP	EXIT+4!
ORNS	EXIT+4!
ORPK	EXIT+4!
ORSSN	EXIT+4!
ORSTS	EXIT+4!
ORTIT	EXIT+4!
ORTKG	EXIT+4!
ORTO	EXIT+4!
ORTS	EXIT+4!
ORTX	EXIT+4!
SEX	EXIT+2!
VAROOT	EXIT+2!
W	EXIT+2!
>> X	SELPT+1
XQORM	SELPR+3*, SELPR+4!
XQORM("A"	SELPR+3*
XQORM("NO^^"	SELPR+3*
XQORM(0	SELPR+3*
>> Y	SELCT+1, SELPT, SELPT+1, SELPR+2*, SELPR+3, SELPR+4
>> Y(1	SELPR+5
Z	EXIT+4!
ZTDESC	EXIT+4!

Information