Routine: PSGFILED

Package	Total	Call Graph
Inpatient Medications	5	ENAO^PSGGAO ^PSGIU ^PSGSET (ENCV,ENKV)^PSGSETU IMO^PSJIMO1
VA FileMan	4	NOW^%DTC ^DIC ^DIE ^DIR

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 9

Package	Total	Caller Graph
Inpatient Medications	8	PSJ SYS EDIT PSJU AT PSJU CPDD PSJU ECG PSJU EPPD PSJU EWG PSJU OSE PSJU SYSTEM
Pharmacy Data Management	1	PSSJU DRG

Entry Points

Name	Comments	DBIA/ICR reference
DONE
GED	; generic edit
ENAT	; team file
ENAS	; schedules file - no longer used
ENMR	; med route file
ENWG	; ward group file
ENMI	; medication instruction file
ENDRG	; standard drug fields
DE	;
ENOSE	; order set enter/edit
RBCHK	; used to validate room-bed
RBQ	; show room-beds for a ward
RBNP
ENPPD	; edit pharmacy patient data ; W !!?3,"...This option is still under development...",! Q
ENCPDD	; edit patient's default stop date (wall)
ENSYS	; edit system file
ENPLSP	; edit pick list site parameters
ENCS	; change current site & parameters
DF	; Add/edit Med route, instruction... to the Dosage form file.
ENCD	;edit Clinic Definitions file
ENCG	; ward group file0

External References

