Routine: PSGPLDP0

Package	Total	Call Graph
VA Fileman	5	NOW^%DTC ^DIC YN^DICN ^DIE ^DIR
Inpatient Medications	2	($$ENDDN,$$ENDTC,$$ENPDN)^PSGMI (FIMSG,FMSG,PRNM)^PSGPLDPH

Package

Total

Call Graph

VA Fileman

NOW^%DTC ^DIC YN^DICN ^DIE ^DIR

Inpatient Medications

($$ENDDN,$$ENDTC,$$ENPDN)^PSGMI (FIMSG,FMSG,PRNM)^PSGPLDPH

Package	Total	Caller Graph
Inpatient Medications	1	PSGPLDP

Package

Total

Caller Graph

Inpatient Medications

PSGPLDP

Name	Comments	DBIA/ICR reference
GD	;
W1	;
SCREEN	; display break
PRN	;
ST	;
TM	;
W2	;
FILE	;
NP
GDMSG	;
PN	;
DRG	;
OUT	;

Name	Field # of Occurrence
NOW^%DTC	OUT+2
^DIC	PN+3
YN^DICN	PRN+1, OUT+1, FILE+1
^DIE	FILE+2
^DIR	SCREEN+2
$$ENDDN^PSGMI	GD+3
$$ENDTC^PSGMI	PSGPLDP0+4
$$ENPDN^PSGMI	GD+2
FIMSG^PSGPLDPH	FILE+1
FMSG^PSGPLDPH	OUT+1
PRNM^PSGPLDPH	PRN+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $C(7),$C(7),!!?33,"* WARNING *",!,"THIS PICK LIST STARTED TO RUN ",PSGOD,", BUT HAS NOT RUN TO COMPLETION." Line Location: PSGPLDP0+4
Function Call: WRITE	Prompt: !!,"Do you want to see PRN meds only" Line Location: PRN+1
Function Call: WRITE	Prompt: @IOF Line Location: PRN+3
Function Call: WRITE	Prompt: !!?2,"(No PRN meds founds.)" Condition for execution: 'PRN&'PC Line Location: OUT+1
Function Call: WRITE	Prompt: !!,"ARE YOU FINISHED WITH THIS PICK LIST" Line Location: OUT+1
Function Call: WRITE	Prompt: !!,"MAY I FILE THE DATA IN THIS PICK LIST AWAY" Line Location: FILE+1
Function Call: WRITE	Prompt: !,$$ENPDN^PSGMI(+$G(^PS(55,PSGP,5,PSJJORD,.2))),?42,"NEEDED: OI",?55,"DISPENSED:" Line Location: GD+2
Function Call: WRITE	Prompt: !,DR,?42,"NEEDED: ",PDN,?55,"DISPENSED: ",PDN Line Location: GD+5
Function Call: READ	Timeout: DTIME Variable: OK Line Location: GD+7
Function Call: WRITE	Prompt: !,DR,?42,"NEEDED: ",PDN,?55,"DISPENSED: ",$S(PDD="":"",1:PDD_"// ") Line Location: GD+7
Function Call: WRITE	Prompt: OK="^^^" Condition for execution: '$T $C(7) S:'$T Line Location: GD+7
Function Call: WRITE	Prompt: $C(7)," ??" Line Location: GD+7
Function Call: WRITE	Prompt: " ",OK Line Location: GD+9
Function Call: WRITE	Prompt: !!," Enter the number of units actually dispensed for this medication. If the",!,"units dispensed is the same as the units needed (or units dispensed, if shown),",!,"just press the RETURN key." Line Location: GDMSG+1
Function Call: WRITE	Prompt: !,?20,"(NO ORDERS)",! Line Location: W2+3
Function Call: WRITE	Prompt: ! Line Location: SCREEN+1
Routine Call	DIE Line Location: FILE+2
Routine Call	DIC Line Location: PN+3
Routine Call	DIR Line Location: SCREEN+2

