Prompt: !,"Select one of the IV types listed below",!,?5,"A - admixture",!,?5,"B - blood/blood product",!,?5,"H - hyperal",!,?5,"I - intralipid",!,?5,"P - piggyback",!,?5,"L - locks/ports",!,?5,"Please enter a character: "
Prompt: !,"Select type of IV solution you want to hang by entering",!,"the first character of the solution category",!
Line Location: SOLTYPE+7
Function Call: WRITE
Prompt: !,"No solutions found in the NURS SOLUTION FILE 126.9",!
Line Location: SEL0+0
Function Call: WRITE
Prompt: !!,"Select a(n) "_$S(GMRVTYP="A":"admixture",GMRVTYP="B":"blood/blood product",GMRVTYP="H":"hyperal",GMRVTYP="I":"intralipid",GMRVTYP="P":"piggyback",1:"")_" from the following Nursing Solution file listing ",!
Line Location: SEL+0
Function Call: WRITE
Prompt: !,GTXT(I)
Line Location: SEL+0
Function Call: READ
Timeout: DTIME
Variable: X
Line Location: SEL+1
Function Call: WRITE
Prompt: !,"Enter the number or the first couple of letters of",!,"the solution you want to start",!
Line Location: SEL+2
Function Call: WRITE
Prompt: !,"No solution selected",!
Line Location: SEL+5
Function Call: WRITE
Prompt: !,"No OUTPUT SUBTYPE set!!!",!
Line Location: DRAIN+2
Function Call: WRITE
Prompt: !,GTXT(I)
Line Location: DRAIN+5
Function Call: READ
Timeout: DTIME
Variable: X
Line Location: DRAIN+6
Function Call: WRITE
Prompt: !,$P(GMRY(+X),"^")
Line Location: DRAIN+7
Function Call: WRITE
Prompt: !,"Subtype for "_GLABEL_" is optional. However if you to wish",!,"to identify the subtype of "_GLABEL_", then enter the number of your selection",!