SDECAR4 ;ALB/TAW,BLB,LAB - VISTA SCHEDULING RPCS ;Feb 3,2023
Source file <SDECAR4.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GETREQBYTYPEVET(RET) | ; SDES GET APPT REQ BY TYPE VET
|
|
| ARGETPATJSON(RET,DFN) | ;Entry point to return JSON
; SDEC GET PATIENT APPT REQ JSON ; ARGETPATJSON^SDEC1 |
|
| ARGETIEN(RET,ARIEN) | ;Appt Req GET for speific appt IEN
; SDEC GET PAT APPT REQ BY IEN ; ARGETIEN^SDEC1 |
|
| ARGETPAT(RET,DFN) | ;Appt Req GET.
; SDEC PATIENT APP REQ GET ; ARGETPAT^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 | ; Build an output record
|
|
| HDR | ;
|
|
| BUILDPATCOMMENTS(REQUEST,REQUESTIEN,COUNT) | ; patient comments
|
|
| BUILDJSON | ;Convert to JSON
|
|
| EXIT | ; Any special logic needed for a successful completion
|
| RPC Name | Call Tags |
|---|---|
| SDEC GET REQ BY TYPE VET JSON | GETREQBYTYPEVET |
| FileNo | Call Tags |
|---|---|
| ^SDEC(409.85 - [#409.85] | GET1^DIQ |
