Routine: PSGBRJ

Package	Total	Call Graph
VA Fileman	2	(C,NOW)^%DTC ^DIK
Inpatient Medications	1	ENKV^PSGSETU

Package	Total	Caller Graph
Inpatient Medications	1	PSJU BRJ

Entry Points

Name	Comments	DBIA/ICR reference
UPARAM	; kill off entries in ^PS(53.45) INPATIENT USER PARAMETERS file if there is no corresponding entry in the NEW PERSON file or they have a TERMINATION DATE before today.
GLK	; kill off entries in ^PS(53.42) 20 days or more old
DK	; kill off dc'd orders in 53.1 around longer than life of labels
PLP	; purge pick lists that are filed away and older than auto purge days
AK	; kill off all orders in 53.1 that have gone active (into 55)
DE	; kill off de orders in 53.1 that no longer tie to order in 55
LK	; kill off old labels
DONE	;
PDE(PSJDA1,PSGP)	;Remove all related pending orders with the "DE" status.
ORPRG	;
LABELDT(PSGP,X1)	; Find patient's ward and get days to keep new labels.

Name	Field # of Occurrence
C^%DTC	PLP+1, GLK+1, LABELDT+2
NOW^%DTC	LK+1, DONE+2
^DIK	LK+8, AK+2, DK+5, PLP+2, PLP+3, UPARAM+2, UPARAM+3, PDE+7
ENKV^PSGSETU	DONE+3

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("TEST"	DE+1, DK+2
^DIC(42 - [#42]	LABELDT+1
^DPT - [#2]	LABELDT+1
^PS(53.1 - [#53.1]	AK+2, DE+3, DE+6, DE+7, DK+3, DK+4, DK+5, PDE+2, PDE+7
^PS(53.41 - [#53.41]	LK+3, LK+4, LK+6, LK+7
^PS(53.42 - [#53.42]	LK+1, GLK+1, DONE+2
^PS(53.45 - [#53.45]	UPARAM+1
^PS(53.5 - [#53.5]	PLP+1, PLP+2!, PLP+3
^PS(53.55 - [#53.55]	PLP+3
^PS(55 - [#55]	DE+4, DE+5, PDE+3, PDE+4
^PS(59.6 - [#59.6]	LABELDT+1
^PS(59.7 - [#59.7]	PLP+1
^TMP($J	DE+2!, DE+4, DE+5, DE+6*, DE+7, DE+8!
^VA(200 - [#200]	UPARAM+2, UPARAM+3

Name	Field # of Occurrence
>> %	LK+1, DONE+2
CA	DONE+3!
D	GLK+1*, DONE+3!
DA	LK+8!, AK+2, DK+4, DK+5, PLP+2!, PLP+3!, UPARAM+1, UPARAM+2, UPARAM+3, DONE+3! , PDE+1~, PDE+7*!
DA(1	LK+8*
DA(2	LK+8*
DA(3	LK+8*
DA(4	LK+8*
DFN	DONE+3!
DIK	LK+8, AK+2, DK+5, PLP+2!, PLP+3!, UPARAM+2!, UPARAM+3!, DONE+3!, PDE+1~, PDE+7!
DND	DONE+3!
DT	PLP+1, GLK+1, UPARAM+3
GOTO	DONE+3!
ON	DE+2~, DE+3*, DE+4, DE+5, DE+6
PDE	PDE+1~
PDE(	PDE+5, PDE+6, PDE+7
PDE(0	PDE+7
PDEFLG	PDE+1~, PDE+3, PDE+4*, PDE+7
PSGBRJDT	LK+1*, DONE+2, DONE+3!
>> PSGDT	LK+1*, LK+5, DK+4
PSGKD	LK+5, LK+8, DK+4, DK+5, DONE+3!
PSGL1	LK+2*, LK+3, LK+4, LK+6, LK+7, LK+8, DONE+3!
PSGL2	LK+3*, LK+4, LK+6, LK+7, LK+8, DONE+3!
PSGL3	LK+4*, LK+5, LK+6, LK+7, LK+8, DONE+3!
PSGL4	LK+6*, LK+7, LK+8, DONE+3!
>> PSGL5	LK+6*, LK+7, LK+8
PSGOERRF	DE+1, DK+2, DK+5, DONE+3!, PDE+7
PSGP	AK+2, DE+3, DE+4, DE+5, DE+6, DK+3*, DK+4, LABELDT~, LABELDT+1, PDE~ , PDE+3, PDE+4
PSGX	UPARAM+3*, DONE+3!
PSJ55	PDE+1~, PDE+2, PDE+3, PDE+4*, PDE+6
PSJACIVF	LK+1*, DONE+3!
PSJDA	DE+2~, DE+3, DE+4, DE+5, DE+6, DE+7
PSJDA1	PDE~, PDE+2, PDE+5, PDE+6, PDE+7
PSJNO	AK+1~, AK+2*
PSJNOACT	AK+1~, DK+1~, PDE+1~*
PSJNUM	PDE+1~, PDE+2*, PDE+3, PDE+4, PDE+5
PSJX	PLP+1, PLP+3, DONE+3!
>> Q	PLP+1*
>> QQ	PLP+1*
S	DK+5*, DONE+3!
ST	DK+5*, DONE+3!
U	DE+3, LABELDT+1, PDE+2
>> X	LK+7, LK+8, DE+1, DK+2, PLP+1, GLK+1, LABELDT+1, LABELDT+3
X1	PLP+1, GLK+1, DONE+3!, LABELDT~
X2	PLP+1, GLK+1, DONE+3!, LABELDT+1*
>> Y	PLP+1*, PLP+2
>> ZTQUEUED	DONE+1
>> ZTREQ	DONE+1*