Routine: GMRYUT11

Package	Total	Call Graph
General Medical Record - IO	1	PT^GMRYUT0
Kernel	1	$$UP^XLFSTR

Package	Total	Caller Graph
General Medical Record - IO	6	GMRYDCIV GMRYED6 GMRYFLW0 GMRYRP0 GMRYSE0 GMRYUT3

Entry Points

Name	Comments	DBIA/ICR reference
Q1
DCREASON	;LIST IV DC REASON CALLED BY D/C IV EDIT
PATIENT	;SEARCH PATIENT BY WARD AND ROOM
WARDPT	;
MHOUR	;SCREEN MILITARY HOUR, CLLED BY DD NURSING SHIFT HOUR
WRITE	;PRINT I/O RECORDS FOR SELECTION
ASKYN

Name	Field # of Occurrence
PT^GMRYUT0	WARDPT+1
$$UP^XLFSTR	WRITE+6

Name	Line Occurrences
Function Call: WRITE	Prompt: ?10,I_". "_$P(^GMRD(126.76,X(1),0),"^"),! Line Location: DCREASON+2
Function Call: READ	Timeout: DTIME Variable: GMRX Line Location: DCREASON+3
Function Call: WRITE	Prompt: !!,"Select a number between 1 and "_I_" for the reason of this DCing.",!,"INFUSED is default.",! Line Location: DCREASON+4
Function Call: WRITE	Prompt: !,GDCREAS Line Location: ASKYN+0
Function Call: WRITE	Prompt: ?5,GN_".",?10,$P(Y,":",1,2) Line Location: WRITE+2
Function Call: WRITE	Prompt: ?40,GI_" mls" Line Location: WRITE+5
Function Call: WRITE	Prompt: ?40,$S(GI(1)="":"",GI(1)="S":"Small",GI(1)="M":"Medium",GI(1)="L":"Large",1:"") Line Location: WRITE+6
Function Call: WRITE	Prompt: " "_$P(^(0),"^"),! Line Location: WRITE+9
Function Call: WRITE	Prompt: ?40,$P(GMRDATA(+GN),"^",3)_" mls left Intake: "_$S($P(GMRDATA(+GN),"^",3)["*":"unknown",1:$P(GMRDATA(+GN),"^",4)_" mls"),! Line Location: WRITE+10
Function Call: WRITE	Prompt: ?40,"Total: "_+$P(^(0),"^",5)_" mls",! Line Location: WRITE+11
Function Call: WRITE	Prompt: ?40,$S($D(^GMRD(126.8,+$P(GY(3),"^"),0)):$P(^(0),"^"),1:"") Line Location: WRITE+12
Function Call: WRITE	Prompt: ?60,+$P(GY(3),"^",2)_" mls",! Line Location: WRITE+12
Function Call: WRITE	Prompt: ! Line Location: Q1+0

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	WRITE+2
^GMR(126 - [#126]	WRITE+4, WRITE+7, WRITE+11, WRITE+12
^GMRD(126.6 - [#126.6]	WRITE+9
^GMRD(126.76 - [#126.76]	DCREASON+2
^GMRD(126.8 - [#126.8]	WRITE+12
^NURSF(214 - [#214]	PATIENT+1, PATIENT+2
^TMP("GMRPT"	WARDPT+2*

Name	Field # of Occurrence
^(	WRITE+12
^(0	DCREASON+2, WRITE+9, WRITE+11, WRITE+12

Name	Field # of Occurrence
>> DA	WRITE+4, WRITE+7, WRITE+11, WRITE+12
>> DFN	PATIENT+2*, WARDPT+2
DTIME	DCREASON+3
>> GBED	WARDPT+2*
>> GDCREAS	DCREASON+1, ASKYN
GI	WRITE+4~*, WRITE+5, WRITE+6
GI(1	WRITE+6*
>> GMRBED	WARDPT+1, WARDPT+2
>> GMRDATA(	WRITE+1, WRITE+10
>> GMREDB	WARDPT+1
>> GMRNAM	WARDPT+1
GMROUT	PATIENT+1, PATIENT+2, MHOUR+1, MHOUR+2!, MHOUR+3!, MHOUR+4!, MHOUR+5!, DCREASON+3*
>> GMRWARD	PATIENT+1, PATIENT+2, PATIENT+3*
>> GMRWARD(1	PATIENT+2, PATIENT+3*
GMRX	DCREASON+1~, DCREASON+3*, DCREASON+4, ASKYN
GMRX(	DCREASON+2*, ASKYN
GMRY	MHOUR+1*, MHOUR+2!, MHOUR+3!, MHOUR+4!, MHOUR+5!
GMRY(1	MHOUR+1*
>> GN	WRITE+1, WRITE+2, WRITE+10
>> GNANS	WRITE+3, WRITE+4, WRITE+7, WRITE+9, WRITE+10, WRITE+11, WRITE+12
>> GNRMBD(	WARDPT+1
GNURWRD	PATIENT+2*, PATIENT+3!
GNURWRD(1	PATIENT+2*, PATIENT+3
>> GROOM	WARDPT+2*
GSTYP	WRITE+7*, WRITE+9, Q1!
>> GY	WRITE+1*, WRITE+2
>> GY(1	WRITE+1*, WRITE+4, WRITE+7, WRITE+11, WRITE+12
>> GY(2	WRITE+12*
>> GY(3	WRITE+12*
I	DCREASON+1~, DCREASON+2*, DCREASON+3, DCREASON+4
>> X	MHOUR+1, MHOUR+2, MHOUR+3, MHOUR+4, DCREASON+2*
>> X(1	DCREASON+2*
>> Y	WRITE+2*