Routine: PSGOE4

Information

PSGOE4 ;BIR/CML3-REGULAR ORDER ENTRY ;06 Feb 2001 4:31 PM

Call Graph

Call Graph Total: 8

Package	Total	Call Graph
Inpatient Medications	6	$$ENSTN^PSGMI (,8)^PSGOE41 2^PSGOE42 (ENFF,ENHLP)^PSGOEM EN^PSGS0 GETDOSE^PSJDOSE
VA Fileman	2	^DIC YN^DICN

Caller Graph

Caller Graph Total: 3

Package	Total	Caller Graph
Inpatient Medications	3	PSGOE0 PSGOE3 PSJOE1

Entry Points

Name	Comments	DBIA/ICR reference
13	; units per dose
FF	; up-arrow to another field
A13	;
S13	;
26	; schedule
3	; med route
109	; dosage ordered
DONE	;
7	; schedule type
DEL	; delete entry

External References

Name	Field # of Occurrence
^DIC	3+6
YN^DICN	DEL+1
$$ENSTN^PSGMI	PSGOE4+8, 26+7, 26+11
^PSGOE41	26+15
8^PSGOE41	7+3, 7+6, 7+9
2^PSGOE42	13+3
ENFF^PSGOEM	FF+1
ENHLP^PSGOEM	109+6, 109+9, A13+3, A13+5, A13+8, 3+3, 3+4, 7+4, 7+8, 26+3 , 26+4, 26+6
EN^PSGS0	26+6
GETDOSE^PSJDOSE	109+1

Interaction Calls

