Routine: SDESCLINICSET2

Package	Total	Call Graph
Scheduling	4	ERRLOG^SDESCLINICSET ($$GETDIAGSTAT,DELDIAGNOSIS)^SDESINPUTVALUTL UPDPRIV^SDESLOC ADDHASH2CLIN^SDESRTVCLN2
VA FileMan	2	UPDATE^DIE ($$GET1,GETS)^DIQ
DRG Grouper	1	$$CODEN^ICDEX
Kernel	1	$$NOW^XLFDT

Package	Total	Caller Graph
Scheduling	1	SDESCLINICSET

Name	Comments	DBIA/ICR reference
GETDEFAULT(INDEX,SDIEN)	;Get the IEN of the disposition or provider flagged as default
CHECKYN(VAR)	;
LETTERIEN(LETTER,NAME)	;Look up the letter IEN
SAVE(POP,SDIEN,FDA,SDCLINIC,PROVIDER,DIAGNOSIS,SPECIALINSTRUCT,PRIVLIAGEDUSER)	;
PROVIDER	;Upodate the Provider multiple in field 44.1
DIAGNOSIS	;Diagnosis multiple in field 44.11
INSTRUCTION
PRIVUSERS(SDIEN,PRIVLIAGEDUSER)	;Privileged user multiple 44.04
VALIDATEPROV(SDPROVIDER,PROVIDER,IEN)	;
SETPROV	;
VALIDATEDIAG(SDDIAG,DIAGNOSIS,IEN)	;
SETDIAG	;
VALIDATEPPRIVUSR(SDNOACCESS,PRIVLIAGEDUSER)	;
VALIDATESI(SDSPECINSTRU,SPECIALINSTRUCT)	;
YNTOBOOL(VAR)	;convert a Y/N input param to 1 or 0
SDRES(SDCL)	;add clinic resource

Name	Field # of Occurrence
UPDATE^DIE	SAVE+3, PROVIDER+14, DIAGNOSIS+17, INSTRUCTION+12, SDRES+17
$$GET1^DIQ	GETDEFAULT+7, GETDEFAULT+10, LETTERIEN+4, VALIDATEDIAG+15
GETS^DIQ	SDRES+9
$$CODEN^ICDEX	VALIDATEDIAG+19
ERRLOG^SDESCLINICSET	LETTERIEN+6, SAVE+2, SAVE+5, VALIDATEPROV+8, VALIDATEPROV+16, VALIDATEPROV+19, VALIDATEPROV+20, VALIDATEPROV+24, VALIDATEDIAG+8, VALIDATEDIAG+16 , VALIDATEDIAG+20, VALIDATEDIAG+21, VALIDATEDIAG+24, VALIDATEDIAG+25, VALIDATEDIAG+29, VALIDATEPPRIVUSR+15, VALIDATESI+7, VALIDATESI+9
$$GETDIAGSTAT^SDESINPUTVALUTL	VALIDATEDIAG+16, VALIDATEDIAG+21
DELDIAGNOSIS^SDESINPUTVALUTL	DIAGNOSIS+4
UPDPRIV^SDESLOC	PRIVUSERS+7
ADDHASH2CLIN^SDESRTVCLN2	SAVE+9
$$NOW^XLFDT	SDRES+15