Name	Field # of Occurrence
NOW^%DTC	ENDRG+1
^DIC	ENAT+1, ENMR+2, ENWG+1, ENMI+1, ENDRG+1, ENOSE+1, DF+5, ENCD+2, ENCG+1
^DIE	GED+1, ENAT+1, ENMR+2, ENWG+1, ENMI+1, DE+3, ENOSE+1, ENCPDD+6, ENSYS+3, DF+6 , DF+7, ENCD+3, ENCG+1
^DIR	DF+3
ENAO^PSGGAO	ENCPDD+2
^PSGIU	DE+3
^PSGSET	ENCS+2
ENCV^PSGSETU	ENCPDD+1
ENKV^PSGSETU	DONE, ENCS+2
IMO^PSJIMO1	ENCD+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: GED+1
Function Call: WRITE	Prompt: $C(7),$C(7),!!?3,"* WARNING, THIS DRUG IS INACTIVE. *",! Line Location: DE+1
Function Call: WRITE	Prompt: ! Line Location: DE+2
Function Call: READ	Variable: Z3 Timeout: DTIME Line Location: RBNP+0
Function Call: WRITE	Prompt: """^"" TO STOP: " Line Location: RBNP+0
Function Call: WRITE	Prompt: Z3="^" Condition for execution: '$T $C(7) S:'$T Line Location: RBNP+0
Function Call: WRITE	Prompt: $C(13)," ",$C(13) Line Location: RBNP+0
Function Call: WRITE	Prompt: !!?3,"...This option is still under development...",! Line Location: ENPPD+1
Function Call: WRITE	Prompt: $C(7),!!?2 Line Location: ENCPDD+5
Function Call: WRITE	Prompt: ! Condition for execution: $L(X(1))+$X>78 Line Location: ENCPDD+5
Function Call: WRITE	Prompt: X(1)," " Line Location: ENCPDD+5
Function Call: WRITE	Prompt: !! Line Location: ENCPDD+6
Function Call: WRITE	Prompt: ! Line Location: ENSYS+3
Function Call: WRITE	Prompt: !!,"Current site: ",$P(PSJSYSW0,"^") Line Location: ENCS+1
Routine Call	DIC Line Location: ENAT+1 ENMR+2 ENWG+1 ENMI+1 ENDRG+1 ENOSE+1 DF+5 ENCD+2 ENCG+1
Routine Call	DIE Line Location: GED+1 ENAT+1 ENMR+2 ENWG+1 ENMI+1 DE+3 ENOSE+1 ENCPDD+6 ENSYS+3 DF+6 DF+7 ENCD+3 ENCG+1
Routine Call	DIR Line Location: DF+3

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^PSDRUG - [#50]	Classic Fileman Calls
^PS(50.606 - [#50.606]	Classic Fileman Calls
^PS(51 - [#51]	Classic Fileman Calls
^PS(51.2 - [#51.2]	Classic Fileman Calls
^PS(53.2 - [#53.2]	Classic Fileman Calls
^PS(53.46 - [#53.46]	Classic Fileman Calls
^PS(55 - [#55]	Classic Fileman Calls
^PS(57.5 - [#57.5]	Classic Fileman Calls
^PS(57.7 - [#57.7]	Classic Fileman Calls
^PS(57.8 - [#57.8]	Classic Fileman Calls
^PS(59.7 - [#59.7]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(42 - [#42]	ENCPDD+4
^DPT - [#2]	ENCPDD+3
^PS(50.606 - [#50.606]	DF+6
^PS(59.6 - [#59.6]	ENCPDD+4
^PSDRUG - [#50]	DE+1

Label References

Name	Line Occurrences
DE	ENDRG+1
DF	ENMR+2
DONE	ENAT+2, ENMR+3, ENWG+2, ENMI+2, ENDRG+2, ENOSE+2, ENCPDD+7, ENCG+2

Naked Globals

Name	Field # of Occurrence
^("I"	DE+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	ENDRG+1
CLINFLG	ENCD+1~
CLINICS	ENCD+1~*, ENCD+4
CLINICS(	ENCD+3*
D0	DONE!, ENOSE+1!
D1	DONE!, ENOSE+1!
D2	DONE!
DA	GED+1, ENAT+1, ENMR+2, ENWG+1!, ENMI+1, DE+2, DE+3!, ENOSE+1!, ENCPDD+6, ENSYS+2* , ENSYS+3!, DF+4!, DF+6, DF+7, ENCD+3!, ENCG+1!
DFNO	DF+4~, DF+5*, DF+6, DF+7
DIC	ENAT+1!, ENMR+1!, ENMR+2!, ENWG+1!, ENMI+1!, ENDRG+1!, ENOSE+1!, DF+4!, DF+5, DF+7! , ENCD+2!, ENCG+1*!
DIC("A"	ENAT+1, ENDRG+1, ENOSE+1, ENCD+2
DIC(0	ENAT+1, ENMR+2, ENWG+1, ENMI+1, ENDRG+1, ENOSE+1, DF+5, ENCD+2, ENCG+1*
DIE	ENAT+1, ENMR+1!, ENMR+2, ENWG+1, ENMI+1, DE+2, DE+3!, ENOSE+1!, ENCPDD+6, ENSYS+2 , ENSYS+3!, DF+4!, DF+6, DF+7!, ENCD+3!, ENCG+1
>> DIR("?"	DF+2*
>> DIR("A"	DF+1*
>> DIR("B"	DF+3*
>> DIR(0	DF+3*
DLAYGO	ENAT+1!, ENMR+2!, ENWG+1, ENMI+1, ENOSE+1, ENCD+2, ENCG+1*
DR	GED+1, ENAT+1, ENMR+1!, ENMR+2, ENWG+1!, ENMI+1, DE+2, DE+3!, ENOSE+1!, ENCPDD+6 , ENSYS+2, ENSYS+3!, DF+4!, DF+6, DF+7!, ENCD+3!, ENCG+1!*
DTIME	RBNP
MR	ENMR+1~, ENMR+2*, DF+6, DF+7!
MRNO	ENMR+1~, ENMR+2*, DF+6
PSGCSF	ENCS+2*!
>> PSGDT	ENDRG+1*, DE+1
PSGNEDFD	ENOSE+1!
PSGORSET	ENCS+2!
>> PSGP	ENCPDD+2, ENCPDD+3, ENCPDD+6
PSGRBS	DONE!
PSGS0XT	ENOSE+1!
PSGS0Y	ENOSE+1!
PSIUA	ENDRG+2!, DE+3
PSIUDA	ENDRG+2!, DE+2*
PSIUX	ENDRG+2!, DE+3*
>> PSJSYSW0	ENCS+1
U	ENMR+2
WD	ENCPDD+4*, ENCPDD+7!
WDN	ENCPDD+3*, ENCPDD+4, ENCPDD+7!
>> X	ENCPDD+4, ENCPDD+5
>> X(1	ENCPDD+5*
XQUIT	ENCPDD+1, ENCS+2!
Y	GED+1, ENAT+1, ENMR+1!, ENMR+2, ENWG+1, ENMI+1, ENDRG+1, DE+1, DE+2, ENOSE+1 , ENCPDD+5*, DF+3, DF+4~, DF+5, ENCD+2, ENCD+3, ENCG+1
>> Z3	RBNP*

Customize PDF page

Package: Inpatient Medications

Routine: PSGFILED

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 9

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: