SDES2VAL44A ;ALB/BWF/MGD,TJB,JAS - SDES2 Clinic validation utilities ;NOV 05, 2024
Source file <SDES2VAL44A.m>
| Package | Total | Call Graph |
|---|---|---|
| Scheduling | 3 | ERRLOG^SDES2JSON (VALPROVIDER,VALUSERDUZ)^SDES2VAL200 VALBOOLEAN^SDES2VALUTIL |
| VA FileMan | 2 | (FILE,UPDATE)^DIE $$GET1^DIQ |
| DRG Grouper | 1 | ($$CODEN,$$STATCHK)^ICDEX |
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| VALPROVIDERS(ERRORS,SDCLINIC,FDATA,CLINICIEN) | ;
|
|
| VALDIAG(ERRORS,SDCLINIC,FDATA,CLINICIEN) | ;
|
|
| VALSPECINSTRUCT(ERRORS,SPECINST,FDATA,SDIEN) | ;
|
|
| VALPRIVUSERS(ERRORS,PRIVUSERS,FDATA,CLINICIEN) | ;
|
|
| VALCLINICHASH(ERRORS,CLINIEN,INPUTHASH) | ||
| VALVETSLFCAN(SDERRORS,SDCLINIC,FDATA) | ; Check for "VETERAN SELF-CANCEL" value required
|
|
| VALSUBSPEC(SDERRORS,SDCLINIC,FDATA) | ; Validate Subspecialty input array
|
|
| ADDSUBSPEC(SSNEWSUB,SSID,SSNAME,SSTIER,SSPARENT) | ; Add new entry to the SDEC SUBSPECIALTY (#409.94) file
|
|
| EDITSUBSPEC(SSIDDA,SSID,SSNAME,SSTIER,SSPARENT) | ; Edit an entry in the SDEC SUBSPECIALTY (#409.94) file
|
| Name | Field # of Occurrence |
|---|---|
| FILE^DIE | EDITSUBSPEC+8 |
| UPDATE^DIE | ADDSUBSPEC+8 |
| $$GET1^DIQ | VALCLINICHASH+2, VALVETSLFCAN+9, VALSUBSPEC+16 |
| $$CODEN^ICDEX | VALDIAG+4 |
| $$STATCHK^ICDEX | VALDIAG+7 |
| ERRLOG^SDES2JSON | VALPROVIDERS+6, VALDIAG+5, VALDIAG+8, VALDIAG+10, VALSPECINSTRUCT+7, VALSPECINSTRUCT+9, VALCLINICHASH+2, VALVETSLFCAN+5, VALVETSLFCAN+13, VALSUBSPEC+7 , VALSUBSPEC+8, VALSUBSPEC+9, VALSUBSPEC+12, VALSUBSPEC+13, VALSUBSPEC+14, VALSUBSPEC+16 |
| VALPROVIDER^SDES2VAL200 | VALPROVIDERS+4 |
| VALUSERDUZ^SDES2VAL200 | VALPRIVUSERS+4 |
| VALBOOLEAN^SDES2VALUTIL | VALVETSLFCAN+6, VALVETSLFCAN+10 |
| FileNo | Call Tags |
|---|---|
| ^SDEC(409.94 - [#409.94] | GET1^DIQ |
| ^SC - [#44] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^SC - [#44] | VALPROVIDERS+3, VALDIAG+6, VALSPECINSTRUCT+7, VALPRIVUSERS+3 |
| ^SDEC(409.94 - [#409.94] | VALSUBSPEC+13, VALSUBSPEC+15, VALSUBSPEC+18, ADDSUBSPEC+3, EDITSUBSPEC+3 |
| Name | Line Occurrences |
|---|---|
| ADDSUBSPEC | VALSUBSPEC+20 |
| EDITSUBSPEC | VALSUBSPEC+19 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CLINICIEN | VALPROVIDERS~, VALPROVIDERS+3, VALDIAG~, VALDIAG+6, VALPRIVUSERS~, VALPRIVUSERS+3, VALVETSLFCAN+1~, VALVETSLFCAN+2*, VALVETSLFCAN+4, VALVETSLFCAN+8 , VALVETSLFCAN+9 |
| CLINIEN | VALCLINICHASH~, VALCLINICHASH+2 |
| DEFCNT | VALPROVIDERS+1~, VALPROVIDERS+2*, VALPROVIDERS+5*, VALPROVIDERS+6 |
| DEFDIAGCNT | VALDIAG+1~, VALDIAG+2*, VALDIAG+9*, VALDIAG+10 |
| DIAGCODE | VALDIAG+1~, VALDIAG+3*, VALDIAG+4, VALDIAG+5, VALDIAG+6, VALDIAG+7, VALDIAG+8, VALDIAG+9 |
| DIAGIEN | VALDIAG+1~, VALDIAG+4*, VALDIAG+5, VALDIAG+6 |
| DIAGSTAT | VALDIAG+1~, VALDIAG+7*, VALDIAG+8 |
| ERRORS | VALPROVIDERS~, VALPROVIDERS+4, VALPROVIDERS+6, VALDIAG~, VALDIAG+5, VALDIAG+8, VALDIAG+10, VALSPECINSTRUCT~, VALSPECINSTRUCT+7, VALSPECINSTRUCT+9 , VALPRIVUSERS~, VALPRIVUSERS+4, VALCLINICHASH~, VALCLINICHASH+2, VALVETSLFCAN+10 |
| FDATA | VALPROVIDERS~, VALDIAG~, VALSPECINSTRUCT~, VALPRIVUSERS~, VALVETSLFCAN~, VALSUBSPEC~ |
| FDATA("DIAGNOSIS" | VALDIAG+11* |
| FDATA("PRIVIL | EGED USER" , VALPRIVUSERS+5* |
| FDATA("PROVIDER" | VALPROVIDERS+7* |
| FDATA("SPECIA | L INSTRUCTIONS" , VALSPECINSTRUCT+10* |
| FDATA("SUBSPECIALTY" | VALSUBSPEC+21* |
| FDATA("VETERA | N SELF-CANCEL" , VALVETSLFCAN+7*, VALVETSLFCAN+11*, VALVETSLFCAN+12* |
| INPUTHASH | VALCLINICHASH~, VALCLINICHASH+1, VALCLINICHASH+2 |
| INSDATA | VALSPECINSTRUCT+1~, VALSPECINSTRUCT+3*, VALSPECINSTRUCT+4, VALSPECINSTRUCT+5 |
| INSIEN | VALSPECINSTRUCT+1~, VALSPECINSTRUCT+4*, VALSPECINSTRUCT+7 |
| INSTEXT | VALSPECINSTRUCT+1~, VALSPECINSTRUCT+5*, VALSPECINSTRUCT+6*, VALSPECINSTRUCT+8, VALSPECINSTRUCT+9 |
| INSTRUCT | VALSPECINSTRUCT+1~, VALSPECINSTRUCT+2*, VALSPECINSTRUCT+3 |
| NEWDIAGIEN | VALDIAG+1~ |
| PARENTIEN | VALSUBSPEC+1~, VALSUBSPEC+15*, VALSUBSPEC+16 |
| PRIVUSERS | VALPRIVUSERS~ |
| PRIVUSERS("PR | IVILEGED USER" , VALPRIVUSERS+2, VALPRIVUSERS+3, VALPRIVUSERS+5 |
| PROVERRORS | VALPROVIDERS+1~ |
| PROVIEN | VALPROVIDERS+1~, VALPROVIDERS+2*, VALPROVIDERS+3, VALPROVIDERS+4, VALPROVIDERS+5 |
| PUSER | VALPRIVUSERS+1~, VALPRIVUSERS+2*, VALPRIVUSERS+3, VALPRIVUSERS+4 |
| SDCLINIC | VALPROVIDERS~, VALDIAG~, VALVETSLFCAN~, VALSUBSPEC~ |
| SDCLINIC("CLI | NIC IEN" , VALVETSLFCAN+2 |
| SDCLINIC("DIAGNOSIS" | VALDIAG+3, VALDIAG+6, VALDIAG+9, VALDIAG+11 |
| SDCLINIC("PROVIDER" | VALPROVIDERS+2, VALPROVIDERS+3, VALPROVIDERS+5, VALPROVIDERS+7 |
| SDCLINIC("SUBSPECIALTY" | VALSUBSPEC+3, VALSUBSPEC+5, VALSUBSPEC+6 |
| SDCLINIC("VET | ERAN SELF-CANCEL" , VALVETSLFCAN+3 |
| SDERRORS | VALVETSLFCAN~, VALVETSLFCAN+5, VALVETSLFCAN+6, VALVETSLFCAN+10*, VALVETSLFCAN+13, VALSUBSPEC~, VALSUBSPEC+3, VALSUBSPEC+7, VALSUBSPEC+8, VALSUBSPEC+9 , VALSUBSPEC+11, VALSUBSPEC+12, VALSUBSPEC+13, VALSUBSPEC+14, VALSUBSPEC+16 |
| SDIEN | VALSPECINSTRUCT~, VALSPECINSTRUCT+7 |
| SDVETSCAN | VALVETSLFCAN+1~, VALVETSLFCAN+9*, VALVETSLFCAN+11, VALVETSLFCAN+13 |
| SPECINST | VALSPECINSTRUCT~ |
| SPECINST("SPE | CIAL INSTRUCTIONS" , VALSPECINSTRUCT+2, VALSPECINSTRUCT+3, VALSPECINSTRUCT+10 |
| SSCOUNT | VALSUBSPEC+1~, VALSUBSPEC+2*, VALSUBSPEC+3*, VALSUBSPEC+5, VALSUBSPEC+6, VALSUBSPEC+21 |
| SSFDA | ADDSUBSPEC+1~, ADDSUBSPEC+8!, EDITSUBSPEC+1~, EDITSUBSPEC+8! |
| SSFDA( | ADDSUBSPEC+4*, ADDSUBSPEC+5*, ADDSUBSPEC+6*, ADDSUBSPEC+7*, EDITSUBSPEC+4*, EDITSUBSPEC+5*, EDITSUBSPEC+6*, EDITSUBSPEC+7* |
| SSID | VALSUBSPEC+1~, VALSUBSPEC+5*, VALSUBSPEC+7, VALSUBSPEC+12, VALSUBSPEC+18, VALSUBSPEC+19, VALSUBSPEC+20, ADDSUBSPEC~, ADDSUBSPEC+4, EDITSUBSPEC~ , EDITSUBSPEC+4 |
| SSIDDA | VALSUBSPEC+1~, VALSUBSPEC+18*, VALSUBSPEC+19, VALSUBSPEC+20*, VALSUBSPEC+21, EDITSUBSPEC~, EDITSUBSPEC+4, EDITSUBSPEC+5, EDITSUBSPEC+6, EDITSUBSPEC+7 |
| SSNAME | VALSUBSPEC+1~, VALSUBSPEC+5*, VALSUBSPEC+8, VALSUBSPEC+19, VALSUBSPEC+20, ADDSUBSPEC~, ADDSUBSPEC+5, EDITSUBSPEC~, EDITSUBSPEC+5 |
| SSNEWSUB | VALSUBSPEC+1~, VALSUBSPEC+4!, VALSUBSPEC+20, ADDSUBSPEC~ |
| SSNEWSUB(1 | VALSUBSPEC+20 |
| SSPARENT | VALSUBSPEC+1~, VALSUBSPEC+6*, VALSUBSPEC+10, VALSUBSPEC+11, VALSUBSPEC+12, VALSUBSPEC+13, VALSUBSPEC+15, VALSUBSPEC+19, VALSUBSPEC+20, ADDSUBSPEC~ , ADDSUBSPEC+3, EDITSUBSPEC~, EDITSUBSPEC+3 |
| SSPARIEN | ADDSUBSPEC+1~, ADDSUBSPEC+2*, ADDSUBSPEC+3*, ADDSUBSPEC+7, EDITSUBSPEC+1~, EDITSUBSPEC+2*, EDITSUBSPEC+3*, EDITSUBSPEC+7 |
| SSTIER | VALSUBSPEC+1~, VALSUBSPEC+6*, VALSUBSPEC+9, VALSUBSPEC+10*, VALSUBSPEC+14, VALSUBSPEC+19, VALSUBSPEC+20, VALSUBSPEC+21, ADDSUBSPEC~, ADDSUBSPEC+6 , EDITSUBSPEC~, EDITSUBSPEC+6 |
| VETSCAN | VALVETSLFCAN+1~, VALVETSLFCAN+3*, VALVETSLFCAN+5, VALVETSLFCAN+6, VALVETSLFCAN+10, VALVETSLFCAN+11, VALVETSLFCAN+12, VALVETSLFCAN+13 |
| VRES | VALVETSLFCAN+1~, VALVETSLFCAN+6, VALVETSLFCAN+10 |
| VRES(44 | VALVETSLFCAN+7, VALVETSLFCAN+12 |