Routine: DGRUGBGJ

Package	Total	Caller Graph
Registration	2	DG RUG BACKGROUND JOB DGRUGC

Entry Points

Name	Line Occurrences
Function Call: WRITE	Prompt: F Line Location: PRT+0
Function Call: WRITE	Prompt: Q:W="" Line Location: PRT+0
Function Call: WRITE	Prompt: !,$E($P(DGI,U),1,25),?27,$P(DGI,U,2),?55 Line Location: PRT+0
Function Call: WRITE	Prompt: ! Line Location: PRT+1
Function Call: WRITE	Prompt: @IOF Line Location: QUIT+0
Function Call: WRITE	Prompt: @IOF,!,$P(^DIC(42,+W,0),U),?60,"DATE: " Line Location: HEAD+0
Function Call: WRITE	Prompt: !!,"PATIENT ASSESSMENT INSTRUMENTS HAVE BEEN CREATED FOR THE FOLLOWING PATIENTS ",!?25,"DUE TO ADMISSION/TRANSFER IN",!!,?5,"NAME",?31,"SSN",?46,"DATE OF ADMISSION/TRANSFER IN" Line Location: HEAD+1
Function Call: WRITE	Prompt: !,"There was an attempt to set up a PAI record on ",$P(^DPT(DFN,0),U)," ",$P(^(0),U,9),!,"Please verify that this patient's data is accurate and create a PAI record." Line Location: BUL+0
Routine Call	DIE Line Location: FILE+4
Routine Call	%ZIS Line Location: DGRUGBGJ+2

FileNo	Call Tags
^DG(45.9 - [#45.9]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DG(43 - [#43]	DGRUGBGJ+2, QUIT*
^DG(45.9 - [#45.9]	FILE
^DGPM - [#405]	EN+1, ADM, PREV+2
^DGPM("AMV1"	ADM
^DGPM("AMV2"	EN+1
^DIC(42 - [#42]	ADM, HEAD, CK+1, PREV+1, PREV+2
^DPT - [#2]	FILE+1, FILE+5, BUL
^UTILITY($J	PRT, QUIT+1!, FILE+5*

Name	Field # of Occurrence
%DT	DGRUGBGJ+2, QUIT, QUIT+1!
D	PRT*, QUIT+1!
DA	QUIT+1!, FILE+2*
DFN	EN+1, ADM, QUIT+1!, FILE, FILE+1, FILE+5, BUL
DGADM	EN+1, ADM, QUIT+1!, PREV+2
DGD	ADM, QUIT+1!, CK+1, FILE, FILE+3, FILE+5
DGDT	DGRUGBGJ+2*, QUIT+1!, HEAD
DGED	DGRUGBGJ+2*, EN+1, ADM, QUIT+1!
DGFLG	EN, QUIT+1!, CK+1, PREV+1, PREV+2
DGI	PRT*, QUIT+1!
DGMT	QUIT+1!, CK*, CK+1
DGSD	DGRUGBGJ+2*, EN+1, ADM, QUIT+1!
DGSSN	QUIT+1!, FILE+1*, FILE+3, FILE+5
DGST	DGRUGBGJ+2*, QUIT+1!
DIC	QUIT+1!, FILE+1*
DIC(0	FILE+1*
DIE	QUIT+1!, FILE+2*
DLAYGO	QUIT+1!, FILE+1*
DR	QUIT+1!, FILE+3*
I	PRT*, QUIT+1!
IOF	QUIT, HEAD
ION	DGRUGBGJ+2
>> IOP	DGRUGBGJ+2*
N	QUIT+1!, PREV+1*, PREV+2
N1	QUIT+1!
R	EN+1, ADM, QUIT+1!, CK+1, PREV
S	ADM, QUIT+1!, CK+1, PREV+1, PREV+2, FILE+3
S1	QUIT+1!, PREV+1, PREV+2
U	DGRUGBGJ+2*, ADM, PRT, QUIT, HEAD, CK+1, PREV+1, FILE+1, FILE+5, BUL
VAERR	QUIT+1!
VAIP	QUIT+1!
VAIP("D"	PREV*
VAIP(15	PREV+1
W	PRT*, QUIT+1!, HEAD
W0	ADM, QUIT+1!, CK+1, FILE+2*, FILE+5
W1	PRT, QUIT+1!, PREV+1, PREV+2*
X	DGRUGBGJ+2!, EN+1, QUIT, QUIT+1!, CK, CK+1, FILE+1
Y	DGRUGBGJ+2!, PRT, QUIT, QUIT+1!, HEAD, FILE+1, FILE+2