Routine: DGRUGDS

Package	Total	Call Graph
Registration	4	BLDMSG^DGRUADT1 $$CHKWARD^DGRUUTL IN5^VADPT $$SITE^VASITE
Kernel	2	(,$$S)^%ZTLOAD $$NOW^XLFDT
VA Fileman	2	$$GET1^DIQ ^DIR
Health Level Seven	1	INIT^HLFNC2

Package

Total

Call Graph

Registration

BLDMSG^DGRUADT1 $$CHKWARD^DGRUUTL IN5^VADPT $$SITE^VASITE

Kernel

(,$$S)^%ZTLOAD $$NOW^XLFDT

VA Fileman

$$GET1^DIQ ^DIR

Health Level Seven

INIT^HLFNC2

Package	Total	Caller Graph
Registration	2	DGRU DATA SEED DGRU PATIENT DATA SEED

Package

Total

Caller Graph

Registration

DGRU DATA SEED DGRU PATIENT DATA SEED

Entry Points

Name	Comments	DBIA/ICR reference
EN	;
TEXT3	;;This option will do the data seeding of patient data in the RAI/MDS COTS system.
TEXT	;;This option will do the data seeding of patient data in the RAI/MDS COTS system.
EN1	;
EN3	;
EN4	;
INPAT	;
ACTIVE	;
EXIT	;
DIV	;

External References

Name	Field # of Occurrence
^%ZTLOAD	DIV+25
$$S^%ZTLOAD	EN1+18, EN1+35, EN1+37, EN1+38
BLDMSG^DGRUADT1	EN1+32, ACTIVE+8
$$CHKWARD^DGRUUTL	ACTIVE+5, ACTIVE+7
$$GET1^DIQ	EN1+21, EN1+22, EN1+29, EN1+30, INPAT+8, ACTIVE+6
^DIR	EN+6, DIV+6, DIV+17, EN3+6, INPAT+6, INPAT+20, INPAT+26
INIT^HLFNC2	EN1+3, EN4+3
IN5^VADPT	ACTIVE+4
$$SITE^VASITE	DIV+8
$$NOW^XLFDT	DIV+8

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: EN+1
Function Call: WRITE	Prompt: !,DGX Line Location: EN+3
Function Call: WRITE	Prompt: ! Line Location: DIV+1
Function Call: WRITE	Prompt: !!,?4,"You have selected: ",$P(DGDIV,"^",2) Line Location: DIV+9
Function Call: WRITE	Prompt: !,?4,"Station Number : ",$S(+DGSTN>0:$P(DGSTN,"^",3),1:"Undefined Station Number"),! Line Location: DIV+10
Function Call: WRITE	Prompt: ! Line Location: DIV+19
Function Call: WRITE	Prompt: !," The data seed process was not tasked " Line Location: DIV+26
Function Call: WRITE	Prompt: !,"The data seed process has been tasked (#",ZTSK,")" Line Location: DIV+27
Function Call: WRITE	Prompt: ! Line Location: DIV+28
Function Call: WRITE	Prompt: @IOF Line Location: EN3+1
Function Call: WRITE	Prompt: !,DGX Line Location: EN3+3
Function Call: WRITE	Prompt: ! Line Location: INPAT+1
Function Call: WRITE	Prompt: !!,?4,"You have selected: ",DGPTNM Line Location: INPAT+12
Function Call: WRITE	Prompt: ! Line Location: INPAT+13
Function Call: WRITE	Prompt: ! Line Location: INPAT+23
Function Call: WRITE	Prompt: ! Line Location: INPAT+28
Function Call: WRITE	Prompt: !!?4,DGPTNM_" is not in an RAI ward." Line Location: ACTIVE+5
Function Call: WRITE	Prompt: !!?4,DGPTNM_" is not an active patient in an RAI ward." Line Location: ACTIVE+6
Function Call: WRITE	Prompt: !!?4,"Sending message..." Line Location: ACTIVE+9
Routine Call	DIR Line Location: EN+6 DIV+6 DIV+17 EN3+6 INPAT+6 INPAT+20 INPAT+26

