Routine: PSGOER0

Package	Total	Call Graph
Inpatient Medications	13	($$ENDL,ENGO)^PSGDL $$ENDD^PSGMI ($$ENSD,ENFD,ENWALL)^PSGNE3 $$DDOK^PSGOE2 $$GTNEDFD^PSGOE7 ENDRG^PSGOEF1 ENHLP^PSGOEM $$ENOSD^PSJDCU ($$DURMIN,$$GETDUR)^PSJLIVMD $$ACTIVE^PSJORREN EFDNEW^PSJUTL $$DATE2^PSJUTL2 $$ENNOO^PSJUTL5
VA Fileman	2	^%DT ^DIC
Kernel	1	($$FMADD,$$NOW)^XLFDT

Package	Total	Caller Graph
Inpatient Medications	4	PSGOER PSGOERS PSGOESF PSJCOMR

Entry Points

Name	Comments	DBIA/ICR reference
10	;
A1	;
25
O25	;
D25
DATE(PSGP,PSGORD,PSGDT)	;
1	; provider
W25
DONE	;
CHKDD	;
FF	; "^" to another field
106	; nature of order

External References

Name	Field # of Occurrence
^%DT	25+5
^DIC	A1+6, FF+1
$$ENDL^PSGDL	25+4
ENGO^PSGDL	25+4
$$ENDD^PSGMI	DATE+12, D25+4, 25+5
$$ENSD^PSGNE3	DATE+11
ENFD^PSGNE3	O25+4
ENWALL^PSGNE3	O25+2
$$DDOK^PSGOE2	CHKDD+2
$$GTNEDFD^PSGOE7	DATE+4
ENDRG^PSGOEF1	CHKDD+7
ENHLP^PSGOEM	25+3, A1+2, A1+4
$$ENOSD^PSJDCU	O25+5
$$DURMIN^PSJLIVMD	D25+1, D25+3
$$GETDUR^PSJLIVMD	D25
$$ACTIVE^PSJORREN	DATE+2
EFDNEW^PSJUTL	W25+4
$$DATE2^PSJUTL2	O25+3
$$ENNOO^PSJUTL5	106+1
$$FMADD^XLFDT	D25+1, D25+3
$$NOW^XLFDT	O25+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"No active Orderable Item was found.",! Line Location: DATE+3
Function Call: READ	Timeout: DTIME Variable: X Line Location: 25+0
Function Call: WRITE	Prompt: X="^" Condition for execution: '$T $C(7) S:'$T Line Location: 25+0
Function Call: WRITE	Prompt: " "_PSGFDN Line Location: 25+1
Function Call: WRITE	Prompt: " ...dose limit..." Line Location: 25+4
Function Call: WRITE	Prompt: $C(7),!!?13,"* WARNING! THE STOP DATE ENTERED IS IN THE PAST! *",! Line Location: W25+0
Function Call: WRITE	Prompt: $C(7),!!?3,"* The STOP date must be AFTER the START date. *" Line Location: W25+1
Function Call: READ	Timeout: DTIME Variable: X Line Location: A1+1
Function Call: WRITE	Prompt: X="^" Condition for execution: '$T $C(7) S:'$T Line Location: A1+1
Function Call: WRITE	Prompt: $C(7)," (Required)" Line Location: A1+2
Function Call: WRITE	Prompt: " "_$P(^("PS"),"^",2)_" "_$P(^("PS"),"^",3) Line Location: A1+3
Function Call: WRITE	Prompt: !!,"This order's dispense drug is invalid, a pharmacist must renew this order." Line Location: CHKDD+4
Function Call: WRITE	Prompt: !!,"THE DISPENSE DRUG IS MISSING FROM THIS ORDER." Line Location: CHKDD+6
Routine Call	DIC Line Location: A1+6 FF+1

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^VA(200 - [#200]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PS(53.45 - [#53.45]	CHKDD+5!
^PS(55 - [#55]	DATE+1, CHKDD+7
^VA(200 - [#200]	DATE+8, A1+3

Label References

Name	Line Occurrences
1	O25+5
106	CHKDD+1, CHKDD+2
25	25+2, 25+4, 25+5, W25+1
@(	25+2, A1+5
A1	A1+2, A1+5, A1+6
CHKDD	1+1, A1+3
DONE	DATE+3, 25, A1+1
FF	25+2, A1+5
W25	25+1

Naked Globals

Name	Field # of Occurrence
^(	DATE+1
^("PS"	DATE+8, A1+3
^(2	DATE+1, CHKDD+5!

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	25+5!*
>> COMQUIT	25, A1+1, CHKDD+8, 106+1
DIC	A1+6!, FF+1!
DIC("S"	A1+6, FF+1
DIC(0	A1+6, FF+1
>> DRG	CHKDD+8
DT	DATE+8
DTIME	25, A1+1
>> DUOUT	CHKDD+8
DUR	D25!*, D25+1, D25+3
DURMIN	D25!, D25+1, D25+3
DUZ	DATE+6
F	DONE+1!
F0	DONE+1!
F1	DATE+1*, DONE+1!
F3	DONE+1!
>> ND	DATE+7
ND2	25+4*, DONE+1!
PKGFLG	D25~*
PSGDL	25+4*, DONE+1!
PSGDLS	25+4!, DONE+1!
PSGDT	DATE~, DATE+9, DATE+11, O25+1, O25+3*, O25+4, D25+3, W25
PSGF2	25+3, 1+1, DONE+1!
>> PSGFD	O25+4, O25+5, D25+1, D25+2, D25+4, 25+5*, W25, W25+1
>> PSGFDN	D25+4, 25, 25+1, 25+5
PSGFOK	DATE+1!
PSGFOK(1	W25+5, A1+3, A1+7*
PSGFOK(10	O25+5*
PSGFOK(106	106+2*
PSGFOK(25	W25+2*
>> PSGLI	DATE+9
>> PSGNEDFD	DATE+4*
PSGNEFD	O25+1~, O25+4
PSGNESD	O25+4~*
>> PSGODDD(1	W25+5
>> PSGOEPR	DATE+6*, DATE+7
>> PSGOER0	DATE+1*, DATE+5, DATE+6
>> PSGOER2	DATE+1*, DATE+5, DATE+8, DATE+11, D25+2, 25+4
>> PSGOERDP	DATE+4*
>> PSGOFD	DATE+8*
>> PSGONF	W25+5
>> PSGOPR	DATE+6, DATE+8
PSGORD	DATE~, DATE+1, DATE+2, D25, D25+3, CHKDD+2, CHKDD+7
PSGOROE1	DONE+1!
>> PSGOSD	DATE+8*, DATE+10, DATE+11
PSGP	DATE~, DATE+1, DATE+2, O25+2, O25+5, D25, CHKDD+2, CHKDD+7
>> PSGPDRG	DATE+1, DATE+2, DATE+4, CHKDD+2
>> PSGPR	DATE+6, DATE+7, DATE+8, A1+1, A1+2, A1+3, A1+7
>> PSGPRI	DATE+8*
>> PSGPRN	DATE+8, A1+1, A1+3, A1+7
>> PSGRENEW	CHKDD+1
>> PSGRNSD	DATE+9*, O25+5, D25+1, 25+4
PSGRO	DATE+8, 25, A1+1*, DONE+1!
>> PSGS0XT	DATE+5*
>> PSGS0Y	DATE+5*, DATE+11
>> PSGSCH	DATE+5*, 25+4
PSGSD	DATE+10, DATE+11, DATE+12, O25+1~*, O25+2, W25+1
>> PSGSDN	DATE+12*
>> PSGST	DATE+5*, DATE+11, O25+5
>> PSGWLL	DATE+1*
PSJNOO	DATE+1!, 106+1*, 106+2
PSJREN	DATE+11*!
>> PSJSPEED	DATE+7
>> PSJSYSP	CHKDD+5
>> PSJSYSP0	CHKDD+4
>> PSJSYSU	DATE+6, DATE+8, 1+1, CHKDD+4
>> PSJSYSW0	O25+5, D25+4
SDT	DONE+1!
U	DATE+2, DATE+4, DATE+11, CHKDD+4
>> X	O25+5, D25+1, D25+4, 25, 25+1, 25+2, 25+3, 25+4, A1+1, A1+2 , A1+3, A1+4, A1+5, FF+1
XX	DATE+2~*, DATE+3
>> Y	O25+4, O25+5, D25+1, D25+2, D25+3, D25+4, 25+2, 25+5, A1+5, A1+6 , A1+7, FF+2*
>> Y(0	A1+7

Customize PDF page

Package: Inpatient Medications

Routine: PSGOER0

Information

Source Information

Call Graph

Call Graph Total: 16

Caller Graph

Caller Graph Total: 4

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: