SDES2REACTTCLIN2 ;ALB/JAS,TJB - VISTA SCHEDULING REACTIVATE CLINIC RPC 2 in HOSPITAL LOCATION FILE 44 ;MAY 05, 2025
Source file <SDES2REACTTCLIN2.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| REACTIVATECLIN(RETURNJSON,SDCONTEXT,SDPARAM) | ;Entry point for SDES2 REACTIVATE CLINIC RPC
 | 
|
| INITVAR(SDPARAM,SDCLINICIEN,REACTIVATIONDATE,PROVIDERS) | ;Initialize input parameter
 | 
|
| REACTIVATE(RETURN,SDCLINICIEN,REACTIVATIONDATE,PROVIDERS) | ;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)
 | 
|
| VALPROVLST(ERRORS,CLINICIEN,PROVIDERS) | ;validate provider list
 | 
|
| SETERRORRETURN(ERRORS,RETURNERROR,RETURNJSON) | ;
 | 
|
| SETEMPTYOBJECT(RETURNERROR) | ;set the return object into null if an error occur
 | 
| RPC Name | Call Tags | 
|---|---|
| SDES2 REACTIVATE CLINIC 2 | REACTIVATECLIN | 
| FileNo | Call Tags | 
|---|---|
| ^SC - [#44] | GET1^DIQ, TURNON^DIAUTL |