Routine: DGRUGPI

Package	Total	Call Graph
Registration	2	$$CHOSE^DGRUGU1 (CLOSE,ZIS)^DGUTQ
VA Fileman	2	^%DT DT^DIQ
Scheduling	1	ASK2^SDDIV

Package

Total

Call Graph

Registration

$$CHOSE^DGRUGU1 (CLOSE,ZIS)^DGUTQ

VA Fileman

^%DT DT^DIQ

Scheduling

ASK2^SDDIV

Package	Total	Caller Graph
Registration	1	DG RUG INCOMPLETE

Package

Total

Caller Graph

Registration

DG RUG INCOMPLETE

Name	Field # of Occurrence
^%DT	DATE, DATE+1, START+1
$$CHOSE^DGRUGU1	DGRUGPI+3
CLOSE^DGUTQ	DATE+2
ZIS^DGUTQ	DATE+2
DT^DIQ	PRT+2, DATES
ASK2^SDDIV	DGRUGPI+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"** Date Range Selection **" Line Location: DGRUGPI+6
Function Call: WRITE	Prompt: ! Line Location: QUIT+0
Function Call: WRITE	Prompt: !,$E($P(^DPT(+DGI,0),U),1,25),?27,$P(DGI,U,3),?42 Line Location: PRT+2
Function Call: WRITE	Prompt: ?62,$S($P(DGI,U,6)=1:"ADMISSION/TRANSFER",$P(DGI,U,6)=2:"SEMI-ANNUAL CENSUS",$P(DGI,U,6)=3:"CONTRACT NURSING HOME") Line Location: PRT+2
Function Call: WRITE	Prompt: @IOF Line Location: HEAD+0
Function Call: WRITE	Prompt: !!?20,"INCOMPLETE PATIENT ASSESSMENT INSTRUMENTS" Line Location: HEAD+2
Function Call: WRITE	Prompt: !?20 Line Location: HEAD+3
Function Call: WRITE	Prompt: !!,$P($G(^DIC(42,+W,0)),U) Line Location: HEAD+5
Function Call: WRITE	Prompt: !!,$P($G(^FBAAV(+W,0)),U) Line Location: HEAD+6
Function Call: WRITE	Prompt: !!?45,"DATE OF",?66,"ASSESSMENT",!,"NAME",?30,"SSN",?40,"ADMISSION/TRANSFER",?68,"PURPOSE" Line Location: HEAD+7
Function Call: WRITE	Prompt: !,E Line Location: HEAD+8
Function Call: WRITE	Prompt: !!,"No location listed in Patient Assessment File for:" Line Location: NOWD+0
Function Call: READ	Timeout: DTIME Variable: X Line Location: PAGEND+0
Function Call: WRITE	Prompt: @IOF,!!,"INCOMPLETE PATIENT ASSESSMENTS",!!!!,"THERE ARE NO PATIENTS WITH THE STATUS OF INCOMPLETE" Line Location: NOINC+0
Function Call: WRITE	Prompt: ! Line Location: NOINC+0
Function Call: WRITE	Prompt: !?20,"FOR DATE RANGE: " Line Location: DATES+0
Function Call: WRITE	Prompt: "-" Line Location: DATES+0
Function Call: WRITE	Prompt: "-" Line Location: DATES+0
Function Call: WRITE	Prompt: !!?10,"FOR LOCATIONS: " Line Location: LOC+2
Function Call: WRITE	Prompt: "ALL Contract Nursing Homes " Line Location: LOC+3
Function Call: WRITE	Prompt: "ALL Wards" Line Location: LOC+4

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DG(40.8 - [#40.8]	SET+1
^DG(45.9 - [#45.9]	START+1, START+3, START+4, START+5
^DIC(42 - [#42]	SET+1, HEAD+5
^DPT - [#2]	PRT+2
^FBAAV(	HEAD+6
^UTILITY($J	START+9, START+12, START+14, START+15, START+16, QUIT!, SET+3, SET+4, SET+6, SET+7

Name	Line Occurrences
DATES	HEAD+3, NOINC
HEAD	START+17, PRT
LOC	NOINC
NOINC	START+1, START+9
NOWD	HEAD+4
PAGEND	START+12, PRT, PAGEND+2
PRT	START+18
QUIT	DGRUGPI+2, DGRUGPI+4, DATE, DATE+1, DATE+2, START+10, START+19, NOINC
SET	START+8
START	DATE+2

Name	Field # of Occurrence
^("R"	START+5
^(0	SET+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	DATE, START+1!, QUIT!
%DT("A"	DATE, DATE+1
%DT(0	DATE+1*
CNT	LOC+1~, LOC+6, LOC+7, LOC+8, LOC+10, LOC+11, LOC+12
D	START+15*, START+16, QUIT!
DFN	QUIT!, PRT+2*
DGAD	START+6*, START+8, QUIT!
DGBDT	DATE*, START+8, QUIT!, DATES
DGCL	QUIT+1!, SET, SET+3, SET+6, LOC+3, LOC+5
DGCL(	SET+3, SET+6, LOC+7, LOC+8
DGEDT	DATE+1*, START+8, QUIT!, DATES
DGFFL	START+1, START+12, QUIT!
DGFL	START+2, QUIT!, NOWD, PAGEND*
DGFL2	START+2, START+3, START+8, START+10, START+12, START+14, START+15, START+19, QUIT!, PRT , PRT+1, PAGEND, PAGEND+1
DGI	START+4, START+6, START+7, START+16, QUIT!, SET+3, SET+4, SET+6, SET+7, PRT+2 , HEAD+5, HEAD+6
DGNOW	START+1*, QUIT!, DATES
DGPGM	DATE+2*, QUIT+1!
DGTYPE	START+7*, QUIT+1!, SET+1, SET+2, SET+3, SET+4, SET+6, SET+7
DGVAR	DATE+2*, QUIT+1!
DGW	QUIT+1!, SET, SET+4, SET+7, LOC+4, LOC+9
DGW(	SET+4, SET+7, LOC+11, LOC+12
DIV	QUIT+1!, SET+1, SET+2
DTIME	PAGEND
E	QUIT+1!, HEAD+8!*
ERR	DGRUGPI+3~*, DGRUGPI+4, DGRUGPI+5
FIRST	START+13, START+17, QUIT+1!
I	START+3, START+4, START+5, START+14, START+15, START+16, QUIT+1!, SET+3, SET+4, SET+6 , SET+7
IO	START+1
IOF	START, HEAD, NOINC
IOSL	PRT
IOST	START, START+12, PRT, HEAD
PAGE	START+2, QUIT+1!, HEAD, HEAD+1
POP	DATE+2, QUIT+1!
>> SEL	DGRUGPI+5*, SET+1, SET+3, SET+4, SET+5
U	START+5, START+6, START+7, SET+1, SET+3, SET+4, SET+6, SET+7, PRT+2, HEAD+5 , HEAD+6
VAUTD	QUIT+1!, SET+1
VAUTD(	SET+1
W	START+5, START+11, START+12, START+14, START+15, START+16, QUIT+1!, SET+1, SET+3, SET+4 , SET+5, SET+6, SET+7, HEAD+4, HEAD+5, HEAD+6
X	START+1!, QUIT+1!, PAGEND
Y	DGRUGPI+2, DATE, DATE+1, START+1!, QUIT+1!, PRT+2, DATES

Customize PDF page

Package: Registration

Routine: DGRUGPI

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: