Routine: PSDORN2

Package	Total	Call Graph
VA Fileman	6	^DIC ^DIE ^DIK ^DIR ^DIWP ^DIWW
Controlled Substances	1	^PSDORN3
Kernel	1	SIG^XUSESIG

Package

Total

Call Graph

VA Fileman

^DIC ^DIE ^DIK ^DIR ^DIWP ^DIWW

Controlled Substances

^PSDORN3

Kernel

SIG^XUSESIG

Package	Total	Caller Graph
Controlled Substances	1	PSDORNV

Package

Total

Caller Graph

Controlled Substances

PSDORNV

Name	Comments	DBIA/ICR reference
EDIT	;edit or delete order request
ADD
PHARM	;create worksheet entry in file 58.85
DEL	;deletes order request
ASK	;displays order for review
DISPLAY	;displays order request to screen

Name	Field # of Occurrence
^DIC	ADD+1
^DIE	EDIT+4, ADD+4
^DIK	DEL+1
^DIR	ASK+3
^DIWP	DISPLAY+13
^DIWW	DISPLAY+14
^PSDORN3	ADD+8
SIG^XUSESIG	ASK+6

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: ASK+2
Function Call: WRITE	Prompt: !! Line Location: ASK+7
Function Call: WRITE	Prompt: "Your order request #"_CNT1_" of "_CNT Condition for execution: $D(ORD) Line Location: ASK+7
Function Call: WRITE	Prompt: @IOF,!,?17,"Controlled Substance " Line Location: DISPLAY+2
Function Call: WRITE	Prompt: !!,"Patient: ",$P($G(^DPT(PAT,0)),U),!! Line Location: DISPLAY+4
Function Call: WRITE	Prompt: "Requested by",?16,": ",$P($G(^VA(200,PSDUZ,0)),"^") Line Location: DISPLAY+5
Function Call: WRITE	Prompt: ?51,$S($G(PSDT(9))]"":"Needed by: "_PSDT(9),1:"Request Date: "_REQD),!,LN,! Line Location: DISPLAY+6
Function Call: WRITE	Prompt: !,"Drug",?16,": ",PSDRN Line Location: DISPLAY+7
Function Call: WRITE	Prompt: !,"Dispensed by",?16,": N/A",?50,"Dispensed Date: N/A" Line Location: DISPLAY+9
Function Call: WRITE	Prompt: !,"Disp. Location",?16,": " Line Location: DISPLAY+10
Function Call: WRITE	Prompt: $P($G(^PSD(58.8,+PSDS,0)),"^") Condition for execution: +PSDS Line Location: DISPLAY+10
Function Call: WRITE	Prompt: !,"Exp. Date",?16,": ",!,"Manufacturer",?16,": ",!,"Lot #",?16,": " Line Location: DISPLAY+10
Function Call: WRITE	Prompt: !,"Ord. Location",?16,": ",NAOUN,!,"Order Status",?16,": ",$P($G(^PSD(58.82,1,0)),"^"),!,"Comments:" Line Location: DISPLAY+11
Function Call: READ	Timeout: DTIME Variable: X Line Location: EDIT+1
Function Call: WRITE	Prompt: !!,"Press <RET> to edit this order request, or enter 'D' to delete the request.",! Line Location: EDIT+2
Function Call: WRITE	Prompt: !!,?25,"Request being deleted...",! Line Location: DEL+1
Function Call: WRITE	Prompt: ?5,!!,"Processing your request now..." Line Location: PHARM+1
Routine Call	DIE Line Location: EDIT+4 ADD+4
Routine Call	DIC Line Location: ADD+1
Routine Call	DIR Line Location: ASK+3

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	DISPLAY+4
^PSD(58.8 - [#58.8]	DISPLAY+10, DISPLAY+12, DISPLAY+13, ADD+3, ADD+4, ADD+5, ADD+6
^PSD(58.82 - [#58.82]	DISPLAY+11
^PSD(58.85 - [#58.85]	PHARM+1, ADD, ADD+2, ADD+5, ADD+6*
^UTILITY($J	DISPLAY+12!
^VA(200 - [#200]	DISPLAY+5

Name	Line Occurrences
ADD	ADD
ASK	ASK+5
DEL	ASK+4, ASK+6, EDIT+1, EDIT+3
DISPLAY	ASK+1
EDIT	ASK+5, EDIT+2
PHARM	ASK+7

Name	Field # of Occurrence
^(0	ADD+3

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> CNT	ASK+7
>> CNT1	ASK+7
DA	ASK+2!, EDIT+4!, DEL+1, ADD+1!, ADD+4*, ADD+7!
DA(1	EDIT+4, DEL+1
DA(2	EDIT+4, DEL+1
DIC	ADD+1!*, ADD+7!
DIC(0	ADD+1*
DIE	EDIT+4!, ADD+1!, ADD+4!, ADD+7!
DIK	DEL+1!*
>> DILOCKTM	PHARM+1
DIR	ASK+2!, ASK+3!
DIR("?"	ASK+2, ASK+3
DIR("A"	ASK+2*
DIR("B"	ASK+2*
DIR(0	ASK+2*
DIRUT	ASK+2!, ASK+4
>> DIWF	DISPLAY+13*
>> DIWL	DISPLAY+13*
>> DIWR	DISPLAY+13*
DLAYGO	ADD+1!*, ADD+7!
DR	EDIT+4!, ADD+1!, ADD+4, ADD+7!
DT	ADD+3
DTIME	ASK+9, EDIT+1
IOF	DISPLAY+2
LN	DISPLAY+1!*, DISPLAY+6
>> NAOU	DISPLAY+12, DISPLAY+13, EDIT+4, DEL+1, ADD+3, ADD+4, ADD+5, ADD+6
>> NAOUN	DISPLAY+11
>> ORD	ASK+7, ASK+9
>> PAT	DISPLAY+4, ADD+4
>> PSDA	DISPLAY+12, DISPLAY+13, EDIT+4, DEL+1, ADD+3, ADD+4, ADD+5, ADD+6
>> PSDEM	DISPLAY+3
>> PSDOUT	ASK+4, ASK+5, ASK+6, EDIT+1, DEL+1
>> PSDQTY	ADD+4
>> PSDR	DISPLAY+12, DISPLAY+13, EDIT+4, DEL+1, ADD+3, ADD+4, ADD+5, ADD+6
>> PSDRD	ADD+3*, ADD+4
PSDREC	ADD*, ADD+1, ADD+4, ADD+5, ADD+6, ADD+8!
>> PSDRN	DISPLAY+7
>> PSDS	DISPLAY+10, ADD+4
>> PSDT(9	DISPLAY+6, ADD+8!
>> PSDUZ	DISPLAY+5, ADD+4
>> REQD	DISPLAY+6
>> TEXT	DISPLAY+12*, DISPLAY+13
U	DISPLAY+4, ADD+4
WORD	ADD+6*, ADD+7!
X	ASK+6~, ASK+9, DISPLAY+13, EDIT+1, EDIT+2, EDIT+3, ADD+1*
X1	ASK+6~
>> Y	ASK+5, ASK+6

Customize PDF page

Package: Controlled Substances

Routine: PSDORN2

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: