SDESAPPTREQ40984 ;ALB/ANU,MGD - VISTA SCHEDULING RPCS GET MISSION ELIGIBILITY ; June 16, 2022@15:20
Source file <SDESAPPTREQ40984.m>
Package | Total | Call Graph |
---|---|---|
Scheduling | 4 | $$ISOTFM^SDAMUTDT $$SDECADD^SDEC07 ERRLOG^SDESJSON $$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 | 1 | SDES |
Name | Comments | DBIA/ICR reference |
---|---|---|
ARSET(APTRETURN,SDAPPTSTARTDTTM,SDAPPTENDDTTM,SDPATIENTDFN,SDRESOURCE,SDATYPID,SDDDTTM,SDEXTID,SDAPPTREQTYPE,SDPROVIEN,SDCLNID,SDNOTE,SDAPPTYPE,SDEESTAT,SDAPPTLENGTH,SDEAS) | ; Create/Update Appointment Request
; This RPC creates an entry in SDEC APPOINTMENT file #409.84. ; Input: |
|
VALIDATE(ERRORS,SDAPPTSTARTDTTM,SDAPPTENDDTTM,SDPATIENTDFN,SDRESOURCE,SDATYPID,SDDDTTM,SDEXTID,SDAPPTREQTYPE,SDPROVIEN,SDCLNID,SDNOTE,SDAPPTYPE,SDEESTAT,SDAPPTLENGTH,SDEAS) | ; Validate input
|
|
CRTAPPT(ELGARRAY,SDAPPTSTARTDTTM,SDAPPTENDDTTM,SDPATIENTDFN,SDRESOURCE,SDATYPID,SDDDTTM,SDEXTID,SDAPPTREQTYPE,SDPROVIEN,SDCLNID,SDNOTE,SDAPPTYPE,SDEESTAT,SDAPPTLENGTH,SDEAS) | ; Create Appt
|
|
BUILDJSON(JSONRETURN,INPUT) | ; Build JSON format
|
|
CLEANUP | ; Cleanup
|
Name | Field # of Occurrence |
---|---|
$$GET1^DIQ | VALIDATE+71, VALIDATE+72 |
$$ISOTFM^SDAMUTDT | VALIDATE+6, VALIDATE+13, VALIDATE+41 |
$$SDECADD^SDEC07 | CRTAPPT+5 |
ERRLOG^SDESJSON | VALIDATE+5, VALIDATE+7, VALIDATE+12, VALIDATE+14, VALIDATE+15, VALIDATE+20, VALIDATE+21, VALIDATE+26, VALIDATE+27, VALIDATE+28 , VALIDATE+31, VALIDATE+42, VALIDATE+47, VALIDATE+48, VALIDATE+49, VALIDATE+55, VALIDATE+59, VALIDATE+60, VALIDATE+77, VALIDATE+82 |
$$EASVALIDATE^SDESUTIL | VALIDATE+81 |
ENCODE^XLFJSON | BUILDJSON+2 |
FileNo | Call Tags |
---|---|
^SDWL(409.3 - [#409.3] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DPT - [#2] | VALIDATE+21 |
^GMR(123 - [#123] | VALIDATE+53 |
^SC - [#44] | VALIDATE+60 |
^SD(403.5 - [#403.5] | VALIDATE+52 |
^SD(409.1 - [#409.1] | VALIDATE+66 |
^SDEC(409.831 - [#409.831] | VALIDATE+27, VALIDATE+28, VALIDATE+29, VALIDATE+30 |
^SDEC(409.85 - [#409.85] | VALIDATE+54 |
^SDWL(409.3 - [#409.3] | VALIDATE+51 |
^VA(200 - [#200] | VALIDATE+85 |
Name | Line Occurrences |
---|---|
$$CRTAPPT | ARSET+32 |
$$VALIDATE | ARSET+30 |
BUILDJSON | ARSET+35 |
CLEANUP | ARSET+36 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
APTFIELDSARRAY | ARSET+28*, ARSET+32, ARSET+33, CLEANUP+1! |
APTRETURN | ARSET~, ARSET+35 |
ELGARRAY | CRTAPPT~, CRTAPPT+10 |
ELGARRAY("Appointment" | CRTAPPT+3*, CRTAPPT+4*, CRTAPPT+7*, CRTAPPT+8*, CRTAPPT+9* |
ELGFIELDSARRAY | ARSET+26~ |
ERRORFLAG | VALIDATE+1~, VALIDATE+5*, VALIDATE+7*, VALIDATE+12*, VALIDATE+14*, VALIDATE+15*, VALIDATE+20*, VALIDATE+21*, VALIDATE+26*, VALIDATE+27* , VALIDATE+28*, VALIDATE+31*, VALIDATE+42*, VALIDATE+47*, VALIDATE+48*, VALIDATE+49*, VALIDATE+55*, VALIDATE+59*, VALIDATE+60*, VALIDATE+77* , VALIDATE+82*, VALIDATE+88, CLEANUP+2! |
ERRORS | VALIDATE~, VALIDATE+5, VALIDATE+7, VALIDATE+12, VALIDATE+14, VALIDATE+15, VALIDATE+20, VALIDATE+21, VALIDATE+26, VALIDATE+27 , VALIDATE+28, VALIDATE+31, VALIDATE+42, VALIDATE+47, VALIDATE+48, VALIDATE+49, VALIDATE+55, VALIDATE+59, VALIDATE+60, VALIDATE+77 , VALIDATE+82 |
HASDATA | CRTAPPT+1~, CRTAPPT+10*, CRTAPPT+11, CLEANUP+3! |
HASFIELDS | ARSET+26~, ARSET+28*, ARSET+32*, ARSET+33, CLEANUP+1! |
HASVLDERRORS | ARSET+26~, ARSET+30*, ARSET+31, ARSET+32, CLEANUP+1! |
INPUT | BUILDJSON~ |
JSONERROR | BUILDJSON+1*, CLEANUP+4! |
JSONRETURN | BUILDJSON~ |
RETURN | ARSET+26~, ARSET+28*, ARSET+31*, ARSET+33*, ARSET+35, CLEANUP+1! |
SDAPPTENDDTTM | ARSET~, ARSET+30, ARSET+32, VALIDATE~, VALIDATE+11*, VALIDATE+12, VALIDATE+13*, VALIDATE+14, VALIDATE+15, VALIDATE+16* , CRTAPPT~, CRTAPPT+5 |
SDAPPTLENGTH | ARSET~, ARSET+30, ARSET+32, VALIDATE~, VALIDATE+76*, VALIDATE+77, CRTAPPT~, CRTAPPT+5 |
SDAPPTREQTYPE | ARSET~, ARSET+30, ARSET+32, VALIDATE~, VALIDATE+46*, VALIDATE+47, VALIDATE+48, VALIDATE+49, VALIDATE+50, VALIDATE+51* , VALIDATE+52*, VALIDATE+53*, VALIDATE+54*, VALIDATE+55, VALIDATE+71, VALIDATE+72, CRTAPPT~, CRTAPPT+5 |
SDAPPTSTARTDTTM | ARSET~, ARSET+30, ARSET+32, VALIDATE~, VALIDATE+4*, VALIDATE+5, VALIDATE+6*, VALIDATE+7, VALIDATE+8, VALIDATE+16* , VALIDATE+43, CRTAPPT~, CRTAPPT+5 |
SDAPPTYPE | ARSET~, ARSET+30, ARSET+32, VALIDATE~, VALIDATE+66*, CRTAPPT~, CRTAPPT+5 |
SDATYPID | ARSET~, ARSET+30, ARSET+32, VALIDATE~, VALIDATE+35*, VALIDATE+36, VALIDATE+37*, VALIDATE+43, CRTAPPT~, CRTAPPT+5 |
SDCLNID | ARSET~, ARSET+30, ARSET+32, VALIDATE~, VALIDATE+6, VALIDATE+13, VALIDATE+41, VALIDATE+58*, VALIDATE+59, VALIDATE+60 , CRTAPPT~, CRTAPPT+5 |
SDDDTTM | ARSET~, ARSET+30, ARSET+32, VALIDATE~, VALIDATE+40*, VALIDATE+41*, VALIDATE+42, VALIDATE+43*, CRTAPPT~, CRTAPPT+5 |
SDEAS | ARSET~, ARSET+30, ARSET+32, VALIDATE~, VALIDATE+80*, VALIDATE+81*, VALIDATE+82, CRTAPPT~, CRTAPPT+5 |
SDECAPPTID | CRTAPPT+1~, CRTAPPT+2*, CRTAPPT+5*, CRTAPPT+6, CRTAPPT+8 |
SDECERR | VALIDATE+1~, VALIDATE+24* |
SDECRNOD | ARSET+27~, VALIDATE+30*, VALIDATE+31, CLEANUP+1! |
SDECTMP | VALIDATE+1~, VALIDATE+16* |
SDECWKIN | ARSET+27~, VALIDATE+34*, VALIDATE+36*, CLEANUP+1! |
SDEESTAT | ARSET~, ARSET+30, ARSET+32, VALIDATE~, VALIDATE+69*, VALIDATE+70, VALIDATE+71*, VALIDATE+72*, VALIDATE+73*, CRTAPPT~ , CRTAPPT+5 |
SDEXTID | ARSET~, ARSET+30, ARSET+32, VALIDATE~, VALIDATE+86*, CRTAPPT~, CRTAPPT+5 |
SDNOTE | ARSET~, ARSET+30, ARSET+32, VALIDATE~, VALIDATE+63*, CRTAPPT~, CRTAPPT+5 |
SDPATIENTDFN | ARSET~, ARSET+30, ARSET+32, VALIDATE~, VALIDATE+19*, VALIDATE+20, VALIDATE+21, CRTAPPT~, CRTAPPT+5 |
SDPROVIEN | ARSET~, ARSET+30, ARSET+32, VALIDATE~, VALIDATE+85*, CRTAPPT~, CRTAPPT+5 |
SDRESOURCE | ARSET~, ARSET+30, ARSET+32, VALIDATE~, VALIDATE+25*, VALIDATE+26, VALIDATE+27, VALIDATE+28, VALIDATE+29, CRTAPPT~ , CRTAPPT+5 |
SDRESOURCED | ARSET+27~, VALIDATE+29*, VALIDATE+30, CRTAPPT+5, CLEANUP+1! |
SDSAVESTRT | ARSET+27~, VALIDATE+8*, CRTAPPT+5, CLEANUP+1! |
VLDERRORS | ARSET+26~, ARSET+28*, ARSET+30, ARSET+31 |