Routine: PSORXPR1

Information

PSORXPR1 ;BHAM ISC/SAB - CONTINUATION OF VIEW PRESCRIPTION ; 10/01/92

Name	Line Occurrences
Function Call: WRITE	Prompt: !,N,?3 Line Location: RF+1
Function Call: WRITE	Prompt: DAT,?12 Line Location: RF+1
Function Call: WRITE	Prompt: DAT,?22,$P(P1,"^",4),?36 Line Location: RF+2
Function Call: WRITE	Prompt: !,N,?3 Line Location: PAR+1
Function Call: WRITE	Prompt: DAT,?14 Line Location: PAR+1
Function Call: WRITE	Prompt: DAT,?27,$P(P1,"^",4),?32 Line Location: PAR+2
Function Call: WRITE	Prompt: !!,"HOLD REASON: "_HLDR,?60,"HOLD DATE: "_DAT Line Location: HLD+2
Function Call: WRITE	Prompt: !,"HOLD COMMENTS: "_$P(^PSRX(DA,"H"),"^",2) Condition for execution: $P(^PSRX(DA,"H"),"^",2)]"" Line Location: HLD+2
Function Call: WRITE	Prompt: @IOF Line Location: HEAD+0
Function Call: WRITE	Prompt: !,"#",?3,"LOG DATE",?12,"REF DATE",?22,"QTY",?35,"ROUT",?40,"LOT #",?52,"PHARMACIST",?70,"DIVISION",! Line Location: HEAD+1
Function Call: WRITE	Prompt: "=" Line Location: HEAD+1
Function Call: WRITE	Prompt: ! Line Location: HEAD+2
Function Call: WRITE	Prompt: @IOF Line Location: PARL+0
Function Call: WRITE	Prompt: !,"PARTIAL FILLS:",!,"#",?3,"LOG DATE",?14,"DATE",?27,"QTY",?32,"ROUTING",?40,"LOT #",?55,"PHARMACIST",?70,"DIVISION",! Line Location: PARL+1
Function Call: WRITE	Prompt: "=" Line Location: PARL+1
Function Call: WRITE	Prompt: ! Line Location: PARL+2

FileNo	Call Tags
^PSRX - [#52]	GET1^DIQ