Name	Line Occurrences
Function Call: READ	Timeout: DTIME Variable: X Line Location: 109+2
Function Call: WRITE	Prompt: !,"DOSAGE ORDERED: ",$S(PSGDO]"":PSGDO_"// ",1:"") Line Location: 109+2
Function Call: WRITE	Prompt: $C(7)," (Required)" Line Location: 109+3
Function Call: WRITE	Prompt: $C(7)," ",$S(X?1.P!(X=""):"(Required)",1:"??") Line Location: 109+9
Function Call: READ	Timeout: DTIME Variable: X Line Location: A13+1
Function Call: WRITE	Prompt: $C(7)," ??" Line Location: A13+3
Function Call: WRITE	Prompt: " ("_$E("0",X<1)_X_")" Line Location: A13+7
Function Call: WRITE	Prompt: $C(7)," ??" Line Location: A13+8
Function Call: READ	Timeout: DTIME Variable: X Line Location: 3+1
Function Call: WRITE	Prompt: !,"MED ROUTE: ",$S(PSGMR:PSGMRN_"// ",1:"") Line Location: 3+1
Function Call: WRITE	Prompt: " "_$P(^(0),"^",3) Line Location: 3+2
Function Call: WRITE	Prompt: $C(7)," (Required)" Line Location: 3+3
Function Call: READ	Timeout: DTIME Variable: X Line Location: 7+2
Function Call: WRITE	Prompt: $C(7) Line Location: 7+2
Function Call: WRITE	Prompt: " "_PSGSTN Line Location: 7+3
Function Call: WRITE	Prompt: " "_PSGSTN Line Location: 7+6
Function Call: WRITE	Prompt: $P($P(Y,"^",2),X,2) Line Location: 7+7
Function Call: WRITE	Prompt: $C(7)," ??" Line Location: 7+8
Function Call: READ	Timeout: DTIME Variable: X Line Location: 26+1
Function Call: WRITE	Prompt: !,"SCHEDULE: ",$S(PSGSCH]"":PSGSCH_"// ",1:"") Line Location: 26+1
Function Call: WRITE	Prompt: $C(7)," (Required)" Line Location: 26+2
Function Call: WRITE	Prompt: $C(7)," (Required)" Line Location: 26+3
Function Call: WRITE	Prompt: $C(7)," ??" Line Location: 26+6
Function Call: WRITE	Prompt: $C(7)," ...order not entered..." Line Location: DONE+1
Function Call: WRITE	Prompt: $C(7)," <NOTHING DELETED>" Line Location: DEL+1
Routine Call	DIC Line Location: 3+6

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PS(51.2 - [#51.2]	PSGOE4+7, 3+2
^PS(53.45 - [#53.45]	PSGOE4+9!, S13+1
^VA(200 - [#200]	PSGOE4+7

Label References

Name	Line Occurrences
109	109+5, 109+6, 109+7, 109+9
13	A13+4, A13+8
26	7+3, 7+6, 7+9, 26+3, 26+4, 26+5, 26+6
3	109+1, 109+5, 13+3, 3+3, 3+5, 3+6
7	3+2, 7+4, 7+5, 7+8
@(	109+7, A13+6, 3+5, 7+5, 26+5
A13	A13+3, A13+5, A13+6
DEL	109+5, A13+4
DONE	109+1, 109+2, A13+1, 3+1, 7+2, 26+1
FF	109+7, A13+6, 3+5, 7+5, 26+5
S13	A13+2, A13+4

Naked Globals

Name	Field # of Occurrence
^(0	PSGOE4+7, 3+2
^(1	PSGOE4+9*
^(2	PSGOE4+9!*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	109+5, A13+4, DEL+1*
DIC	3+6!*
DIC("S"	3+6*
DIC(0	3+6*
DTIME	109+2, A13+1, 3+1, 7+2, 26+1
F	DONE+2!
F0	DONE+2!
F1	PSGOE4+8*, DONE+2!
F3	DONE+2!
>> FB	FF+1*
PSG	DONE+2!
>> PSGDO	109+2, 109+3, 109+4, 109+5, 109+10*
>> PSGDRG	PSGOE4+9, 109+1, S13+1
PSGF2	109+4, A13+3, 3+3, 7+4, 26+3*, DONE+2!, FF+1
>> PSGFD	PSGOE4+6*
PSGFOK	PSGOE4+8!
PSGFOK(109	109+5, 109+10
PSGFOK(13	13+3, S13+1
PSGFOK(2	PSGOE4+8, PSGOE4+9
PSGFOK(26	26+7, 26+9
PSGFOK(3	3+2, 3+7
PSGFOK(7	7+3, 7+6, 7+9, 7+10
>> PSGHSM	PSGOE4+6*
>> PSGMR	PSGOE4+6, PSGOE4+7, 3+1, 3+2, 3+3, 3+7
>> PSGMRN	PSGOE4+6, PSGOE4+7, 3+1, 3+2, 3+7*
>> PSGNEDFD	PSGOE4+6, PSGOE4+7, PSGOE4+8, 7+3, 7+6, 7+7, 26+7, 26+10*
>> PSGNEFD	PSGOE4+6*
>> PSGOE3	109+1, 13+2, 7+1, 26+8
>> PSGOEDMR	PSGOE4+6
>> PSGOEPR	PSGOE4+6
PSGOES	PSGOE4+6!
>> PSGOROE1	PSGOE4+6, 109+1, 109+2, A13+1, 3+1, 7+2, 26+1, DONE+1
>> PSGPR	PSGOE4+6*, PSGOE4+7
>> PSGPRN	PSGOE4+7*
>> PSGS0XT	7+3, 7+6, 7+9*, 26+7, 26+9
>> PSGS0Y	7+3, 7+6, 7+9*
>> PSGSCH	PSGOE4+6, 7+3, 7+6, 7+9, 26+1, 26+3, 26+7, 26+9, 26+10
PSGSD	PSGOE4+6*, DONE+2!
>> PSGSI	PSGOE4+6*
>> PSGSM	PSGOE4+6*
>> PSGST	PSGOE4+8, 7+3, 7+6, 7+7, 7+9, 26+7, 26+9*, 26+10, 26+11
>> PSGSTN	PSGOE4+8, 7+2, 7+3, 7+6, 7+7, 7+9, 26+7, 26+11*
>> PSGUD	PSGOE4+6, 109+5, A13+1, A13+2, A13+3, A13+4, A13+9, S13+1
PSJSLUP	26+6~*
>> PSJSYSP	PSGOE4+9, S13+1
>> PSJSYSU	PSGOE4+9, 109+1, 13+3
SDT	DONE+2!
>> X	109+2, 109+3, 109+4, 109+5, 109+6, 109+7, 109+8, 109+9, 109+10, A13+1 , A13+2, A13+3, A13+4, A13+5, A13+6, A13+7, A13+8, A13+9, 3+1, 3+2* , 3+3, 3+4, 3+5, 7+2, 7+3, 7+4, 7+5, 7+6, 7+7, 7+8 , 26+1, 26+3, 26+4, 26+5, 26+6*, 26+7, 26+9, 26+10
Y	109+7, A13+6, 3+5, 3+6, 3+7, 7+5, 7+7, 26+5, DONE+1!, FF+1
Y(0	3+7

Customize PDF page

Package: Inpatient Medications

Routine: PSGOE4

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: