Routine: GMRYSE0

Package	Total	Call Graph
General Medical Record - IO	7	(DEV,LOOP1,Q,Q2,START)^GMRYRP0 (DATE,NEXT)^GMRYRP1 (SAVE,SAVEIV,SETSIFT)^GMRYRP2 REPORT^GMRYSE1 PT^GMRYUT0 PATIENT^GMRYUT11 PATIENT^GMRYUT9
Kernel	2	HOME^%ZIS ^%ZTLOAD

Package

Total

Call Graph

(DEV,LOOP1,Q,Q2,START)^GMRYRP0 (DATE,NEXT)^GMRYRP1 (SAVE,SAVEIV,SETSIFT)^GMRYRP2 REPORT^GMRYSE1 PT^GMRYUT0 PATIENT^GMRYUT11 PATIENT^GMRYUT9

HOME^%ZIS ^%ZTLOAD

Package	Total	Caller Graph
General Medical Record - IO	1	GMRY I/O SHIFT AND EVENT
Nursing Service	1	NURCYRP0

Package

Total

Caller Graph

Name	Comments	DBIA/ICR reference
Q0
START	;
PRNT
IVM	;SET IV MAINTENANCE IN ^TMP($J,"GMRY"
SETUT
SCARE	;
Q	;
EN1	;PATIENT INTAKE/OUTPUT BY SHIFT AND EVENT
SETARRY	;SET DATA IN ^TMP($J,"GMRY", FOR EACH PATIENT

Name	Line Occurrences (* Changed, ! Killed)
^GMR(126 - [#126]	SETARRY+1, SETARRY+2, IVM+1, IVM+2, SCARE+1, SCARE+2, SETUT
^TMP("GMRPT"	START+4, START+5, START+6
^TMP($J	PRNT!, SETARRY+2!, SETUT*

Name	Field # of Occurrence
^(	IVM+2

Name	Field # of Occurrence
>> DA	IVM+2*, SCARE+1, SCARE+2, SETUT
>> DA(1	SETARRY+2*, IVM+2, SCARE+1, SCARE+2, SETUT
DFN	START+5*, START+6, Q+2!, SETARRY+1, SETARRY+2, IVM+1
>> GBED	START+5*, START+6
GDA	Q+1!, SCARE+2*, SETUT
GDATA	Q+1!
>> GDAY	SCARE+3*
GLN	Q+2!
GMR100	Q+2!
GMREDB	START+2, START+3, Q+2!
GMRFIN	Q+2!, SCARE+3
GMRHLOC	Q+1!
>> GMRINDT	SCARE+3*, SETUT
GMRLEN	Q+2!
>> GMRNAM	START+6*
>> GMRNUR	EN1+1, START+3
GMROP	Q+2!
GMROP(1	EN1+1*
GMROUT	EN1+1*, EN1+3!, START+1!, START+2!, START+5, Q+2!
GMRSTRT	Q+2!, SCARE+3
GMRVHLOC	Q+1!
GMRVWLOC	Q+1!
GMRY	Q+1!
GN	Q+2!
GNN	Q+2!
GPORT	Q+1!
>> GQ	PRNT*
>> GQT	PRNT*
>> GROOM	START+5*, START+6
GRPT	EN1+1*, Q+2!
GSAVE	Q+1!
GSAVEH	Q+1!, SETARRY+2*
>> GSHIFT	SETUT
>> GSITE	IVM+2*, SETUT
GSTAR	Q+1!
>> GSTRT	SCARE+2*, SCARE+3, SETUT
GTXT	Q+2!
GTYPI	Q+2!
GTYPO	Q+2!
>> II	SETARRY+3*
IO("C"	EN1+3!
IO("Q"	EN1+3!
IOM	EN1+3
ION	EN1+3
IOSL	EN1+3
>> J	START+5*
>> POP	EN1+2
VAROOT	Q+2!
>> ZTDESC	EN1+3*
>> ZTIO	EN1+3*
>> ZTRTN	EN1+3*

Information