SDESARGET ;ALB/BLB,MGD,KML,LAB - VISTA SCHEDULING RPCS ;March 23, 2022
Source file <SDESARGET.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ARGETPATJSON(RET,DFN,SDEAS) | ;Entry point to return JSON
; SDEC GET PATIENT APPT REQ JSON ; ARGETPATJSON^SDEC1 |
|
| ARGETIENJSON(RET,ARIEN,SDEAS) | ;Appt Req GET for speific appt IEN
; SDEC GET PAT APPT REQ BY IEN ; ARGETIEN^SDEC1 |
|
| JSONEP | ;
|
|
| INIT | ; Initalize any process specific variables
|
|
| VALIDATE() | ;Validata input params
|
|
| PROCESS | ; Loop over primary index
|
|
| ONEPAT | ; Process one patient
|
|
| VALIDIEN() | ;Validate the appointment request
|
|
| BUILDREC(ARDATA) | ; Build an output record
; Input - ARDATA = array containing data from SDEC APPT REQUEST file (#409.85) |
|
| BUILDJSON | ;Convert to JSON
|
|
| WLPC(ARDATA,ASDIEN) | ;
|
|
| EXIT | ; Any special logic needed for a successful completion
|
| FileNo | Call Tags |
|---|---|
| ^SDEC(409.85 - [#409.85] | GET1^DIQ |
