Routine: SDWLCU5

Package	Total	Call Graph
VA Fileman	4	(,UPDATE)^DIE IXALL^DIK $$GET1^DIQ ^DIR
Scheduling	3	EDIT^SDWLCU2 C3^SDWLCU3 $$CLIN^SDWLPE
Kernel	1	$$TF^XUAF4
Registration	1	$$SITE^VASITE

Package	Total	Caller Graph
Scheduling	2	SDWLCU1 SDWLCU3

Entry Points

Name	Comments	DBIA/ICR reference
EN	;
CHE3	;
CHK4	;
CHK1	;CHECK FOR INSTITUTION VALIDILITY
CHK10
CHK3	;
UPDINS(SDWLSC,INERROR)	; update 409.32 and the related entroes in 409.3
CHK2	;
GETINS	;Get institution
CH1E
40931
40932
DIS	;display record

External References

Name	Field # of Occurrence
^DIE	UPDINS+21, UPDINS+27, UPDINS+32
UPDATE^DIE	CH1E, CHE3+2, CHK4+5, CHK2+3
IXALL^DIK	40932+3
$$GET1^DIQ	EN+3, EN+4, EN+7, EN+8, 40931+2, 40931+5, 40931+6, UPDINS+1, UPDINS+4, UPDINS+15 , UPDINS+29, CHK1+10, CHK3+11, CHK3+12, DIS+1, DIS+2
^DIR	CHK10, CHK3+13, GETINS+3
EDIT^SDWLCU2	EN+9
C3^SDWLCU3	40931+9
$$CLIN^SDWLPE	UPDINS+5
$$SITE^VASITE	CHK3+6
$$TF^XUAF4	EN+5, 40931+3, CHK3+11

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Checking file 404.51 one last time.",! Line Location: EN+1
Function Call: WRITE	Prompt: !!,"TEAM: ",$$GET1^DIQ(404.51,TEAM_",",.01)," INSTITUTION: " Line Location: EN+7
Function Call: WRITE	Prompt: $$GET1^DIQ(4,INST_",",.01) Line Location: EN+8
Function Call: WRITE	Prompt: !!,"Checking file 409.31 one last time.",! Line Location: EN+12
Function Call: WRITE	Prompt: !!,"SERVICE SPECIALTY: ",$$GET1^DIQ(409.31,SDWLSS_",",.01)," INSTITUTION: " Line Location: 40931+5
Function Call: WRITE	Prompt: $$GET1^DIQ(4,SDWLINS_",",.01) Line Location: 40931+6
Function Call: WRITE	Prompt: !!,"Checking file 409.32 one last time.",! Line Location: 40932+0
Function Call: WRITE	Prompt: !!,"Checking file 409.3 one last time.",! Line Location: 40932+4
Function Call: WRITE	Prompt: !,"Done." Line Location: 40932+11
Function Call: WRITE	Prompt: !!,"Clinic "_CLN_" ("_CL_")"_"does not have the same Institution as EWL set up." Line Location: UPDINS+14
Function Call: WRITE	Prompt: !?5,"Another user is editing this entry. try later." Line Location: UPDINS+20
Function Call: WRITE	Prompt: !?5,"Another user is editing this entry. try later." Line Location: UPDINS+26
Function Call: WRITE	Prompt: !,CNT_" EWL entries for clinic "_CLN_" updated." Line Location: UPDINS+28
Function Call: WRITE	Prompt: !?5,"Another user is editing this entry. try later." Line Location: UPDINS+30
Function Call: WRITE	Prompt: !,"Please select a valid Institution for this record from the following list for",! Line Location: CHK1+7
Function Call: WRITE	Prompt: !,?20,C,". ",$$GET1^DIQ(4,SDWLI_",",.01) Line Location: CHK1+10
Function Call: WRITE	Prompt: ! Line Location: CHK10+0
Function Call: WRITE	Prompt: !,"Response Required." Line Location: CHK10+1
Function Call: WRITE	Prompt: !,?20,C,". ",$$GET1^DIQ(4,SDWLIZ_",",.01) Line Location: CHK3+12
Function Call: WRITE	Prompt: !,"Record#: ",SDWLDA," Patient: ",NAME," (",SSN,")",!! Line Location: DIS+3
Function Call: WRITE	Prompt: *7,"Invalid Entry" Line Location: GETINS+5
Routine Call	DIE Line Location: CH1E CHE3+2 CHK4+5 CHK2+3
Routine Call	DIE Line Location: UPDINS+21 UPDINS+27 UPDINS+32
Routine Call	DIR Line Location: CHK10 CHK3+13 GETINS+3

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DPT - [#2]	GET1^DIQ
^DIC(4 - [#4]	GET1^DIQ
^SCTM(404.51 - [#404.51]	GET1^DIQ
^SDWL(409.3 - [#409.3]	Classic Fileman Calls
^SDWL(409.31 - [#409.31]	GET1^DIQ
^SDWL(409.32 - [#409.32]	Classic Fileman Calls, GET1^DIQ
^SC - [#44]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(4 - [#4]	CHK1+2
^SCTM(404.51 - [#404.51]	EN+2, CHK1+2, CHK2+1
^SCTM(404.57 - [#404.57]	CHK2+1
^SDWL(409.3 - [#409.3]	40932+6, 40932+7, UPDINS+23, UPDINS+24!, UPDINS+26, UPDINS+27, CHK3+2, CHK4+1, CHK2+1, DIS+1
^SDWL(409.31 - [#409.31]	40931, 40931+1, 40931+8, CHK3+3, CHK3+4, CHK3+5, CHK3+10
^SDWL(409.32 - [#409.32]	40932+1, UPDINS+20, UPDINS+21, UPDINS+30, UPDINS+32, CHK4+2, CHK4+3, CHK4+5
^TMP($J	40932+10!, CHK1+2, CHK1+3, CHK1+4!, CHK1+6, CHK1+9, CHK1+10, CHK10+2, CHK3+5, CHK3+7 , CHK3+15

Label References

Name	Line Occurrences
@(	40932+10
CH1E	CHK1+5, CHK1+6
CHE3	CHK3+6, CHK3+7, CHK3+16
CHK3	CHE3+1
DIS	CHK1+8, CHK3+9, CHK4+4
GETINS	40931+7, GETINS+5
UPDINS	40932+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> C	40932+10, CHK1+2, CHK1+5, CHK1+6, CHK1+9, CHK1+10, CHK3+5, CHK3+6, CHK3+7, CHK3+10* , CHK3+12*, CHK3+13
CL	UPDINS+4~*, UPDINS+5, UPDINS+9, UPDINS+14, UPDINS+23, UPDINS+24
CLN	UPDINS+4~*, UPDINS+9, UPDINS+14, UPDINS+28, UPDINS+33
CNT	UPDINS+23~, UPDINS+27, UPDINS+28
>> CODE	EN+4, EN+6, 40931+2, 40931+4
>> CS	CHK1+10*, CHK10
DA	UPDINS+19~, UPDINS+20, UPDINS+21, UPDINS+23~, UPDINS+25, UPDINS+29~, UPDINS+30*
DIE	UPDINS+19~, UPDINS+25, UPDINS+31*
DIK	40932+3~*
DIR	GETINS+1~
DIR("A"	GETINS+2*
DIR("S"	GETINS+3*
DIR(0	CHK10, CHK3+13, GETINS+3*
DR	UPDINS+19~, UPDINS+23~, UPDINS+25, UPDINS+31*
>> DUOUT	CHK10+1, CHK3+14
DUZ(2	CHK1+5
>> INCK	EN+5, EN+6, 40931+3, 40931+4
INERROR	40932+1~, 40932+2, UPDINS~, UPDINS+13
>> INST	EN+3*, EN+4, EN+5, EN+8
>> NAME	DIS+1*, DIS+3
>> NN	DIS+1*, DIS+2
SCL	UPDINS+23~*, UPDINS+24, UPDINS+25, UPDINS+26, UPDINS+27
>> SDWLDA	40932+6*, 40932+7, CH1E, CHK3+2, CHE3+2, CHK4+1, CHK4+5, CHK2+1, CHK2+3, DIS+1 , DIS+3
>> SDWLERR	EN+2, EN+10, 40931, 40931+1, 40931+7, 40931+8, 40931+10, 40932+5, 40932+6, CHK1+1* , CHK10+1, CHK3+1, CHK3+4, CHK3+14, GETINS+4
>> SDWLI	40932+9, CHK1+2, CHK1+9, CHK1+10, CHK3+2, CHK3+3, CHK3+4, CHK3+5, CHK3+10, CHK4+1 , CHK4+2, CHK4+3, CHK4+5
SDWLINS	40931+1, 40931+2, 40931+3, 40931+6, 40931+8, UPDINS+1~, UPDINS+14, UPDINS+15
SDWLINS(	CH1E, CHE3+2, CHK4+5, CHK2+3
>> SDWLINSN	CHK1+5, CHK1+6, CHK10+2, CH1E, CHK3+6, CHK3+7, CHK3+15, CHE3+2, CHK4+5, CHK2+1 , CHK2+2, CHK2+3, GETINS+6*
>> SDWLINST	40932+7*, 40932+8, CHK1+3, CHK3+4, CHK4+3, CHK2+2
>> SDWLIX	CHK3+5*
>> SDWLIZ	CHK3+10*, CHK3+11, CHK3+12
>> SDWLPO	CHK2+1*
SDWLSC	40932+1*, UPDINS~, UPDINS+1, UPDINS+4, UPDINS+19, UPDINS+29, UPDINS+30, UPDINS+32
>> SDWLSS	40931*, 40931+1, 40931+5, 40931+8
>> SDWLSSX	40931+8*
>> SDWLTM	CHK2+1*
>> SDWLTY	40932+7*, 40932+8, 40932+9, 40932+10, CHK1+2
SDWMES	UPDINS+5~, UPDINS+6, UPDINS+7*, UPDINS+8, UPDINS+10
SITE	CHK3+6~*
>> SSN	DIS+2*, DIS+3
STR	UPDINS+5~*, UPDINS+6, UPDINS+7, UPDINS+14, UPDINS+16
>> TAG	40932+6, 40932+10, CH1E+1, CHE3+3, CHK2+4*
>> TEAM	EN+2*, EN+3, EN+7
U	UPDINS+6, UPDINS+7, UPDINS+16, CHK3+2, CHK4+1, CHK4+3, CHK4+5, CHK2+1
>> X	40932+7*, 40932+9, GETINS+4
>> Y	CHK10+1, CHK10+2, CHK3+6, CHK3+7, CHK3+14, CHK3+15, CHE3+1, GETINS+5, GETINS+6

Customize PDF page

Package: Scheduling

Routine: SDWLCU5

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: