SDES2REACTTCLIN ;ALB/TJB,MGD,JDJ,TAW - VISTA SCHEDULING REACTIVATE CLINIC RPC in HOSPITAL LOCATION FILE 44 ;AUG 25 2025
Source file <SDES2REACTTCLIN.m>
| Package | Total | Call Graph |
|---|---|---|
| Scheduling | 4 | $$ISOTFM^SDAMUTDT (BUILDJSON,ERRLOG)^SDES2JSON $$GETRES^SDES2UTIL1 VALCONTEXT^SDES2VALCONTEXT |
| Kernel | 3 | $$FMTE^XLFDT $$TRIM^XLFSTR DUZ^XUP |
| VA FileMan | 3 | TURNON^DIAUTL FILE^DIE $$GET1^DIQ |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| REACTIVATECLIN(RETURNJSON,SDCONTEXT,SDPARAM) | ;Entry point for SDES2 REACTIVATE CLINIC RPC
|
|
| INITVAR | ;Initialize input parameter
|
|
| REACTIVATE(RETURN,SDCLINICIEN,REACTIVATIONDATE) | ;Reactivate Clinic
|
|
| UPDATECLNRES(SDCLINICIEN,REACTIVATIONDATE) | ;Update REACTIVATED DATE/TIME and REACTIVATED BY USER in SDEC RESOURCE File #409.831
|
|
| VALCLNIENREACTDT(ERRORS,CLINICIEN,REACTIVATIONDATE) | ;validate Clinic IEN and Reactivation Date (they need to go hand in hand together)
|
|
| SETERRORRETURN(ERRORS,RETURNERROR,RETURNJSON) | ;
|
|
| SETEMPTYOBJECT(RETURNERROR) | ;set the return object into null if an error occur
|
| Name | Field # of Occurrence |
|---|---|
| TURNON^DIAUTL | REACTIVATECLIN+31 |
| FILE^DIE | REACTIVATE+8, UPDATECLNRES+6 |
| $$GET1^DIQ | REACTIVATE+4, REACTIVATE+5, REACTIVATE+6, VALCLNIENREACTDT+5, VALCLNIENREACTDT+7, VALCLNIENREACTDT+18, VALCLNIENREACTDT+19 |
| $$ISOTFM^SDAMUTDT | REACTIVATECLIN+32, VALCLNIENREACTDT+15 |
| BUILDJSON^SDES2JSON | REACTIVATECLIN+26, REACTIVATECLIN+36, SETERRORRETURN+3 |
| ERRLOG^SDES2JSON | REACTIVATE+9, VALCLNIENREACTDT+2, VALCLNIENREACTDT+4, VALCLNIENREACTDT+5, VALCLNIENREACTDT+13, VALCLNIENREACTDT+16, VALCLNIENREACTDT+17, VALCLNIENREACTDT+20, VALCLNIENREACTDT+21, VALCLNIENREACTDT+22 , VALCLNIENREACTDT+24 |
| $$GETRES^SDES2UTIL1 | UPDATECLNRES+2 |
| VALCONTEXT^SDES2VALCONTEXT | REACTIVATECLIN+25 |
| $$FMTE^XLFDT | REACTIVATE+11, VALCLNIENREACTDT+21, VALCLNIENREACTDT+22, VALCLNIENREACTDT+24 |
| $$TRIM^XLFSTR | REACTIVATE+6, VALCLNIENREACTDT+11 |
| DUZ^XUP | REACTIVATECLIN+27 |
| RPC Name | Call Tags |
|---|---|
| SDES2 REACTIVATE CLINIC | REACTIVATECLIN |
| FileNo | Call Tags |
|---|---|
| ^SC - [#44] | GET1^DIQ, TURNON^DIAUTL |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^SC - [#44] | VALCLNIENREACTDT+4 |
| ^SC("B" | VALCLNIENREACTDT+12 |
| Name | Line Occurrences |
|---|---|
| $$REACTIVATE | REACTIVATECLIN+33 |
| INITVAR | REACTIVATECLIN+28 |
| SETEMPTYOBJECT | SETERRORRETURN+2 |
| SETERRORRETURN | REACTIVATECLIN+30, REACTIVATECLIN+34 |
| UPDATECLNRES | REACTIVATECLIN+35 |
| VALCLNIENREACTDT | REACTIVATECLIN+29 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CLIN | REACTIVATECLIN+20~ |
| CLINICIEN | VALCLNIENREACTDT~, VALCLNIENREACTDT+2, VALCLNIENREACTDT+3, VALCLNIENREACTDT+4, VALCLNIENREACTDT+5, VALCLNIENREACTDT+7, VALCLNIENREACTDT+15, VALCLNIENREACTDT+18, VALCLNIENREACTDT+19 |
| DT | VALCLNIENREACTDT+22 |
| DUZ | REACTIVATECLIN+27~, UPDATECLNRES+5 |
| ERRORS | REACTIVATECLIN+18~, REACTIVATECLIN+25, REACTIVATECLIN+26, REACTIVATECLIN+29, REACTIVATECLIN+30, REACTIVATECLIN+34, REACTIVATE+9, VALCLNIENREACTDT~, VALCLNIENREACTDT+2, VALCLNIENREACTDT+4 , VALCLNIENREACTDT+5, VALCLNIENREACTDT+13, VALCLNIENREACTDT+16, VALCLNIENREACTDT+17, VALCLNIENREACTDT+20, VALCLNIENREACTDT+21, VALCLNIENREACTDT+22, VALCLNIENREACTDT+24, SETERRORRETURN~, SETERRORRETURN+1 |
| ERRORS("Error" | REACTIVATECLIN+30, REACTIVATECLIN+34 |
| ERRORS("ReactivateClinic" | REACTIVATECLIN+26* |
| IEN | REACTIVATECLIN+20~ |
| INACTDT | VALCLNIENREACTDT+1~, VALCLNIENREACTDT+18*, VALCLNIENREACTDT+20, VALCLNIENREACTDT+21, VALCLNIENREACTDT+23 |
| ISFILED | REACTIVATE+1~, REACTIVATE+2*, REACTIVATE+9*, REACTIVATE+12*, REACTIVATE+13 |
| ISREACTIVATED | REACTIVATECLIN+19~, REACTIVATECLIN+33*, REACTIVATECLIN+35 |
| PROVDUZ | REACTIVATECLIN+20~ |
| REACTDT | VALCLNIENREACTDT+1~, VALCLNIENREACTDT+19*, VALCLNIENREACTDT+23, VALCLNIENREACTDT+24 |
| REACTIVATIONDATE | REACTIVATECLIN+19~, REACTIVATECLIN+29, REACTIVATECLIN+32*, REACTIVATECLIN+33, REACTIVATECLIN+35, INITVAR+2*, REACTIVATE~, REACTIVATE+4, REACTIVATE+7, REACTIVATE+11 , UPDATECLNRES~, UPDATECLNRES+4, VALCLNIENREACTDT~, VALCLNIENREACTDT+15*, VALCLNIENREACTDT+16, VALCLNIENREACTDT+17, VALCLNIENREACTDT+21, VALCLNIENREACTDT+22, VALCLNIENREACTDT+23 |
| RETURN | REACTIVATECLIN+18~, REACTIVATECLIN+33, REACTIVATECLIN+36, REACTIVATE~ |
| RETURN("ReactivateClinic" | REACTIVATE+10*, REACTIVATE+11* |
| RETURNERROR | REACTIVATECLIN+18~, REACTIVATECLIN+30, REACTIVATECLIN+34, SETERRORRETURN~, SETERRORRETURN+1*, SETERRORRETURN+2, SETERRORRETURN+3, SETEMPTYOBJECT~ |
| RETURNERROR("ReactivateClinic" | SETEMPTYOBJECT+1*, SETEMPTYOBJECT+2* |
| RETURNJSON | REACTIVATECLIN~, REACTIVATECLIN+23!, REACTIVATECLIN+26, REACTIVATECLIN+30, REACTIVATECLIN+34, REACTIVATECLIN+36, SETERRORRETURN~, SETERRORRETURN+3 |
| SDCLINICIEN | REACTIVATECLIN+19~, REACTIVATECLIN+29, REACTIVATECLIN+32, REACTIVATECLIN+33, REACTIVATECLIN+35, INITVAR+1*, REACTIVATE~, REACTIVATE+4, REACTIVATE+5, REACTIVATE+6 , REACTIVATE+7, REACTIVATE+10, UPDATECLNRES~, UPDATECLNRES+2 |
| SDCLINNAME | VALCLNIENREACTDT+1~ |
| SDCLINRES | UPDATECLNRES+1~, UPDATECLNRES+2*, UPDATECLNRES+3, UPDATECLNRES+4, UPDATECLNRES+5 |
| SDCLNNAME | REACTIVATE+1~, REACTIVATE+5*, REACTIVATE+6, VALCLNIENREACTDT+1~, VALCLNIENREACTDT+7*, VALCLNIENREACTDT+9, VALCLNIENREACTDT+11 |
| SDCONTEXT | REACTIVATECLIN~, REACTIVATECLIN+25 |
| SDCONTEXT("US | ER DUZ" , REACTIVATECLIN+27 |
| SDERR | REACTIVATE+1~, REACTIVATE+9 |
| SDFDA | REACTIVATE+1~ |
| SDFDA(44 | REACTIVATE+6*, REACTIVATE+7* |
| SDNEWNAME | VALCLNIENREACTDT+10~, VALCLNIENREACTDT+11*, VALCLNIENREACTDT+12 |
| SDPARAM | REACTIVATECLIN~ |
| SDPARAM("CLIN | IC IEN" , INITVAR+1 |
| SDPARAM("REAC | TIVATION DATE" , INITVAR+2 |
| SDRESFDA | UPDATECLNRES+1~ |
| SDRESFDA( | UPDATECLNRES+4*, UPDATECLNRES+5* |
| TEMPIEN | VALCLNIENREACTDT+10~*, VALCLNIENREACTDT+12*, VALCLNIENREACTDT+13 |
