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 |
| 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 |