SDES2CREATECLIN ;ALB/MGD/BLB,BWF,TJB,JAS,TJB,MGD,JDJ/JAS - SDES2 CREATE CLINIC MAIN DRIVER ;JAN 12, 2026
Source file <SDES2CREATECLIN.m>
| Package | Total | Call Graph |
|---|---|---|
| Scheduling | 5 | (ADDHASH2CLIN,ADDRESOURCE,SAVEDIAG,SAVEINSTRUCT,SAVEPRIVUSERS,SAVEPROVIDERS,SAVESUBSPEC)^SDES2CLINUT (BUILDJSON,ERRLOG)^SDES2JSON (CHECKFORDEL,CHECKFORDELMULT)^SDES2UTIL VALCONTEXT^SDES2VALCONTEXT VALCLINIC^SDES2VALCRTCLIN1 |
| VA FileMan | 2 | $$FIND1^DIC UPDATE^DIE |
| Kernel | 1 | DUZ^XUP |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CREATECLINIC(SDRETURN,SDCONTEXT,SDCLINIC) | ; Add a new clinic to the HOSPITAL LOCATION file (#44)
|
|
| CREATEFDAARRAY(FILEDATA,SDFDA) | ;
; SDCONTEXT Data |
|
| FILECLINIC(SDERRORS,SDFILEDATA,SDCLINICIEN) | ;
|
|
| ADDMULTIPLES(SDERRORS,SDFILEDATA,SDCLINICIEN) | ; Add multiple fields after Clinic creation
|
|
| ERRLOG(ERNUM,OPTIONALTXT) | ;
|
| Name | Field # of Occurrence |
|---|---|
| $$FIND1^DIC | CREATEFDAARRAY+19 |
| UPDATE^DIE | FILECLINIC+2 |
| ADDHASH2CLIN^SDES2CLINUT | CREATECLINIC+33 |
| ADDRESOURCE^SDES2CLINUT | CREATECLINIC+35 |
| SAVEDIAG^SDES2CLINUT | ADDMULTIPLES+2 |
| SAVEINSTRUCT^SDES2CLINUT | ADDMULTIPLES+4 |
| SAVEPRIVUSERS^SDES2CLINUT | ADDMULTIPLES+3 |
| SAVEPROVIDERS^SDES2CLINUT | ADDMULTIPLES+1 |
| SAVESUBSPEC^SDES2CLINUT | ADDMULTIPLES+5 |
| BUILDJSON^SDES2JSON | CREATECLINIC+7, CREATECLINIC+13, CREATECLINIC+16, CREATECLINIC+19, CREATECLINIC+22, CREATECLINIC+27, CREATECLINIC+38 |
| ERRLOG^SDES2JSON | FILECLINIC+4, ERRLOG+1 |
| CHECKFORDEL^SDES2UTIL | CREATECLINIC+12, CREATECLINIC+15 |
| CHECKFORDELMULT^SDES2UTIL | CREATECLINIC+18 |
| VALCONTEXT^SDES2VALCONTEXT | CREATECLINIC+6 |
| VALCLINIC^SDES2VALCRTCLIN1 | CREATECLINIC+21 |
| DUZ^XUP | CREATECLINIC+9 |
| RPC Name | Call Tags |
|---|---|
| SDES2 CREATE CLINIC | CREATECLINIC |
| FileNo | Call Tags |
|---|---|
| ^DIC(40.9 - [#40.9] | FIND1^DIC |
| Name | Line Occurrences |
|---|---|
| ADDMULTIPLES | CREATECLINIC+31 |
| CREATEFDAARRAY | CREATECLINIC+24 |
| FILECLINIC | CREATECLINIC+26 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CLIN | FILECLINIC+1~ |
| D0 | CREATECLINIC+4~ |
| DG | CREATECLINIC+4~ |
| DIC | CREATECLINIC+4~ |
| DICR | CREATECLINIC+4~ |
| DIW | CREATECLINIC+4~ |
| DUZ | CREATECLINIC+9~ |
| ERNUM | ERRLOG~, ERRLOG+1 |
| FILEDATA | CREATEFDAARRAY~ |
| FILEDATA("ABBREVIATION" | CREATEFDAARRAY+21 |
| FILEDATA("ADM | IN INPATIENT MEDS" , CREATEFDAARRAY+22 |
| FILEDATA("ALL | OWABLE CONSECUTIVE NO-SHOWS" , CREATEFDAARRAY+4 |
| FILEDATA("APP | OINTMENT CANCELLATION LETTER" , CREATEFDAARRAY+23 |
| FILEDATA("ASK | CHECK IN/OUT" , CREATEFDAARRAY+24 |
| FILEDATA("CLI | NIC CANCELLATION LETTER" , CREATEFDAARRAY+25 |
| FILEDATA("CRE | DIT AMIS" , CREATEFDAARRAY+26 |
| FILEDATA("DEF | AULT APPOINTMENT TYPE" , CREATEFDAARRAY+27, AULT TO PC PRACTITIONER" , CREATEFDAARRAY+28 |
| FILEDATA("DIR | ECT PATIENT SCHEDULING" , CREATEFDAARRAY+5 |
| FILEDATA("DIS | PLAY APPOINTMENTS" , CREATEFDAARRAY+6, PLAY INCREMENTS PER HOUR" , CREATEFDAARRAY+7 |
| FILEDATA("DIVISION" | CREATEFDAARRAY+8 |
| FILEDATA("E-C | HECKIN ALLOWED" , CREATEFDAARRAY+9 |
| FILEDATA("HOU | R CLINIC DISPLAY BEGINS" , CREATEFDAARRAY+29 |
| FILEDATA("LEN | GTH OF APPOINTMENT" , CREATEFDAARRAY+10 |
| FILEDATA("MAX | DAYS FUTURE BOOKING" , CREATEFDAARRAY+11 |
| FILEDATA("MEE | TS AT FACILITY" , CREATEFDAARRAY+30 |
| FILEDATA("NAME" | CREATEFDAARRAY+12 |
| FILEDATA("NO- | SHOW LETTER" , CREATEFDAARRAY+31 |
| FILEDATA("NON-COUNT" | CREATEFDAARRAY+13 |
| FILEDATA("OVE | RBOOKS/DAY MAX" , CREATEFDAARRAY+14 |
| FILEDATA("PAT | IENT FRIENDLY NAME" , CREATEFDAARRAY+32 |
| FILEDATA("PBSPID" | CREATEFDAARRAY+33 |
| FILEDATA("PHY | SICAL LOCATION" , CREATEFDAARRAY+34 |
| FILEDATA("PRE | -APPOINTMENT LETTER" , CREATEFDAARRAY+35, -CHECKIN ALLOWED" , CREATEFDAARRAY+15 |
| FILEDATA("PRI | MARY AMIS" , CREATEFDAARRAY+16, NCIPAL CLINIC" , CREATEFDAARRAY+36 |
| FILEDATA("PRO | HIBIT ACCESS TO CLINIC" , CREATEFDAARRAY+37 |
| FILEDATA("REQ | UIRE ACTION PROFILES" , CREATEFDAARRAY+17, UIRE X-RAY" , CREATEFDAARRAY+38 |
| FILEDATA("SCH | EDULE ON HOLIDAYS" , CREATEFDAARRAY+39 |
| FILEDATA("SERVICE" | CREATEFDAARRAY+18 |
| FILEDATA("TEL | EPHONE EXTENSION" , CREATEFDAARRAY+41 |
| FILEDATA("TELEPHONE" | CREATEFDAARRAY+40 |
| FILEDATA("VAR | IABLE APPOINTMENT LENGTH" , CREATEFDAARRAY+42 |
| FILEDATA("VET | ERAN SELF-CANCEL" , CREATEFDAARRAY+44 |
| FILEDATA("WOR | KLOAD VALIDATION" , CREATEFDAARRAY+43 |
| IEN | FILECLINIC+1~ |
| OPTIONALTXT | ERRLOG~, ERRLOG+1 |
| PROVDUZ | FILECLINIC+1~ |
| SDCLINIC | CREATECLINIC~, CREATECLINIC+15, CREATECLINIC+18, CREATECLINIC+21, ERRLOG+1 |
| SDCLINIC("DIAGNOSIS" | ADDMULTIPLES+2 |
| SDCLINIC("PRI | VILEGED USER" , ADDMULTIPLES+3 |
| SDCLINIC("PROVIDER" | ADDMULTIPLES+1 |
| SDCLINIC("SPE | CIAL INSTRUCTIONS" , ADDMULTIPLES+4 |
| SDCLINIC("SUBSPECIALTY" | ADDMULTIPLES+5 |
| SDCLINICIEN | CREATECLINIC+2~, CREATECLINIC+26, CREATECLINIC+29, CREATECLINIC+31, CREATECLINIC+33, CREATECLINIC+35, CREATECLINIC+37, FILECLINIC~, FILECLINIC+5*, ADDMULTIPLES~ , ADDMULTIPLES+1, ADDMULTIPLES+2, ADDMULTIPLES+3, ADDMULTIPLES+4, ADDMULTIPLES+5 |
| SDCLINMSG | FILECLINIC+1~, FILECLINIC+3 |
| SDCLINMSG("DIERR" | FILECLINIC+4 |
| SDCLINRET | FILECLINIC+1~ |
| SDCLINRET(1 | FILECLINIC+5 |
| SDCLINRETURN | CREATECLINIC+2~, CREATECLINIC+38 |
| SDCLINRETURN("CreateClinic" | CREATECLINIC+37* |
| SDCNT | FILECLINIC+1~ |
| SDCONTEXT | CREATECLINIC~, CREATECLINIC+6, CREATECLINIC+12 |
| SDCONTEXT("AC | HERON AUDIT ID" , CREATEFDAARRAY+2 |
| SDCONTEXT("US | ER DUZ" , CREATECLINIC+9 |
| SDERRNUM | FILECLINIC+1~, FILECLINIC+4* |
| SDERRORS | CREATECLINIC+2~, CREATECLINIC+6, CREATECLINIC+7, CREATECLINIC+12, CREATECLINIC+13, CREATECLINIC+15, CREATECLINIC+16, CREATECLINIC+18, CREATECLINIC+19, CREATECLINIC+21 , CREATECLINIC+22, CREATECLINIC+26, CREATECLINIC+27, CREATECLINIC+31, FILECLINIC~, FILECLINIC+4, ADDMULTIPLES~, ADDMULTIPLES+1, ADDMULTIPLES+2, ADDMULTIPLES+3 , ADDMULTIPLES+4, ADDMULTIPLES+5 |
| SDFDA | CREATECLINIC+2~, CREATECLINIC+24, CREATECLINIC+26, CREATEFDAARRAY~ |
| SDFDA(44 | CREATEFDAARRAY+2*, CREATEFDAARRAY+4*, CREATEFDAARRAY+5*, CREATEFDAARRAY+6*, CREATEFDAARRAY+7*, CREATEFDAARRAY+8*, CREATEFDAARRAY+9*, CREATEFDAARRAY+10*, CREATEFDAARRAY+11*, CREATEFDAARRAY+12* , CREATEFDAARRAY+13*, CREATEFDAARRAY+14*, CREATEFDAARRAY+15*, CREATEFDAARRAY+16*, CREATEFDAARRAY+17*, CREATEFDAARRAY+18*, CREATEFDAARRAY+19*, CREATEFDAARRAY+21*, CREATEFDAARRAY+22*, CREATEFDAARRAY+23* , CREATEFDAARRAY+24*, CREATEFDAARRAY+25*, CREATEFDAARRAY+26*, CREATEFDAARRAY+27*, CREATEFDAARRAY+28*, CREATEFDAARRAY+29*, CREATEFDAARRAY+30*, CREATEFDAARRAY+31*, CREATEFDAARRAY+32*, CREATEFDAARRAY+33* , CREATEFDAARRAY+34*, CREATEFDAARRAY+35*, CREATEFDAARRAY+36*, CREATEFDAARRAY+37*, CREATEFDAARRAY+38*, CREATEFDAARRAY+39*, CREATEFDAARRAY+40*, CREATEFDAARRAY+41*, CREATEFDAARRAY+42*, CREATEFDAARRAY+43* , CREATEFDAARRAY+44*, CREATEFDAARRAY+45* |
| SDFILEDATA | CREATECLINIC+2~, CREATECLINIC+21, CREATECLINIC+24, CREATECLINIC+31, FILECLINIC~, ADDMULTIPLES~, ADDMULTIPLES+1, ADDMULTIPLES+2, ADDMULTIPLES+3, ADDMULTIPLES+4 , ADDMULTIPLES+5 |
| SDJSONERRORS | CREATECLINIC+2~, CREATECLINIC+7*, CREATECLINIC+13*, CREATECLINIC+16*, CREATECLINIC+19*, CREATECLINIC+22*, CREATECLINIC+27* |
| SDJSONERRORS("CreateClinic" | CREATECLINIC+7*, CREATECLINIC+13*, CREATECLINIC+16*, CREATECLINIC+19*, CREATECLINIC+22* |
| SDRESULTS | CREATECLINIC+2~ |
| SDRETURN | CREATECLINIC~, CREATECLINIC+7, CREATECLINIC+13, CREATECLINIC+16, CREATECLINIC+19, CREATECLINIC+22, CREATECLINIC+27, CREATECLINIC+38 |
