SDES2REACTTCLIN ;ALB/TJB,MGD,JDJ - VISTA SCHEDULING REACTIVATE CLINIC RPC in HOSPITAL LOCATION FILE 44 ;DEC 19, 2024
Source file <SDES2REACTTCLIN.m>
| 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,SDDUZ) | ;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
|
| RPC Name | Call Tags |
|---|---|
| SDES2 REACTIVATE CLINIC | REACTIVATECLIN |
| FileNo | Call Tags |
|---|---|
| ^SC - [#44] | GET1^DIQ, TURNON^DIAUTL |