FileNo	Call Tags
^PS(53.5 - [#53.5]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	PN+7, PN+8, W2+1
^PS(53.5 - [#53.5]	PSGPLDP0+3, TM+1, PN+2, PN+5, PN+6, PN+7, ST+1, DRG+2, GD+1, GD+10* , W1+1, W2+1, W2+3
^PS(55 - [#55]	DRG+2, GD+2, GD+3

Name	Line Occurrences
DRG	ST+1
GD	DRG+2
GDMSG	GD+7
OUT	TM+1
PN	TM+1, PN+1
PRN	OUT+2
SCREEN	GD+2, GD+5, W2+3
ST	PN+1
TM	TM+1
W1	TM+1, PN+1, GD+4
W2	PN+1

Name	Field # of Occurrence
^(0	W2+1

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	PRN+1, PRN+2, PRN+3, OUT+1, OUT+2, FILE+1*, FILE+2
>> DA	FILE+2*
>> DDRG	GD+1*, GD+10
DIC	PN+3*!
DIC(0	PN+3*
DIE	FILE+2*!
DIR	SCREEN+2!
DIR("?"	SCREEN+2*
DIR("A"	SCREEN+2*
DIR(0	SCREEN+2*
>> DN	GD+1*, GD+2, GD+3
>> DR	FILE+2, GD+3, GD+5, GD+7
>> DRG	DRG+1, DRG+2, GD+1
DTIME	GD+7
IOF	PRN+3
>> LMT	GD+4*, GD+7
>> OK	TM+1, PN+1, PN+2, PN+3, ST+1, DRG+2, GD+1, GD+4, GD+7, GD+8 , GD+9, GD+10, GDMSG+2, W1+2, SCREEN+2
>> PC	PRN+3, OUT+1, GD+4
>> PDD	GD+1*, GD+7, GD+9, GD+10
>> PDN	GD+1*, GD+4, GD+5, GD+7, GD+9
>> PN	TM+1, PN+1, PN+2, PN+3, PN+7, PN+8*, ST+1, DRG+2, GD+1, W2+1
>> PPN	W2+1*, W2+2
>> PR	TM+1, W2+1, W2+2
>> PRN	PRN+2, PRN+3, TM+1, OUT+1, PN+1, DRG+2, GD+4
>> PSGLCNT	PRN+3, GD+6, W1+1, SCREEN+1
>> PSGOD	PSGPLDP0+4*
>> PSGORD	DRG+2*, GD+1, GD+10
>> PSGP	PN+1*, DRG+2, GD+1, GD+2, GD+3, GD+10, W1+1, W2+1, W2+3
>> PSGPLG	PSGPLDP0+3, TM+1, FILE+2, PN+2, PN+3, PN+5, PN+6, PN+7, ST+1, DRG+2 , GD+1, GD+10, W1+1, W2+1, W2+3
>> PSGPLTND	PSGPLDP0+3*, PSGPLDP0+4, OUT+2, W2+2
>> PSJJORD	DRG+2*, GD+2, GD+3
>> PSSN	W2+1*, W2+2
>> PW	W1+1*, W1+2
>> RB	TM+1, PN+2, PN+5, PN+6*, PN+7, ST+1, DRG+2, GD+1
>> SCH	DRG+2*
>> ST	ST+1*, DRG+2, GD+1
>> TM	PRN+3, TM+1, PN+2, PN+8*, ST+1, DRG+2, GD+1, W1+2
U	PN+5, PN+7, PN+8
>> WDN	TM+1, PN+2, PN+8, ST+1, DRG+2, GD+1, W1+1, W1+2
>> WF	PN+1, GD+4
>> WSF	PSGPLDP0+3*, TM+1, PN+1, PN+4, W1+1
>> X	PN+3*, SCREEN+2
Y	PN+3, PN+4*, PN+7!, PN+8!
Y(0	PN+4, PN+5, PN+7, PN+8

Customize PDF page

Package: Inpatient Medications

Routine: PSGPLDP0

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: