SDESGETAPPTWRAP4 ;ALB/RRM,MGD/RRM - RPC WRAPPER FOR VIEWING AN APPOINTMENT ;JULY 5, 2022
Source file <SDESGETAPPTWRAP4.m>
| Package | Total | Call Graph |
|---|---|---|
| Scheduling | 6 | $$ISOTFM^SDAMUTDT (GETAPPT40984,GETAPPT44)^SDESGETAPPTWRAP5 ($$VALIDATECLINIC,$$VALIDATEPTDFN)^SDESGETPATAPPT ERRLOG^SDESJSON ($$VALIDATEBEGDT,$$VALIDATEENDDT)^SDESPRINTPATAPPT $$EASVALIDATE^SDESUTIL |
| Kernel | 1 | ENCODE^XLFJSON |
| VA FileMan | 1 | $$GET1^DIQ |
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Package | Total | Caller Graph |
|---|---|---|
| Scheduling | 5 | SDES2APPTCLNLST SDESAPPT3 SDESAPPT4 SDESGETAPPTSIEN SDESGETAPPTSIEN2 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GETAPPTBYPATDFN(RETURNJSON,DFN,SDBEGDATE,SDENDDATE,SDEAS) | ;Called from the RPC: SDES GET APPTS BY PATIENT DFN
|
|
| GETAPPTBYCLNIEN(RETURNJSON,CLINICIEN,SDBEGDATE,SDENDDATE,SDEAS) | ;Called from the RPC: SDES GET APPTS BY CLIN IEN
|
|
| GETAPPTBYIEN(RETURNJSON,SDAPPTIEN,SDEAS) | ;Called from the RPC: SDES GET APPTS BY IEN
|
|
| GETAPPOINTMENTS(SDALLAPPTARY,SDPOINTERIEN,SDBEGDATE,SDENDDATE,SDVIEWAPPTBY,SDAPPTIEN) | ;
; Input: ; SDPOINTERIEN [Required] = This can be a patient's DFN from PATIENT File #2 or the Internal Entry Number (IEN) from HOSPITAL LOCATION FILE #44. ; SDBEGDATE [Required] = The beginning date/time in FileMan Format for the search. ; SDENDDATE [Required] = The ending date/time in FileMan Time Format for the search. ; SDVIEWAPPTBY [Optional] = The driver of which process to perform when retrieving appointments (By DFN, Clinic IEN, or Appointment IEN) ; = If NULL, this will be defaulted to by DFN ; SDAPPTIEN [Optional] = Only send this parameter if you want to retrieve appointments using APPOINTMENT IEN from SDEC APPOINTMENT File #409.84 |
|
| VALIDATEPTDFN(ERRORS,SDDFN) | ||
| VALIDATECLINIC(ERRORS,SDCLINICIEN) | ||
| VALIDATEAPPTIEN(ERRORS,SDAPPTIEN) | ;Validate Appointment IEN
|
|
| INPUTDATEVAL(SDBEGDATE,SDENDDATE) | ;beginning and ending date input parameter validation
|
|
| VALIDATEBEGDATE(ERRORS,SDBEGDATE) | ||
| VALIDATEENDDATE(ERRORS,SDENDDATE) | ||
| VALIDATEEAS(ERRORS,EAS) | ;
|
|
| BUILDJSON(RETURNJSON,INPUT) | ; Build JSON format
|
|
| CLEANUP | ;
|
|
| INITVARBYDFN | ;initialized input parameter for SDES GET APPTS BY PATIENT DFN3 RPC
|
|
| INITVARBYCLNIEN | ;initialized input parameter for SDES GET APPTS BY CLIN IEN 3 RPC
|
|
| INITVARBYIEN | ;initialized input parameter for SDES GET APPTS BY IEN 2 RPC
|
| Name | Field # of Occurrence |
|---|---|
| $$GET1^DIQ | GETAPPTBYIEN+27, GETAPPTBYIEN+28, GETAPPTBYIEN+29 |
| $$ISOTFM^SDAMUTDT | GETAPPTBYPATDFN+23, GETAPPTBYPATDFN+24, GETAPPTBYCLNIEN+23, GETAPPTBYCLNIEN+24 |
| GETAPPT40984^SDESGETAPPTWRAP5 | GETAPPOINTMENTS+16 |
| GETAPPT44^SDESGETAPPTWRAP5 | GETAPPOINTMENTS+17 |
| $$VALIDATECLINIC^SDESGETPATAPPT | VALIDATECLINIC+2 |
| $$VALIDATEPTDFN^SDESGETPATAPPT | VALIDATEPTDFN+2 |
| ERRLOG^SDESJSON | VALIDATEAPPTIEN+2, VALIDATEAPPTIEN+3, VALIDATEBEGDATE+2, VALIDATEENDDATE+2, VALIDATEEAS+2 |
| $$VALIDATEBEGDT^SDESPRINTPATAPPT | VALIDATEBEGDATE+3 |
| $$VALIDATEENDDT^SDESPRINTPATAPPT | VALIDATEENDDATE+3 |
| $$EASVALIDATE^SDESUTIL | VALIDATEEAS+1 |
| ENCODE^XLFJSON | BUILDJSON+3 |
| FileNo | Call Tags |
|---|---|
| ^SDEC(409.84 - [#409.84] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^SDEC(409.84 - [#409.84] | VALIDATEAPPTIEN+3 |
| Name | Line Occurrences |
|---|---|
| $$VALIDATEAPPTIEN | GETAPPTBYIEN+18 |
| $$VALIDATEBEGDATE | INPUTDATEVAL+1 |
| $$VALIDATECLINIC | GETAPPTBYCLNIEN+20 |
| $$VALIDATEEAS | GETAPPTBYPATDFN+27, GETAPPTBYCLNIEN+27, GETAPPTBYIEN+21 |
| $$VALIDATEENDDATE | INPUTDATEVAL+4 |
| $$VALIDATEPTDFN | GETAPPTBYPATDFN+20 |
| BUILDJSON | GETAPPTBYPATDFN+30, GETAPPTBYPATDFN+34, GETAPPTBYCLNIEN+30, GETAPPTBYCLNIEN+34, GETAPPTBYIEN+24, GETAPPTBYIEN+31 |
| CLEANUP | GETAPPTBYPATDFN+35, GETAPPTBYCLNIEN+35, GETAPPTBYIEN+32 |
| GETAPPOINTMENTS | GETAPPTBYPATDFN+33, GETAPPTBYCLNIEN+33, GETAPPTBYIEN+30 |
| INITVARBYCLNIEN | GETAPPTBYCLNIEN+19, GETAPPTBYIEN+17 |
| INITVARBYDFN | GETAPPTBYPATDFN+19 |
| INPUTDATEVAL | GETAPPTBYPATDFN+25, GETAPPTBYCLNIEN+25 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| APPTIEN | GETAPPTBYIEN+15~ |
| CLINICIEN | GETAPPTBYCLNIEN~, GETAPPTBYCLNIEN+20, GETAPPTBYCLNIEN+33, INITVARBYCLNIEN+1* |
| DFN | GETAPPTBYPATDFN~, GETAPPTBYPATDFN+20, GETAPPTBYPATDFN+33, GETAPPTBYIEN+15~, GETAPPTBYIEN+27*, GETAPPTBYIEN+30, INITVARBYDFN+1* |
| EAS | VALIDATEEAS~, VALIDATEEAS+1*, VALIDATEEAS+2 |
| ERR | CLEANUP+2! |
| ERRORFLAG | VALIDATEPTDFN+1~, VALIDATEPTDFN+2*, VALIDATEPTDFN+3, VALIDATECLINIC+1~, VALIDATECLINIC+2*, VALIDATECLINIC+3, VALIDATEAPPTIEN+1~, VALIDATEAPPTIEN+2*, VALIDATEAPPTIEN+3*, VALIDATEAPPTIEN+4 , VALIDATEBEGDATE+1~, VALIDATEBEGDATE+2*, VALIDATEBEGDATE+3*, VALIDATEBEGDATE+4, VALIDATEENDDATE+1~, VALIDATEENDDATE+2*, VALIDATEENDDATE+3*, VALIDATEENDDATE+4, CLEANUP+1! |
| ERRORS | GETAPPTBYPATDFN+14~, GETAPPTBYPATDFN+20, GETAPPTBYPATDFN+21, GETAPPTBYPATDFN+27, GETAPPTBYPATDFN+28, GETAPPTBYCLNIEN+14~, GETAPPTBYCLNIEN+20, GETAPPTBYCLNIEN+21, GETAPPTBYCLNIEN+27, GETAPPTBYCLNIEN+28 , GETAPPTBYIEN+12~, GETAPPTBYIEN+18, GETAPPTBYIEN+19, GETAPPTBYIEN+21, GETAPPTBYIEN+22, VALIDATEPTDFN~, VALIDATEPTDFN+2, VALIDATECLINIC~, VALIDATECLINIC+2, VALIDATEAPPTIEN~ , VALIDATEAPPTIEN+2, VALIDATEAPPTIEN+3, INPUTDATEVAL+1, INPUTDATEVAL+2, INPUTDATEVAL+4, INPUTDATEVAL+5, VALIDATEBEGDATE~, VALIDATEBEGDATE+2, VALIDATEBEGDATE+3, VALIDATEENDDATE~ , VALIDATEENDDATE+2, VALIDATEENDDATE+3, VALIDATEEAS~, VALIDATEEAS+2, CLEANUP+1! |
| FOUND | GETAPPTBYIEN+15~, CLEANUP+2! |
| HASAPPTIENERRORS | GETAPPTBYIEN+15~, GETAPPTBYIEN+18*, GETAPPTBYIEN+19 |
| HASBEGDATEERRORS | GETAPPTBYPATDFN+17~, GETAPPTBYCLNIEN+17~, INPUTDATEVAL+1*, INPUTDATEVAL+2, CLEANUP+2! |
| HASCLINIENERRORS | GETAPPTBYCLNIEN+17~, GETAPPTBYCLNIEN+20*, GETAPPTBYCLNIEN+21, CLEANUP+1! |
| HASDFNERRORS | GETAPPTBYPATDFN+17~, GETAPPTBYPATDFN+20*, GETAPPTBYPATDFN+21, CLEANUP+1! |
| HASEASERRORS | GETAPPTBYPATDFN+17~, GETAPPTBYPATDFN+27*, GETAPPTBYPATDFN+28, GETAPPTBYCLNIEN+17~, GETAPPTBYCLNIEN+27*, GETAPPTBYCLNIEN+28, GETAPPTBYIEN+15~, GETAPPTBYIEN+21*, GETAPPTBYIEN+22 |
| HASENDDATEERRORS | GETAPPTBYPATDFN+17~, GETAPPTBYCLNIEN+17~, INPUTDATEVAL+4*, INPUTDATEVAL+5, CLEANUP+2! |
| INPUT | BUILDJSON~ |
| JSONERROR | BUILDJSON+1~, BUILDJSON+2* |
| RECNUM | GETAPPOINTMENTS+12~, GETAPPOINTMENTS+13*, GETAPPOINTMENTS+16, GETAPPOINTMENTS+17 |
| RETURNERROR | GETAPPTBYPATDFN+14~, GETAPPTBYPATDFN+21*, GETAPPTBYPATDFN+28*, GETAPPTBYPATDFN+30, GETAPPTBYCLNIEN+14~, GETAPPTBYCLNIEN+21*, GETAPPTBYCLNIEN+28*, GETAPPTBYCLNIEN+30, GETAPPTBYIEN+12~, GETAPPTBYIEN+19* , GETAPPTBYIEN+22*, GETAPPTBYIEN+24, INPUTDATEVAL+2*, INPUTDATEVAL+5*, CLEANUP+1! |
| RETURNERROR("Appointment" | GETAPPTBYPATDFN+30*, GETAPPTBYCLNIEN+30*, GETAPPTBYIEN+24* |
| RETURNERROR("Error" | GETAPPTBYPATDFN+30, GETAPPTBYCLNIEN+30, GETAPPTBYIEN+24 |
| RETURNJSON | GETAPPTBYPATDFN~, GETAPPTBYPATDFN+30, GETAPPTBYPATDFN+34, GETAPPTBYCLNIEN~, GETAPPTBYCLNIEN+30, GETAPPTBYCLNIEN+34, GETAPPTBYIEN~, GETAPPTBYIEN+24, GETAPPTBYIEN+31, BUILDJSON~ |
| SDALLAPPTARY | GETAPPTBYPATDFN+15~, GETAPPTBYPATDFN+33, GETAPPTBYPATDFN+34, GETAPPTBYCLNIEN+15~, GETAPPTBYCLNIEN+33, GETAPPTBYCLNIEN+34, GETAPPTBYIEN+13~, GETAPPTBYIEN+30, GETAPPTBYIEN+31, GETAPPOINTMENTS~ , GETAPPOINTMENTS+16, GETAPPOINTMENTS+17, CLEANUP+1! |
| SDAPPTIEN | GETAPPTBYIEN~, GETAPPTBYIEN+18, GETAPPTBYIEN+27, GETAPPTBYIEN+28, GETAPPTBYIEN+29, GETAPPTBYIEN+30, GETAPPOINTMENTS~, GETAPPOINTMENTS+15*, GETAPPOINTMENTS+16, VALIDATEAPPTIEN~ , VALIDATEAPPTIEN+2, VALIDATEAPPTIEN+3, INITVARBYIEN+1* |
| SDAPPTNO | GETAPPTBYPATDFN+17~, GETAPPTBYPATDFN+32*, GETAPPTBYCLNIEN+17~, GETAPPTBYIEN+15~ |
| SDBEG | CLEANUP+1! |
| SDBEGDATE | GETAPPTBYPATDFN~, GETAPPTBYPATDFN+23*, GETAPPTBYPATDFN+25, GETAPPTBYPATDFN+33, GETAPPTBYCLNIEN~, GETAPPTBYCLNIEN+23*, GETAPPTBYCLNIEN+25, GETAPPTBYCLNIEN+33, GETAPPTBYIEN+15~, GETAPPTBYIEN+28* , GETAPPTBYIEN+30, GETAPPOINTMENTS~, GETAPPOINTMENTS+16, GETAPPOINTMENTS+17, INPUTDATEVAL~, INPUTDATEVAL+1, VALIDATEBEGDATE~, VALIDATEBEGDATE+2, VALIDATEBEGDATE+3, INITVARBYDFN+2* , INITVARBYCLNIEN+2* |
| SDCLINICIEN | VALIDATECLINIC~, VALIDATECLINIC+2, CLEANUP+2! |
| SDDFN | VALIDATEPTDFN~, VALIDATEPTDFN+2, CLEANUP+2! |
| SDEAS | GETAPPTBYPATDFN~, GETAPPTBYPATDFN+27, GETAPPTBYCLNIEN~, GETAPPTBYCLNIEN+27, GETAPPTBYIEN~, GETAPPTBYIEN+21, INITVARBYDFN+4*, INITVARBYCLNIEN+4*, INITVARBYIEN+2* |
| SDEND | CLEANUP+1! |
| SDENDDATE | GETAPPTBYPATDFN~, GETAPPTBYPATDFN+24*, GETAPPTBYPATDFN+25, GETAPPTBYPATDFN+33, GETAPPTBYCLNIEN~, GETAPPTBYCLNIEN+24*, GETAPPTBYCLNIEN+25, GETAPPTBYCLNIEN+33, GETAPPTBYIEN+15~, GETAPPTBYIEN+29* , GETAPPTBYIEN+30, GETAPPOINTMENTS~, GETAPPOINTMENTS+16, GETAPPOINTMENTS+17, INPUTDATEVAL~, INPUTDATEVAL+4, VALIDATEENDDATE~, VALIDATEENDDATE+2, VALIDATEENDDATE+3, INITVARBYDFN+3* , INITVARBYCLNIEN+3* |
| SDMSG | CLEANUP+2! |
| SDPOINTERIEN | GETAPPOINTMENTS~, GETAPPOINTMENTS+16, GETAPPOINTMENTS+17 |
| SDVIEWAPPTBY | GETAPPTBYPATDFN+16~, GETAPPTBYPATDFN+32*, GETAPPTBYPATDFN+33, GETAPPTBYCLNIEN+16~, GETAPPTBYCLNIEN+32*, GETAPPTBYCLNIEN+33, GETAPPTBYIEN+14~, GETAPPTBYIEN+26*, GETAPPTBYIEN+30, GETAPPOINTMENTS~ , GETAPPOINTMENTS+14*, GETAPPOINTMENTS+16, GETAPPOINTMENTS+17, CLEANUP+2! |
| STARTTIME | CLEANUP+2! |
| U | VALIDATEEAS+2 |