SDESREQAPPCREATE ;ALB/RRM,MGD - VISTA SCHEDULING CREATE APPT REQ AND SCHEDULE APPT RPC ;Mar 27, 2023@10:29
Source file <SDESREQAPPCREATE.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CREATEREQANDAPPT(RETURNJSON,REQUEST) | ;EP for SDES CREATE VET REQ SCHED APPT
; Input: ; REQUEST [Required] - This is the array that contains all necessary data for the creation of the appointment request, ; scheduling the appointment, and then dispositioning the appointment. ; REQUEST("APPOINTMENT END TIME") = (Required) APPT END TIME - ISO FORMAT ; REQUEST("APPOINTMENT LENGTH") = (Required) APPT LENGTH IN MINUTES (5-120) ; REQUEST("APPOINTMENT START TIME") = (Required) APPT START TIME - ISO FORMAT ; REQUEST("CLINIC IEN") = (Required) CLINIC IEN ; REQUEST("CREATE DATE") = (Required) DATE/TIME ENTERED (#409.85,9.5) in ISO8601 date/time format to include offset (e.g. CCYY-MM-DDTHH:MM-NNNN) ; REQUEST("PATIENT INDICATED DATE") = (Required) CID/PID DATE - ISO FORMAT ; REQUEST("DFN") = (Required) PATIENT IEN ; REQUEST("APPOINTMENT REASON") = (Optional) FREE TEXT (1-150) ; REQUEST("COLLATERAL VISIT") = (Optional) COLLATERAL - 1 FOR YES ; REQUEST("APPOINTMENT TYPE IEN") = (Optional) POINTER TO APPOINTMENT TYPE FILE (#409.1) ; REQUEST("APPOINTMENT TYPE NAME") = (Optional) NAME from APPOINTMENT TYPE FILE (#409.1) ; Either APPOINTMENT TYPE IEN or APPOINTMENT TYPE NAME is Required ; REQUEST("EAS") = (Optional) Enterprise APPT Scheduling Tracking Number associated to an appt. ; REQUEST("FOLLOWUP") = (Optional) FOLLOWUP VISIT - 1 FOR YES 0 FOR NO ; REQUEST("INSTITUTION NAME") = (Optional) Institution name from the INSTITUTION file ; REQUEST("MODALITY") = (Optional) Valid Values: FACE2FACE, TELEPHONE, VIDEO ; REQUEST("NOTE") = (Optional) NOTE - FREE TEXT 1-150 ; REQUEST("OVERBOOK") = (Optional) OVERBOOK (0 for no, 1 for yes) ; REQUEST("PATIENT COMMENT") = (Optional) Patient-entered comments when using VAOS or other web-service (stored at 409.85,60 a word processing field) ; REQUEST("PATIENT ELIGIBILITY IEN") = (Optional) ELIGIBILITY IEN ; REQUEST("PATIENT PREFERRED END DATE",1) = (Optional) PATIENT PREFERRED END DATE 1 - ISO FORMAT ; REQUEST("PATIENT PREFERRED END DATE",2) = (Optional) PATIENT PREFERRED END DATE 2 - ISO FORMAT ; REQUEST("PATIENT PREFERRED END DATE",3) = (Optional) PATIENT PREFERRED END DATE 3 - ISO FORMAT ; REQUEST("PATIENT PREFERRED START DATE",1)= (Optional) PATIENT PREFERRED START DATE 1 - ISO FORMAT ; REQUEST("PATIENT PREFERRED START DATE",2)= (Optional) PATIENT PREFERRED START DATE 2 - ISO FORMAT ; REQUEST("PATIENT PREFERRED START DATE",3)= (Optional) PATIENT PREFERRED START DATE 3 - ISO FORMAT ; REQUEST("PATIENT STATUS") = (Optional) PATIENT STATUS - "NEW" OR "ESTABLISHED ; REQUEST("PRIORITY") = (Optional) PRIORITY - "ASAP" or FUTURE ; REQUEST("PRIORITY GROUP") = (Optional) ENROLLMENT PRIORITY - GROUP 1 - GROUP 7 ; REQUEST("REQUEST COMMENT") = (Optional) REQUEST COMMENT ; REQUEST("SECONDARY STOP CODE") = (Optional) Secondary Stop Code Number pointer to CLINIC STOP file #40.7 used to populate the REQ SECONDARY STOP CODE field in 409.85 ; REQUEST("SERVICE CONNECTED") = (Optional) Valid Values: YES, NO ; REQUEST("SERVICE CONNECTED PERCENTAGE") = (Optional) SC % = 0-100 ; REQUEST("STATION NUMBER") = (Optional) STATION NUMBER (#99),INSTITUTION (#4) ; REQUEST("STOP CODE") = (Optional) CLINIC STOP pointer to CLINIC STOP file 40.7 used to populate the REQ SERVICE/SPECIALTY field in 409.85 ; REQUEST("VAOS GUID") = (Optional) VAOS GUID |
|
| BUILDAPPTARRAY(REQUEST,REQRESULT,APPTARRAY) | ;build the appointment array based from the REQUEST array
|
|
| SETERRORRETURN(ERRORS,RETURNERROR,RETURNJSON) | ;
|
|
| SETEMPTYOBJECT(RETURNERROR) | ;set the return object into null if an error occur
|
|
| CLEANUP | ;
|
|
| RETURNERR(ERRORS) | ;
|
| RPC Name | Call Tags |
|---|---|
| SDES CREATE VET REQ SCHED APPT | CREATEREQANDAPPT |
| FileNo | Call Tags |
|---|---|
| ^SD(409.1 - [#409.1] | GET1^DIQ |
| ^SDEC(409.85 - [#409.85] | Classic Fileman Calls |
