Routine: PSJ005

Package

Total

Call Graph

^%DT ^DIE

EN1^PSJHL2

Package	Total	Caller Graph
Inpatient Medications	1	PSJIPST3

Package

Total

Caller Graph

Name	Comments	DBIA/ICR reference
IV()	; is the Orderable Item marked for IV use? if yes - quit
EN	; QUEUE UP CONVERSION FOR UD OUTPATIENT CLEANUP
DISC()	; was the patients last movement a discharge? if not - quit
GETDT	; check date/time for job to run
CON(X)	;
DC	; change the orders status to DISCONTINUED!
START	;
START1	;
BADN	; called from BADNAMES^PSJIPST3, when main CPRS is finished
FIN	; ; has CPRS main order conversion finished? IF NOT DON'T ASK TIME TO Q

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

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	DISC+1
^PS(50.7 - [#50.7]	IV+2
^PS(53.1 - [#53.1]	START+2, START+4, IV+1
^PS(55 - [#55]	START1+2, START1+3, START1+4!, START1+5, START1+6, START1+7!
^PS(59.7 - [#59.7]	FIN+2, EN+1

Name	Field # of Occurrence
^(4	START1+4, START1+7

Name	Field # of Occurrence
%DT	GETDT+1~, CON+1~
>> DA	DC+3*
DFN	START1+1~, START1+2, START1+3, START1+4, START1+5, START1+6, START1+7
DIE	DC+3*!
>> DR	DC+3*
OI	IV+1~*, IV+2
PM	EN+7~, EN+8
PSJ	START+1~, START+2*, START+4, DISC+1, DC+4
PSJ0	START+1~, START+2*, START+4
PSJ1	START+1~, START+4*, IV+1, DC+3, DC+4
>> PSJCONV	FIN+2, EN+1, EN+2, EN+3, EN+6, EN+11
PSJORD	START1+1~, START1+3, START1+4, START1+6, START1+7
U	START1+4, START1+7
X	GETDT+2!, GETDT+3*, CON~
>> XPDQUES("POS	ONE" , EN+3, EN+6, EN+11
Y	GETDT+1~, GETDT+2, GETDT+3, CON+2
>> ZTDESC	EN+4, EN+12, BADN+2, BADN+7
>> ZTDTH	EN+3, EN+11, BADN+1, BADN+6
>> ZTIO	EN+3, EN+11, BADN+1, BADN+6
>> ZTRTN	EN+5, EN+13, BADN+3, BADN+8
>> ZTSK	EN+6

Information