Routine: GMRYED6

Information

GMRYED6 ;HIRMFO/YH-D/C IV AND IV SITE MAINTENANCE ;9/10/92

Source file <GMRYED6.m>

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Last reading for AMOUNT LEFT is "_$P(^GMR(126,DA(1),"IV",DA,"IN",GGDA,0),"^",2)_" mls" Line Location: REMOVE+4
Function Call: WRITE	Prompt: !,"Total amount absorbed for this solution: "_$S($P(^GMR(126,DA(1),"IV",DA,"IN",GGDA,0),"^",2)["*":"UNKNOWN",1:($P(GDATA,"^",5)-GTOTAL)_" mls"),! Line Location: REMOVE+5
Function Call: WRITE	Prompt: !,"Total amount absorbed for this solution: ",($P(GDATA,"^",5)-GTOTAL)_" mls",! Line Location: NEXT+2
Function Call: WRITE	Prompt: !,"Do you wish to ",!,?5,"Convert to lock/port",!,?5,"Hang a new solution",!,"Please enter the FIRST character for your selection or press return to continue: " Line Location: ASK+0
Function Call: READ	Variable: GADD Timeout: DTIME Line Location: ASK+1
Function Call: WRITE	Prompt: !,"The current solution has been discontinued.",!,"Do you want to hang a new bottle or convert the line to a lock/port",! Line Location: ASK+2
Function Call: WRITE	Prompt: !,"The solution has been DC'ed" Line Location: ASK+4
Function Call: WRITE	Prompt: !,"The IV intake record has been deleted",!! Line Location: CANCEL+2