FileNo	Call Tags
^DPT - [#2]	GET1^DIQ
^DGPM - [#405]	GET1^DIQ
^DIC(42 - [#42]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^DGPM("CN"	EN1+15, EN1+27
^DIC(42 - [#42]	EN1+19
^ORD(101 - [#101]	EN1+2, EN4+2

Name	Line Occurrences
DIV	DIV+11, DIV+18
EN4	INPAT+21
EXIT	ACTIVE+5, ACTIVE+6, ACTIVE+10
INPAT	INPAT+14, INPAT+21, INPAT+27

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DFN	EN1+29, EN1+32, EN1+34, INPAT+2~, ACTIVE+1, ACTIVE+6, ACTIVE+8, EXIT+1!
DGDIV	EN+2~, DIV+7, DIV+8, DIV+9, DIV+21, DIV+23, EN1+24
DGFNM	EN3+2~, INPAT+9*, INPAT+11
DGIEN	EN1+1~, EN1+26, EN1+27, EN1+29, EN1+30, EN1+32, INPAT+2~, EN4+1~, ACTIVE+7*, ACTIVE+8 , EXIT+1!
DGINPT	EN3+2~, INPAT+7*, INPAT+8, INPAT+14, ACTIVE+1, EXIT+1!
DGLNM	EN3+2~, INPAT+10*, INPAT+11
DGMDT	EN1+1~, EN1+30, EN1+32, INPAT+2~, EN4+1~, ACTIVE+7, ACTIVE+8, EXIT+1!
DGPTNM	EN3+2~, INPAT+8, INPAT+9, INPAT+10, INPAT+11, INPAT+12, ACTIVE+5, ACTIVE+6
DGRSIED	EN1+1~, EN1+2, EN4+1~, EN4+2
DGRUGDS	EN1+1~, EN1+12, EN1+15, EN1+18, EN1+27, EN1+35, EN1+37, EN1+38, EN4+1~, ACTIVE+2
DGSEED	EN1+1~, EN1+32, EN4+1~, ACTIVE+8
DGSENM	EN1+1~, EN1+2, EN1+3, EN4+1~, EN4+2, EN4+3
DGSTN	EN+2~, DIV+8*, DIV+10, DIV+11
DGWARD	EN1+1~, EN1+13, EN1+15, EN1+17, EN1+19, EN1+27, EN1+34, EN4+1~
DGWDIV	EN1+1~, EN1+22*, EN1+24, EN4+1~
DGWIEN	EN1+1~, EN1+19, EN1+21, EN1+22, EN1+32, INPAT+2~, EN4+1~, ACTIVE+7, ACTIVE+8, EXIT+1!
DGX	EN+2~, EN+3, EN3+3
DIR	EN+6!, DIV+2~, DIV+6!, DIV+14~, DIV+17!, EN3+6!, INPAT+2~, INPAT+6!, INPAT+17~, INPAT+20! , INPAT+26!
DIR("?"	EN+5, DIV+5, DIV+16, EN3+5, INPAT+5, INPAT+19, INPAT+25*
DIR("A"	EN+4, DIV+4, DIV+15, EN3+4, INPAT+4, INPAT+18, INPAT+24*
DIR("B"	EN+4, DIV+15, EN3+4, INPAT+18, INPAT+24*
DIR(0	EN+4, DIV+3, DIV+15, EN3+4, INPAT+3, INPAT+18, INPAT+24*
DIRUT	EN+7, DIV+2~, DIV+6, EN3+7, INPAT+2~, INPAT+6
DTOUT	DIV+14~, DIV+17, INPAT+17~, INPAT+20, INPAT+26
DUOUT	DIV+14~, DIV+17, INPAT+17~, INPAT+20, INPAT+26
>> HL	EN1+3, EN1+5, EN4+3, EN4+5
>> HL(""	EN1+4, EN4+4
>> HLERR(1	EN1+5, EN4+5
>> I	EN+3, EN3+3
IOF	EN+1, EN3+1
U	EN1+2, EN4+2
VAIP	EXIT+1!
VAIP("D"	ACTIVE+3*
VAIP(1	ACTIVE+7
VAIP(3	ACTIVE+7
VAIP(5	ACTIVE+5, ACTIVE+7
X	DIV+20~, EN1+17, EN1+18, EN1+34, EN1+35, EN1+37, EN1+38
>> Y	EN+7, DIV+6, DIV+7, DIV+18, EN3+7, INPAT+6, INPAT+7, INPAT+21, INPAT+26, INPAT+27
ZTDESC	DIV+20~, DIV+21*
ZTDTH	DIV+20~
ZTIO	DIV+20~, DIV+22*
ZTQUEUED	DIV+20~
ZTREQ	DIV+20~
ZTRTN	DIV+20~, DIV+22*
ZTSAVE	DIV+20~
ZTSAVE("DGDIV"	DIV+24*
ZTSAVE("DGSTN"	DIV+24*
>> ZTSK	DIV+26, DIV+27

Customize PDF page

Package: Registration

Routine: DGRUGDS

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items