Routine: GMRYFLW0

Package	Total	Call Graph
General Medical Record - IO	6	REPORT^GMRYFLW1 (DEV,Q,Q2)^GMRYRP0 DATE^GMRYRP1 PT^GMRYUT0 PATIENT^GMRYUT11 PATIENT^GMRYUT9
Kernel	2	^%ZISC ^%ZTLOAD

Package

Total

Call Graph

REPORT^GMRYFLW1 (DEV,Q,Q2)^GMRYRP0 DATE^GMRYRP1 PT^GMRYUT0 PATIENT^GMRYUT11 PATIENT^GMRYUT9

Package	Total	Caller Graph
General Medical Record - IO	1	GMRY IV FLOW
Nursing Service	1	NURCYRP0

Package

Total

Caller Graph

Name	Comments	DBIA/ICR reference
IVDA	;
START	;
PRNT
IVM	;SET IV MAINTENANCE IN ^TMP($J,"GMRY"
SAVEIV	;SET ^TMP($J,"GMR" FOR IV INTAKE
DEV
SCARE	;
Q	;
EN1	;IV FLOW SHEET
SETUT
IV	;
SETARRY	;SET IV DATA IN ^TMP($J,"GMR" AND SITE CARE IN ^TMP($J,"GMRY", FOR EACH PATIENT
LOOP

Name	Line Occurrences
Function Call: WRITE	Prompt: !,$C(7)," THIS REPORT NEEDS 132 COLUMNS - PORT/LAND " Line Location: DEV+0

Name	Line Occurrences (* Changed, ! Killed)
^GMR(126 - [#126]	SETARRY+1, IVM+1, IVM+2, SCARE+1, SCARE+2, SETUT, SAVEIV+1, SAVEIV+2, IV+1, IVDA+1 , IVDA+2
^TMP("GMRPT"	START+7, START+8
^TMP($J	SETARRY+1!, SETUT, SETUT+1, IVDA+1, IVDA+2

Name	Field # of Occurrence
^(	IVM+2
^(0	SETUT, IVDA+1

Name	Field # of Occurrence
>> DA	IVM+2, SCARE+1, SCARE+2, SETUT, IV+1, IVDA+1, IVDA+2
>> DA(1	SETARRY+1*, IVM+2, SCARE+1, SCARE+2, SETUT, SAVEIV+1, SAVEIV+2, IV+1, IVDA+1, IVDA+2
DFN	START+8*, Q+2!, SETARRY+1, IVM+1
GABSORB	Q+1!
>> GBED	START+8*
GBLNK	START+2*, START+3, START+4, Q+1!
GCATH	Q+1!
GDA	Q+1!, SCARE+2*, SETUT
GDASH	START+2*, Q+1!
GDATA	Q+1!, SETUT*, SETUT+1
GDATE	Q+1!
GDC	Q+1!
GDTIME	Q+1!
>> GIVSTRT	SAVEIV+2*, IV+1
GLEFT	Q+1!
>> GLINE	START+3, START+4
GMRADM	Q+2!
GMRAGE	Q+2!
GMRBED	Q+2!
GMRBTH	Q+2!
GMRDIAG	Q+2!
GMREDB	START+5, START+6, Q+1!
GMRFIN	Q+1!, SCARE+2, SAVEIV+2
GMRHLOC	Q+1!, Q+2!
>> GMRINDT	SCARE+2, SETUT, SETUT+1, SAVEIV+2, IVDA+1, IVDA+2
GMRNAM	DEV+2!, START+9!, Q+2!
>> GMRNUR	EN1+1, START+6
GMROP	Q+1!
GMROP(1	EN1+1*
GMROUT	EN1+1, START+2, START+8, Q+1!
GMRSEX	Q+2!
GMRSTRT	Q+1!, SCARE+2, SAVEIV+2
GMRVHLOC	Q+1!
GMRVWLOC	Q+1!
GMRWARD	DEV+2!, START+9!, Q+2!
GMRY	Q+1!
>> GPC	START+2*
>> GQ	START+4, PRNT
>> GQT	START+4, PRNT
>> GROOM	START+8*
GRPT	EN1+1*, Q+1!
GSAVE	Q+1!
GSAVEH	Q+1!, SETARRY+1*
GSDA	Q+1!
GSDAY	Q+1!
>> GSITE	IVM+2, SETUT+1, IVDA+1, IVDA+2
GST	Q+1!
GSTAR	Q+1!
GSTM	Q+1!
>> GSTRT	SCARE+2, IVDA+1
GTOTAL	Q+1!
I	START+3*, Q+2!
IO	START+1
IO("C"	DEV+2!
IO("Q"	DEV+2!
IOM	DEV+1, DEV+2
ION	DEV+2
IOSL	DEV+2
>> J	START+8*
>> JJ	SAVEIV+2*
>> POP	DEV
SSN	Q+2!
VAROOT	Q+2!
X	LOOP*, Q+2!
Y	Q+2!
>> ZTDESC	DEV+2*
>> ZTIO	DEV+2*
>> ZTRTN	DEV+2*
>> ZTSAVE(	LOOP*

Information