Routine: PSOORNW2

Information

PSOORNW2 ;ISC-BHAM/SAB - edit orders from oerr ;Dec 04, 2019@13:25:53

Source file <PSOORNW2.m>

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Current Orderable Item: "_$P(^PS(50.7,PSODRUG("OI"),0),"^")_" "_$P(^PS(50.606,$P(^(0),"^",2),0),"^") Line Location: 1+0
Function Call: WRITE	Prompt: $C(7),!!,"No Dispense Drug!",! Line Location: 7+0
Function Call: WRITE	Prompt: !,$C(7),"No Dispense Drug Selected! A new Orderable Item may need to be selected.",! Line Location: 7+1

FileNo	Call Tags
^PSDRUG - [#50]	GET1^DIQ
^PS(50.7 - [#50.7]	Classic Fileman Calls