SDECAR ;ALB/SAT,MGD,KML,BLB,LAB,AGW - VISTA SCHEDULING RPCS ;Nov 21, 2023
Source file <SDECAR.m>
| 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 |
|---|---|---|
| ARCLOSE(RET,INP) | ;Appointment Request Close
|
|
| AROPEN(RET,ARAPP,ARIEN,ARDDT) | ;SET Appointment Request Open/re-open
|
|
| ARX | ||
| UPDATEMRTCSEQNUM(PARENTREQUESTIEN,DFN) | ;
|
|
| FNUM(RET) | ;file number
|
|
| ARPCSET(SDECY,INP,ARIEN) | ;SET update patient contacts in SDEC APPT REQUEST file
|
|
| ARDGET(SDECY) | ;get values for disposition field of SDEC APPT REQUEST file
|
|
| ARMRTGET(SDECY,ARIEN) | ;GET number of entries and values in MRTC CALC PREF DATES
|
|
| ARMULT(SDECY,ARIEN,MULT) | ;SET MULT APPTS MADE multiple in SDEC APPT REQUEST file. All entries are removed and replaced by the values in MULT
|
|
| ARMRTSET(SDECY,ARIEN,MRTC) | ;SET MRTC CALC PREF DATES dates - clears the multiple and sets the new ones that are passed into MRTC
|
|
| MT(ARIEN) | ; clear out existing MRTC CALC PREF DATES
|
|
| MT1(ARIEN) | ; clear out existing MULT APPTS MADE
|
|
| ARMRTC(RET,ARIEN) | ;GET the number of MRTC appointments made for this request
|
|
| MRTC(ARIEN) | ;
|
|
| ARAPPT(SDECY,SDAPPT) | ;GET appointment request for given SDEC APPOINTMENT id
|
|
| AUDITGET(SDECY,ARIEN) | ;GET entries from VS AUDIT field of SDEC APPT REQUEST file 409.85
|
|
| CHECKLOCK(INP,RET) | ;check lock
|
| Name | Field # of Occurrence |
|---|---|
| ^%DT | ARCLOSE+40, AROPEN+25 |
| $$GET1^DID | ARDGET+21 |
| FILE^DIE | AROPEN+41, AROPEN+65, AROPEN+70, AROPEN+77, UPDATEMRTCSEQNUM+12 |
| UPDATE^DIE | ARCLOSE+48, AROPEN+57 |
| ^DIK | MT+6, MT1+6 |
| $$GET1^DIQ | ARCLOSE+50, ARCLOSE+51, AROPEN+14, AROPEN+27, AROPEN+28, AROPEN+30, AROPEN+34, AROPEN+50, AROPEN+52, AROPEN+59 , AROPEN+60, UPDATEMRTCSEQNUM+4, UPDATEMRTCSEQNUM+5, ARAPPT+19, CHECKLOCK+3, CHECKLOCK+4 |
| GETS^DIQ | ARMRTGET+17, AUDITGET+13 |
| $$ORDERLOCKCHECK^SDEC07C | CHECKLOCK+5 |
| AR23^SDECAR2 | ARPCSET+18 |
| AR433^SDECAR2 | ARMULT+26 |
| AR435^SDECAR2 | ARMRTSET+19 |
| $$NETTOFM^SDECDATE | ARCLOSE+47 |
| ERR1^SDECERR | ARPCSET+17, ARPCSET+19 |
| ARDISP^SDECHL7 | ARCLOSE+59, ARCLOSE+60, ARCLOSE+61 |
| OP^XQCHK | ARCLOSE+12 |
| RPC Name | Call Tags |
|---|---|
| SDECAR ARMRTC | ARMRTC |
| SDECAR ARAPPT | ARAPPT |
| SDECAR AUDITGET | AUDITGET |
| SDECAR ARMULT | ARMULT |
| FileNo | Call Tags |
|---|---|
| ^SD(409.2 - [#409.2] | GET1^DIQ |
| ^SDEC(409.84 - [#409.84] | GET1^DIQ |
| ^SDEC(409.85 - [#409.85] | GET1^DID, GET1^DIQ, GETS^DIQ |
| 409.8545 | GETS^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^SDEC(409.84 - [#409.84] | AROPEN+13, ARAPPT+18 |
| ^SDEC(409.85 - [#409.85] | ARCLOSE+58, AROPEN+22, AROPEN+33, AROPEN+68, AROPEN+75, UPDATEMRTCSEQNUM+3, ARPCSET+17, ARMRTGET+16, ARMULT+20, ARMRTSET+15 , MT+2, MT1+2, ARMRTC+10, MRTC+3, AUDITGET+10, AUDITGET+11 |
| ^TMP( | ARCLOSE+63 |
| ^TMP("SDEC" | ARDGET+17! |
| ^TMP($J | ARCLOSE+62 |
| ^VA(200 - [#200] | ARCLOSE+37, ARCLOSE+38 |
| Name | Line Occurrences |
|---|---|
| $$FNUM | ARCLOSE+42 |
| $$MRTC | ARMRTC+12 |
| ARX | AROPEN+18 |
| CHECKLOCK | ARCLOSE+13 |
| MT | ARMRTSET+18 |
| MT1 | ARMULT+22 |
| UPDATEMRTCSEQNUM | ARCLOSE+51, AROPEN+59 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %DT | ARCLOSE+40*, AROPEN+6~, AROPEN+25* |
| ARAPP | AROPEN~, AROPEN+12*, AROPEN+13, AROPEN+14, AROPEN+50 |
| ARDATA | ARMRTGET+7~, AUDITGET+1~, AUDITGET+12! |
| ARDATA( | ARMRTGET+18, ARMRTGET+20 |
| ARDDT | AROPEN~, AROPEN+24*, AROPEN+25, AROPEN+48 |
| ARDISP | ARCLOSE+9~, ARCLOSE+17*, ARCLOSE+18, ARCLOSE+21*, ARCLOSE+22*, ARCLOSE+23*, ARCLOSE+24*, ARCLOSE+25*, ARCLOSE+26*, ARCLOSE+27* , ARCLOSE+28*, ARCLOSE+29*, ARCLOSE+30*, ARCLOSE+31*, ARCLOSE+32*, ARCLOSE+33, ARCLOSE+45, ARCLOSE+59, ARCLOSE+60, ARCLOSE+61 |
| ARDISPBY | ARCLOSE+9~, ARCLOSE+36*, ARCLOSE+37*, ARCLOSE+38, ARCLOSE+44 |
| ARDISPDT | ARCLOSE+9~, ARCLOSE+40*, ARCLOSE+43 |
| ARFDA | ARCLOSE+9~, ARCLOSE+42*, ARCLOSE+43, ARCLOSE+44, ARCLOSE+45, ARCLOSE+46, ARCLOSE+47, AROPEN+6~, AROPEN+44*, AROPEN+45 , AROPEN+46, AROPEN+47, AROPEN+48, AROPEN+55 |
| ARFDA( | ARCLOSE+42, AROPEN+44 |
| ARIEN | ARCLOSE+9~, ARCLOSE+15*, ARCLOSE+42, ARCLOSE+50, ARCLOSE+51, ARCLOSE+58, ARCLOSE+59, ARCLOSE+60, ARCLOSE+61, ARCLOSE+62 , AROPEN~, AROPEN+16, AROPEN+17*, AROPEN+20*, AROPEN+21, AROPEN+22, AROPEN+27, AROPEN+28, AROPEN+30, AROPEN+33 , AROPEN+37, AROPEN+38, AROPEN+39, AROPEN+40, AROPEN+44, AROPEN+59, AROPEN+68, AROPEN+75, AROPEN+82, ARPCSET~ , ARPCSET+16*, ARPCSET+17, ARPCSET+18, ARMRTGET~, ARMRTGET+14*, ARMRTGET+15, ARMRTGET+16, ARMRTGET+17, ARMULT~, ARMULT+18* , ARMULT+19, ARMULT+20, ARMULT+22, ARMULT+26, ARMRTSET~, ARMRTSET+13*, ARMRTSET+14, ARMRTSET+15, ARMRTSET+18, ARMRTSET+19 , MT~, MT+2, MT+3, MT+5, MT1~, MT1+2, MT1+3, MT1+5, ARMRTC~, ARMRTC+9* , ARMRTC+10, ARMRTC+12, MRTC~, MRTC+3, AUDITGET~, AUDITGET+9*, AUDITGET+10, AUDITGET+11, AUDITGET+13, AUDITGET+14 , AUDITGET+15 |
| ARMSG | ARCLOSE+9~, AROPEN+6~ |
| ARMSG("DIERR" | ARCLOSE+53, ARCLOSE+54, ARCLOSE+56, AROPEN+80, AROPEN+81, AROPEN+82 |
| ARMSG1 | ARPCSET+11~, ARPCSET+19 |
| ARRET | ARCLOSE+9~ |
| CHILD | UPDATEMRTCSEQNUM+1~ |
| CHILD( | UPDATEMRTCSEQNUM+7*, UPDATEMRTCSEQNUM+10, UPDATEMRTCSEQNUM+11 |
| CHILDIEN | AROPEN+31~, AROPEN+32*, AROPEN+33*, AROPEN+34 |
| COUNT | UPDATEMRTCSEQNUM+1~, UPDATEMRTCSEQNUM+2*, UPDATEMRTCSEQNUM+6*, UPDATEMRTCSEQNUM+7 |
| DA | MT+1~, MT+4*, MT1+1~, MT1+4* |
| DA(1 | MT+5*, MT1+5* |
| DFN | UPDATEMRTCSEQNUM~, UPDATEMRTCSEQNUM+3, CHECKLOCK+4*, CHECKLOCK+5 |
| DIERR | ARDGET+15~ |
| DIK | MT+1~, MT+3*, MT1+1~, MT1+3* |
| DT | ARCLOSE+40 |
| DUZ | ARCLOSE+36 |
| ERR | UPDATEMRTCSEQNUM+1~ |
| FDA | AROPEN+26~, AROPEN+41!, AROPEN+65!, AROPEN+70!, AROPEN+77!, UPDATEMRTCSEQNUM+1~ |
| FDA( | AROPEN+37*, AROPEN+38*, AROPEN+39*, AROPEN+40*, AROPEN+61*, AROPEN+62*, AROPEN+63*, AROPEN+64*, AROPEN+69*, AROPEN+76* , UPDATEMRTCSEQNUM+11* |
| FOUND | AROPEN+31~, AROPEN+32*, AROPEN+33, AROPEN+34*, AROPEN+36 |
| IENS | UPDATEMRTCSEQNUM+1~ |
| INP | ARCLOSE~, ARCLOSE+13, ARPCSET~, ARPCSET+18, CHECKLOCK~ |
| INP(1 | ARCLOSE+10, ARCLOSE+15, CHECKLOCK+3, CHECKLOCK+4, CHECKLOCK+5 |
| INP(2 | ARCLOSE+17 |
| INP(3 | ARCLOSE+36 |
| INP(4 | ARCLOSE+40 |
| INP(5 | ARCLOSE+47 |
| LASTCHILD | UPDATEMRTCSEQNUM+1~, UPDATEMRTCSEQNUM+2* |
| MI | ARCLOSE+9~, ARCLOSE+54*, AROPEN+81* |
| MRTC | ARMRTSET~, ARMRTSET+16*, ARMRTSET+17, ARMRTSET+19 |
| MRTC1 | ARMRTSET+8~ |
| MRTCFLG | AROPEN+26~, AROPEN+28*, AROPEN+29, AROPEN+54, AROPEN+73 |
| MULT | ARMULT~, ARMULT+21*, ARMULT+23, ARMULT+24, ARMULT+25 |
| MULT1 | ARMULT+13~, ARMULT+25*, ARMULT+26 |
| NEXTSEQUENCENUM | UPDATEMRTCSEQNUM+1~ |
| PARENTREQUESTIEN | AROPEN+26~, AROPEN+27*, AROPEN+29, AROPEN+54, AROPEN+58, AROPEN+59, AROPEN+60, AROPEN+61, AROPEN+62, AROPEN+63 , AROPEN+64, AROPEN+68, AROPEN+69, AROPEN+73, AROPEN+75, AROPEN+76, UPDATEMRTCSEQNUM~, UPDATEMRTCSEQNUM+4 |
| POP | ARCLOSE+9~, ARCLOSE+11*, ARCLOSE+13, CHECKLOCK+5*, CHECKLOCK+6 |
| REOPENYN | AROPEN+26~, AROPEN+52*, AROPEN+53, AROPEN+73 |
| REQTYP | CHECKLOCK+1~, CHECKLOCK+3*, CHECKLOCK+5 |
| REQUESTIEN | UPDATEMRTCSEQNUM+1~, UPDATEMRTCSEQNUM+2*, UPDATEMRTCSEQNUM+3*, UPDATEMRTCSEQNUM+4, UPDATEMRTCSEQNUM+5, UPDATEMRTCSEQNUM+7, UPDATEMRTCSEQNUM+9*, UPDATEMRTCSEQNUM+10*, UPDATEMRTCSEQNUM+11 |
| RET | ARCLOSE~, ARCLOSE+10*, ARCLOSE+13, ARCLOSE+15*, ARCLOSE+18*, ARCLOSE+34*, ARCLOSE+38*, ARCLOSE+41*, ARCLOSE+54*, ARCLOSE+55* , ARCLOSE+63*, AROPEN~, AROPEN+7*, AROPEN+8, AROPEN+10, AROPEN+15, AROPEN+16, AROPEN+21, AROPEN+22, AROPEN+25 , AROPEN+81, AROPEN+82, ARX, FNUM~, FNUM+1*, FNUM+2, ARMRTC~, ARMRTC+6*, ARMRTC+7, ARMRTC+10 , ARMRTC+11, ARMRTC+12, CHECKLOCK~, CHECKLOCK+6* |
| RETURN | CHECKLOCK+1~, CHECKLOCK+2*, CHECKLOCK+5 |
| SDAPPT | ARAPPT~, ARAPPT+16*, ARAPPT+17, ARAPPT+18, ARAPPT+19 |
| SDART | AROPEN+6~, AROPEN+14*, AROPEN+15, AROPEN+16, AROPEN+17 |
| SDC | ARMRTGET+7~, ARMRTGET+8*, ARMRTGET+19*, ARMRTGET+21, ARMRTC+5~, ARMRTC+8*, MRTC+1~, MRTC+2*, MRTC+4*, MRTC+5 |
| SDCANRSN | AROPEN+26~, AROPEN+50*, AROPEN+52 |
| SDECI | AROPEN+6~, AROPEN+9*, AROPEN+10, AROPEN+15*, AROPEN+16*, AROPEN+21*, AROPEN+22*, AROPEN+25*, AROPEN+81*, AROPEN+82* , ARX, ARPCSET+11~, ARPCSET+14*, ARPCSET+15, ARPCSET+17, ARPCSET+19, ARPCSET+20*, ARDGET+15~, ARDGET+16*, ARDGET+20 , ARDGET+25*, ARDGET+26, ARMRTGET+7~, ARMRTGET+9*, ARMRTGET+20*, ARMRTGET+22, ARMRTC+5~, ARMRTC+8*, ARMRTC+11, ARAPPT+11~ , ARAPPT+14*, ARAPPT+15, ARAPPT+22*, AUDITGET+1~, AUDITGET+4*, AUDITGET+7, AUDITGET+17*, AUDITGET+18 |
| SDECY | ARPCSET~, ARPCSET+12*, ARPCSET+13, ARPCSET+15, ARPCSET+17, ARPCSET+19, ARPCSET+20, ARDGET~, ARDGET+18*, ARDGET+20 , ARDGET+25, ARDGET+26, ARMRTGET~, ARMRTGET+10*, ARMRTGET+11, ARMRTGET+13, ARMRTGET+15, ARMRTGET+16, ARMRTGET+20, ARMRTGET+21 , ARMRTGET+22, ARMULT~, ARMULT+14*, ARMULT+15, ARMULT+17, ARMULT+19, ARMULT+20, ARMULT+23, ARMULT+27, ARMRTSET~ , ARMRTSET+9*, ARMRTSET+10, ARMRTSET+12, ARMRTSET+14, ARMRTSET+15, ARMRTSET+17, ARMRTSET+20, ARAPPT~, ARAPPT+12*, ARAPPT+13 , ARAPPT+15, ARAPPT+17, ARAPPT+18, ARAPPT+22, AUDITGET~, AUDITGET+2*, AUDITGET+3, AUDITGET+7, AUDITGET+10, AUDITGET+17 , AUDITGET+18 |
| >> SDHL7IN("ORDE | R IEN" , ARCLOSE+63 |
| SDI | ARDGET+15~, ARDGET+22*, ARDGET+23, ARMRTGET+7~, ARMRTGET+18*, ARMRTGET+20, ARMULT+13~, ARMULT+24*, ARMULT+25, ARMRTSET+8~ , MT+1~, MT+2*, MT+4, MT1+1~, MT1+2*, MT1+4, ARMRTC+5~, MRTC+1~, MRTC+3*, AUDITGET+1~ , AUDITGET+11*, AUDITGET+13, AUDITGET+14, AUDITGET+15 |
| SDMSG | ARDGET+15~ |
| SDQ | AROPEN+6~, AROPEN+9*, AROPEN+15*, AROPEN+16*, AROPEN+18 |
| SDTMP | ARPCSET+11~, AUDITGET+1~, AUDITGET+5*, AUDITGET+6*, AUDITGET+7, AUDITGET+15*, AUDITGET+16*, AUDITGET+17 |
| SDTYP | ARAPPT+11~, ARAPPT+21*, ARAPPT+22 |
| SDX | ARDGET+15~, ARDGET+21*, ARDGET+22, ARDGET+23, ARAPPT+11~, ARAPPT+19*, ARAPPT+20, ARAPPT+21, AUDITGET+1~, AUDITGET+14* , AUDITGET+15, AUDITGET+16 |
| SDXI | ARDGET+15~, ARDGET+23*, ARDGET+24, ARDGET+25 |
| SDY | ARAPPT+11~, ARAPPT+20*, ARAPPT+21 |
| SUBIEN | AROPEN+26~, AROPEN+67*, AROPEN+68*, AROPEN+69, AROPEN+74*, AROPEN+75*, AROPEN+76 |
| U | ARCLOSE+13, ARCLOSE+58, AUDITGET+15, AUDITGET+16 |
| X | ARCLOSE+40*, AROPEN+6~, AROPEN+25* |
| XQOPT | ARCLOSE+9~, ARCLOSE+13 |
| Y | ARCLOSE+40, ARCLOSE+41, AROPEN+6~, AROPEN+25 |