FileNo	Call Tags
^VA(407.5 - [#407.5]	GET1^DIQ
^SC - [#44]	GETS^DIQ
44.1	GET1^DIQ
44.11	GET1^DIQ
^ICD9 - [#80]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^SC - [#44]	GETDEFAULT+4, PROVIDER+8, DIAGNOSIS+11, INSTRUCTION+8
^SDEC(409.831 - [#409.831]	SDRES+3, SDRES+4
^VA(200 - [#200]	VALIDATEPROV+14, VALIDATEPROV+15, VALIDATEPPRIVUSR+13, VALIDATEPPRIVUSR+14
^VA(407.5 - [#407.5]	LETTERIEN+5

Name	Line Occurrences
$$GETDEFAULT	VALIDATEPROV+3, VALIDATEDIAG+3
DIAGNOSIS	SAVE+14
INSTRUCTION	SAVE+15
PRIVUSERS	SAVE+16
PROVIDER	SAVE+13
SDRES	SAVE+11
SETDIAG	VALIDATEDIAG+17, VALIDATEDIAG+22
SETPROV	VALIDATEPROV+14, VALIDATEPROV+17

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ABBR	SDRES+1~, SDRES+12*
ACTION	PROVIDER+1~, PROVIDER+6, PROVIDER+10, PROVIDER+11, PROVIDER+13, DIAGNOSIS+1~, DIAGNOSIS+9, DIAGNOSIS+13, DIAGNOSIS+14, DIAGNOSIS+16 , INSTRUCTION+6, INSTRUCTION+10, INSTRUCTION+11, VALIDATEPROV+1~, VALIDATEPROV+7, VALIDATEPROV+8, VALIDATEPROV+12, VALIDATEPROV+13, SETPROV+1, SETPROV+2 , SETPROV+3, VALIDATEDIAG+1~, VALIDATEDIAG+7, VALIDATEDIAG+8, VALIDATEDIAG+12, VALIDATEDIAG+13, SETDIAG+1, SETDIAG+2, SETDIAG+3, VALIDATEPPRIVUSR+1~ , VALIDATEPPRIVUSR+7, VALIDATEPPRIVUSR+10, VALIDATEPPRIVUSR+12, VALIDATEPPRIVUSR+13, VALIDATEPPRIVUSR+16, VALIDATESI+1~, VALIDATESI+6, VALIDATESI+7, VALIDATESI+11, VALIDATESI+12
ADDFLAG	PRIVUSERS+1~, PRIVUSERS+6*, PRIVUSERS+7
CLINMSG	SAVE+1~, SAVE+4
CLINMSG("DIERR"	SAVE+5
CLINRET	SAVE+1~
CLINRET(1	SAVE+7, SAVE+18
DATA	INSTRUCTION+1~
DEFAULT	VALIDATEPROV+1~, VALIDATEPROV+3, VALIDATEPROV+22, VALIDATEPROV+24, VALIDATEDIAG+1~, VALIDATEDIAG+3, VALIDATEDIAG+27, VALIDATEDIAG+29
DEFAULTCNT	VALIDATEPROV+1~, VALIDATEPROV+2, VALIDATEPROV+19, SETPROV+2, VALIDATEDIAG+1~, VALIDATEDIAG+2, VALIDATEDIAG+24, SETDIAG+2
DEFAULTCNT2	VALIDATEPROV+1~, VALIDATEPROV+2, VALIDATEPROV+20, SETPROV+3, VALIDATEDIAG+1~, VALIDATEDIAG+2, VALIDATEDIAG+25, SETDIAG+3
DEFAULTNEW	VALIDATEPROV+1~, VALIDATEPROV+2, VALIDATEPROV+22, SETPROV+2, VALIDATEDIAG+1~, VALIDATEDIAG+2, VALIDATEDIAG+27, SETDIAG+2
DEFAULTREMOVE	VALIDATEPROV+1~, VALIDATEPROV+2, VALIDATEPROV+24, SETPROV+3, VALIDATEDIAG+1~, VALIDATEDIAG+2, VALIDATEDIAG+29, SETDIAG+3
DIAG	VALIDATEDIAG+1~, VALIDATEDIAG+9, VALIDATEDIAG+15, VALIDATEDIAG+16, VALIDATEDIAG+19, VALIDATEDIAG+20, VALIDATEDIAG+21, SETDIAG+1, SETDIAG+2, SETDIAG+3
DIAG44IEN	DIAGNOSIS+1~, DIAGNOSIS+11, DIAGNOSIS+12, DIAGNOSIS+13, DIAGNOSIS+14, DIAGNOSIS+15, DIAGNOSIS+16
DIAGDATA	VALIDATEDIAG+1~, VALIDATEDIAG+5*, VALIDATEDIAG+6, VALIDATEDIAG+7, VALIDATEDIAG+9
DIAGIEN	DIAGNOSIS+1~, DIAGNOSIS+7, DIAGNOSIS+8, DIAGNOSIS+9, DIAGNOSIS+11, DIAGNOSIS+15
DIAGNOSIS	SAVE~, SAVE+14, VALIDATEDIAG~
DIAGNOSIS(	DIAGNOSIS+6, DIAGNOSIS+8, DIAGNOSIS+9, SETDIAG+1*
DUZ	SDRES+16
ELGRETURN	PRIVUSERS+1~, PRIVUSERS+2*, PRIVUSERS+7
FDA	SAVE~
FDA(44	SAVE+2
I	VALIDATEPROV+1~, VALIDATEPROV+4, VALIDATEPROV+5, VALIDATEDIAG+1~, VALIDATEDIAG+4, VALIDATEDIAG+5, VALIDATEPPRIVUSR+1~, VALIDATEPPRIVUSR+5, VALIDATEPPRIVUSR+6, VALIDATESI+1~ , VALIDATESI+3, VALIDATESI+4
IEN	SAVE+1~, SAVE+7*, SAVE+9, SAVE+11, SAVE+16, SAVE+18, SAVE+19, PROVIDER+8, PROVIDER+11, PROVIDER+12 , PROVIDER+13, DIAGNOSIS+11, DIAGNOSIS+14, DIAGNOSIS+15, DIAGNOSIS+16, INSTRUCTION+8, INSTRUCTION+11, VALIDATEPROV~, VALIDATEPROV+3, VALIDATEDIAG~ , VALIDATEDIAG+3
INDEX	GETDEFAULT~, GETDEFAULT+4, GETDEFAULT+5, GETDEFAULT+8
INSTRUCTION	INSTRUCTION+4, INSTRUCTION+5, INSTRUCTION+6, INSTRUCTION+7, INSTRUCTION+8, INSTRUCTION+11, VALIDATESI+1~, VALIDATESI+4, VALIDATESI+5, VALIDATESI+6 , VALIDATESI+8, VALIDATESI+9, VALIDATESI+12
KEY	GETDEFAULT+1~, GETDEFAULT+4, GETDEFAULT+5, GETDEFAULT+6, GETDEFAULT+8, GETDEFAULT+9, PROVIDER+1~, PROVIDER+2, PROVIDER+3, PROVIDER+5 , PROVIDER+6, DIAGNOSIS+1~, DIAGNOSIS+5, DIAGNOSIS+6, DIAGNOSIS+8, DIAGNOSIS+9, INSTRUCTION+1~, INSTRUCTION+2, INSTRUCTION+3, INSTRUCTION+5 , INSTRUCTION+6, PRIVUSERS+1~, PRIVUSERS+2, PRIVUSERS+3, PRIVUSERS+5, PRIVUSERS+6, VALIDATEPROV+1~, VALIDATEPROV+11, VALIDATEPROV+12, VALIDATEPROV+13 , SETPROV+1, VALIDATEDIAG+1~, VALIDATEDIAG+11, VALIDATEDIAG+12, VALIDATEDIAG+13, SETDIAG+1, VALIDATEPPRIVUSR+1~, VALIDATEPPRIVUSR+11, VALIDATEPPRIVUSR+12, VALIDATEPPRIVUSR+13 , VALIDATEPPRIVUSR+16, VALIDATESI+1~, VALIDATESI+10, VALIDATESI+11*, VALIDATESI+12
LETTER	LETTERIEN~, LETTERIEN+2, LETTERIEN+4, LETTERIEN+5*, LETTERIEN+6, LETTERIEN+7
MAXCHAR	VALIDATESI+1~, VALIDATESI+2*, VALIDATESI+9
MI	SAVE+1~, SAVE+5*
NAME	LETTERIEN~, LETTERIEN+6
POP	SAVE~
PRIVLIAGEDUSER	SAVE~, SAVE+16, PRIVUSERS~, VALIDATEPPRIVUSR~
PRIVLIAGEDUSER(	PRIVUSERS+3, PRIVUSERS+5, VALIDATEPPRIVUSR+13, VALIDATEPPRIVUSR+16
PRIVUSER	PRIVUSERS+1~, PRIVUSERS+4, PRIVUSERS+5, PRIVUSERS+7, VALIDATEPPRIVUSR+1~, VALIDATEPPRIVUSR+6, VALIDATEPPRIVUSR+7, VALIDATEPPRIVUSR+8, VALIDATEPPRIVUSR+9, VALIDATEPPRIVUSR+13 , VALIDATEPPRIVUSR+14*, VALIDATEPPRIVUSR+15, VALIDATEPPRIVUSR+16
PROV	VALIDATEPROV+1~, VALIDATEPROV+9, VALIDATEPROV+14, VALIDATEPROV+15, VALIDATEPROV+16, SETPROV+1, SETPROV+2, SETPROV+3
PROV44IEN	PROVIDER+1~, PROVIDER+8, PROVIDER+9, PROVIDER+10, PROVIDER+11, PROVIDER+12, PROVIDER+13
PROVDATA	VALIDATEPROV+1~, VALIDATEPROV+5*, VALIDATEPROV+6, VALIDATEPROV+7, VALIDATEPROV+9
PROVIDER	SAVE~, SAVE+13, VALIDATEPROV~
PROVIDER(	PROVIDER+3, PROVIDER+5, PROVIDER+6, SETPROV+1*
PROVIEN	PROVIDER+1~, PROVIDER+4, PROVIDER+5, PROVIDER+6, PROVIDER+8, PROVIDER+12
RETURN	GETDEFAULT+1~, GETDEFAULT+2, GETDEFAULT+7, GETDEFAULT+10*, GETDEFAULT+11, LETTERIEN+1~
SDCL	SDRES~, SDRES+3, SDRES+6, SDRES+9, SDRES+10, SDRES+11, SDRES+12, SDRES+13, SDRES+14
SDCLINIC	SAVE~
SDCLINIC("ClinicCreate"	SAVE+18*
SDCLINIC("ClinicUpdate"	SAVE+19*
SDDATA	SDRES+1~
SDDATA(44	SDRES+10, SDRES+11, SDRES+12
SDDI	SDRES+1~, SDRES+11*
SDDIAG	VALIDATEDIAG~, VALIDATEDIAG+4, VALIDATEDIAG+5
SDFDA	PROVIDER+1~, PROVIDER+14!, DIAGNOSIS+1~, DIAGNOSIS+17!, INSTRUCTION+1~, INSTRUCTION+12!, SDRES+1~
SDFDA(	PROVIDER+11, PROVIDER+12, PROVIDER+13, DIAGNOSIS+14, DIAGNOSIS+15, DIAGNOSIS+16, INSTRUCTION+11, SDRES+10, SDRES+11, SDRES+12 , SDRES+13, SDRES+14, SDRES+15, SDRES+16
SDFIELDS	SDRES+1~, SDRES+8*, SDRES+9
SDFOUND	SDRES+1~, SDRES+2, SDRES+3, SDRES+6, SDRES+7
SDI	SDRES+1~, SDRES+3, SDRES+4, SDRES+7, SDRES+10, SDRES+11, SDRES+12, SDRES+13, SDRES+14, SDRES+15 , SDRES+16
SDIEN	GETDEFAULT~, GETDEFAULT+3, GETDEFAULT+4, GETDEFAULT+6, GETDEFAULT+9, SAVE~, SAVE+7, DIAGNOSIS+4, PRIVUSERS~, PRIVUSERS+7
SDIENS	GETDEFAULT+1~, GETDEFAULT+6, GETDEFAULT+7, GETDEFAULT+9, GETDEFAULT+10
SDNOACCESS	VALIDATEPPRIVUSR~, VALIDATEPPRIVUSR+2, VALIDATEPPRIVUSR+3, VALIDATEPPRIVUSR+4, VALIDATEPPRIVUSR+5, VALIDATEPPRIVUSR+6, VALIDATEPPRIVUSR+17*
SDNOD	SDRES+1~, SDRES+4*, SDRES+5
SDPROVIDER	VALIDATEPROV~, VALIDATEPROV+4, VALIDATEPROV+5
SDRT	SDRES+1~, SDRES+5*, SDRES+6
SDSPECINSTRU	VALIDATESI~, VALIDATESI+3, VALIDATESI+4, VALIDATESI+13*
SIIEN	INSTRUCTION+1~, INSTRUCTION+6, INSTRUCTION+7, INSTRUCTION+8, INSTRUCTION+9, INSTRUCTION+10, INSTRUCTION+11
SPECIALINSTRUCT	SAVE~, SAVE+15, VALIDATESI~
SPECIALINSTRUCT(	INSTRUCTION+3, INSTRUCTION+5, INSTRUCTION+6, VALIDATESI+12*
U	SDRES+5
VAR	CHECKYN~, CHECKYN+1, YNTOBOOL~, YNTOBOOL+1

Customize PDF page

Package: Scheduling

Routine: SDESCLINICSET2

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 1

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: