Routine: PSDORNO

Information

PSDORNO ;BIR/JPW,LTL-Nurse CS Order Request Entry (One time); 15 Jan 95

Package	Total	Call Graph
VA Fileman	5	NOW^%DTC ^DIC FILE^DICN ^DIE ^DIR
Controlled Substances	3	LIST^PSDORL ^PSDORM ASK^PSDORN1

Package	Total	Caller Graph
Controlled Substances	2	PSDORN PSDORNC

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: PSDORNO+11
Function Call: WRITE	Prompt: ! Line Location: PSDORNO+17
Function Call: WRITE	Prompt: !,"Inactive drug" Line Location: PSDORNO+18
Function Call: WRITE	Prompt: !!,"Sending a Mailman message to the Pharmacy Supervisor(s)...",!! Line Location: PSDORNO+22
Function Call: WRITE	Prompt: ?10,!!,"processing one order for ",PSDQTY," now..." Line Location: DIE2+3
Function Call: WRITE	Prompt: $C(7),!!,?10,"Contact your Pharmacy Coordinator.",!,?10,"This "_$S(MSG=2:"Dispensing Site",MSG=1:"NAOU",1:"Drug")_" is missing " Line Location: MSG+1
Function Call: WRITE	Prompt: $S(MSG1=1:"Primary Disp. Site",MSG1=2:"stocked drugs",MSG1=3:"narcotic breakdown unit",MSG1=4:"narcotic package size",1:"data")_".",! Line Location: MSG+2
Routine Call	DIE Line Location: DIE2+4
Routine Call	DIC Line Location: PSDORNO+18
Routine Call	DIR Line Location: PSDORNO+11 PSDORNO+17

FileNo	Call Tags
^PSD(58.8 - [#58.8]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	PSDORNO+17
^PSD(58.8 - [#58.8]	PSDORNO+8, PSDORNO+12, PSDORNO+18, PSDORNO+19, DIE+1, DIE+3, DIE2*

Name	Line Occurrences
DIE	QTY
DIE2	DIE2
END	PSDORNO+12, PSDORNO+17, PSDORNO+18, PSDORNO+20, PSDORNO+21, QTY, QTY+1
MSG	PSDORNO+12, PSDORNO+20, PSDORNO+21

Name	Field # of Occurrence
^(0	PSDORNO+19, DIE+3*

Name	Field # of Occurrence
%	END!, DIE2+2
%DT	END!
%H	END!
%I	END!
CNT	QTY*, END!
CNT1	END!
DA	END!, DIE2+1!, DIE2+4*
DA(1	PSDORNO+18, DIE2+1, DIE2+4*
DA(2	DIE2+1, DIE2+4
DD	DIE2+1!
DIC	PSDORNO+18!, END!, DIE2+1!
DIC("DR"	PSDORNO+18*
DIC(0	PSDORNO+18, DIE2+1
DIE	END!, DIE2+1!*, DIE2+4!
DINUM	PSDORNO+18, END!, DIE2+1
DIR	PSDORNO+11!, PSDORNO+17!, END!
DIR("?"	PSDORNO+10, PSDORNO+14, PSDORNO+15, PSDORNO+16
DIR("A"	PSDORNO+7, PSDORNO+8, PSDORNO+9, PSDORNO+13
DIR("B"	PSDORNO+6*
DIR(0	PSDORNO+6, PSDORNO+13
DIROUT	END!
DIRUT	PSDORNO+17, END!
DIWF	END!
DIWL	END!
DIWR	END!
DLAYGO	PSDORNO+18*!
DO	DIE2+1!
DR	END!, DIE2+1!, DIE2+4*!
DT	PSDORNO+18
DTOUT	END!
DUOUT	END!
LN	END!
MSG	PSDORNO+12*, END!, MSG+1
MSG1	PSDORNO+20, PSDORNO+21, END!, MSG+2
>> NAOU	PSDORNO+8, PSDORNO+18, DIE+1, DIE+3, DIE2, DIE2+1, DIE2+4
>> NAOUN	PSDORNO+8
>> NBKU	PSDORNO+19*, PSDORNO+20
>> NPKG	PSDORNO+19*, PSDORNO+21, QTY
ORD	QTY!
>> PSDA	DIE2*, DIE2+1, DIE2+4
PSDEM	END+1!, DIE+2*, DIE2+4
PSDOUT	QTY*, QTY+1, END+1!
>> PSDQTY	QTY*, DIE2+3, DIE2+4
>> PSDR	PSDORNO+8, PSDORNO+12, PSDORNO+18, PSDORNO+19, DIE+1, DIE+3, DIE2, DIE2+1, DIE2+4
>> PSDRN	PSDORNO+7
>> PSDS	PSDORNO+12, PSDORNO+19, DIE2+4
>> PSDT	DIE2+2*, DIE2+4
>> PSDT(9	PSDORNO+17*
>> PSDUZ	DIE2+4
X	PSDORNO+18, END+1!, DIE2+1
Y	PSDORNO+11, PSDORNO+17, PSDORNO+18, END+1!