Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: SDESCLINICSET2

Package: Scheduling

Routine: SDESCLINICSET2


Information

SDESCLINICSET2 ;ALB/TAW/MGD/RRM/MGD - CLINIC CREATE AND UPDATE ;July 10, 2023

Source Information

Source file <SDESCLINICSET2.m>

Call Graph

Call Graph

Call Graph Total: 8

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  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Scheduling 1 SDESCLINICSET  

Entry Points

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

External References

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

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

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

Label References

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
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All