Routine: GMRCU

Package	Total	Caller Graph
Consult Request Tracking	19	GMRCAD31 GMRCAFRD GMRCALRT GMRCAR GMRCAU GMRCGUIA GMRCILKP GMRCITR GMRCP5A GMRCQCST GMRCR GMRCS GMRCSL GMRCSLDT GMRCSLM GMRCSLM1 GMRCSLM4 GMRCSRVS GMRCSTL2

Entry Points

Name	Comments	DBIA/ICR reference
REGDTM	;Receives X in internal date.time, and returns X in MM/DD/YY TT:TT
NAME	; Format names ;6/30/89 11:20 ; ; Recieves: FILE (3 for User, 16 for Person, 6 for Provider) ; IFN (Internal file # for above file), ; NML (Desired length for name to be returned) ; FNF (Flag to specify first name format: 0 for FI, 1 for FN) ; Returns: Lastname,First(name/initial) to specified length as NM
MD	; Format physician names ;4/4/89 11:39 ; ; Recieves: IFN for New Person file as PR and desired name length, as NML ; Returns: Lastname,FI to specified length as PR
REGDT	; Receives X in internal date.time, and returns X in MM/DD/YY format
SIDT	; Receives X as internal date/time and returns X in DD MMM YY
DEM	; Gets Demographic Data from VADPT ; Receives: DFN ; Returns: GMRCPNM,GMRCSN,GMRCHRCN,GMRCDOB,SEX,GMRCWARD,GMRCRB,GMRCAGE ; and GMRCWLI,GMRCHLI
HL7FMDTM	; Recieves X as CCYYMMDDHHMM and returns X as internal date/time
MTIM	;CONVERT TIME from X=2890313.1304 INTO X=13:04
PTRCLN	;Clean out subservice 'B' X-reference of deleted entries
FMHL7DTM	; Recieves X as internal date/time and returns X in CCYYMMDDHHMM

Name	Line Occurrences (* Changed, ! Killed)
^GMR(123.5 - [#123.5]	PTRCLN+1!, PTRCLN+2
^VA(200 - [#200]	MD+4

Name	Field # of Occurrence
^(	PTRCLN+1
^(0	MD+4, PTRCLN+2*

Name	Field # of Occurrence
CH	NAME+7~, NAME+10*
CNT	PTRCLN+2*, PTRCLN+3!
DATE	HL7FMDTM+1~, HL7FMDTM+2, HL7FMDTM+3
>> DFN	DEM+10
DIC	NAME+7~, NAME+8*
DIC(0	NAME+8*
DUZ(2	DEM+10
ENTRY	PTRCLN+1*, PTRCLN+3!
FA	NAME+7~, NAME+10*, NAME+11
FILE	NAME+8, NAME+14!
FN	NAME+7~, NAME+9, NAME+10, NAME+11, NAME+12*, NAME+13
FNF	NAME+12, NAME+14!
>> GMRCAGE	DEM+7*
>> GMRCDOB	DEM+9*
>> GMRCHRCN	DEM+10*
>> GMRCPNM	DEM+5*
>> GMRCRB	DEM+8*
>> GMRCSN	DEM+6*
>> GMRCWARD	DEM+8*
>> GMRCWLI	DEM+8*
I	PTRCLN+1*, PTRCLN+2, PTRCLN+3!
IFN	NAME+8, NAME+14!
J	PTRCLN+1*, PTRCLN+3!
LN	NAME+7~, NAME+9*, NAME+13
MM	SIDT+1~, SIDT+4*, SIDT+5
MON	SIDT+1~, SIDT+3*, SIDT+4
NI	NAME+7~, NAME+10*
>> NM	NAME+13*
NML	MD+5, NAME+13, NAME+14!
>> PR	MD+4, MD+6*
PRFI	MD+3~, MD+5*, MD+6
PRLN	MD+3~, MD+5*, MD+6
PRNM	MD+3~, MD+4*, MD+5, MD+6
RAWNM	NAME+7~, NAME+8*, NAME+9
>> SEX	DEM+7*
T	REGDTM+1~, REGDTM+2, FMHL7DTM+1~, FMHL7DTM+2, FMHL7DTM+3*, FMHL7DTM+4
TIME	HL7FMDTM+1~, HL7FMDTM+2*, HL7FMDTM+3
U	SIDT+4
VA	DEM+11!
VA("PID"	DEM+6
VADM	DEM+11!
VADM(1	DEM+5
VADM(2	DEM+6
VADM(3	DEM+9
VADM(4	DEM+7
VADM(5	DEM+7
VAERR	DEM+11!
VAHOW	DEM+4!
VAIN	DEM+11!
VAIN(4	DEM+8
VAIN(5	DEM+8
VAINDT	DEM+4!
X	MTIM+1, MTIM+2, REGDT+1, REGDTM+2, SIDT+2, SIDT+4, SIDT+5, FMHL7DTM+2, FMHL7DTM+4, HL7FMDTM+2 , HL7FMDTM+3, NAME+7~, NAME+8*
Y	NAME+7~
Y(0	NAME+8