SDECAR1A ;ALB/SAT,CT,RRM,LAB - VISTA SCHEDULING RPCS ;OCT 09,2023@08:59
Source file <SDECAR1A.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 |
| Package | Total | Caller Graph |
|---|---|---|
| Scheduling | 11 | SDEC51 SDEC51B SDEC52 SDEC52C SDEC52CJSON SDEC52CRMVJSON SDECAR1 SDECAR4 SDECCONSJSON SDECWL1 SDESARGET |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| WLPC(ARDATA,ASDIEN) | ;
|
|
| GETAPPTS(ARIEN) | ;Get Multiple Appts Made field from SDEC APPT REQUEST file entry ARIEN
|
|
| CHILDREN(ARIEN) | ;Returns children SDEC APPT REQUEST pointers based on MULT APPTS MADE
|
|
| CALLET(DFN,ARIEN) | ||
| CALLETX | ;EXIT CALLET
|
|
| CALLCON(DFN,SDREC) | ;GET CALL AND LETER DATA FOR A CONSULT CLT - SD*5.3*745
|
|
| CALLCONX | ;EXIT CALLCON
|
|
| CALLWL(DFN,WLIEN) | ;WAITING LIST CALLS AND LETTERS ;CLT - SD*5.3*745
|
|
| CALLWLX | ;EXIT CALLWL
|
|
| RECALL(DFN,RCIEN) | ;RECALL REMINDERS CALL & LETTER ;SD*5.3*745
|
|
| RECALLX | ;exit recall
|
|
| PIDDT(IN) | ;SUBTRACT ONE DAY FROM PID DATE and ADD .24 FOR TIME ; PWC - SD *5.3*745
|
|
| DOIT(SDIEN,APPTREQTYPE) | ;ACTUAL GET DATA SUBROUTINE
|
|
| ARDEMO(STR,DFN) |
| FileNo | Call Tags |
|---|---|
| ^GMR(123 - [#123] | GET1^DIQ |
| ^SD(403.5 - [#403.5] | GET1^DIQ |
| ^SDWL(409.3 - [#409.3] | GET1^DIQ |
| ^SDWL(409.32 - [#409.32] | GET1^DIQ |
| ^SDEC(409.85 - [#409.85] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^SDEC(409.85 - [#409.85] | GETAPPTS+3, GETAPPTS+4, GETAPPTS+5, GETAPPTS+6, CHILDREN+3, CHILDREN+4 |
| ^SDEC(409.86 - [#409.86] | DOIT+4, DOIT+6, DOIT+7, DOIT+9, DOIT+10, DOIT+11, DOIT+12, DOIT+13, DOIT+14 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | DOIT+11 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> %DT | PIDDT+2* |
| APPTREQTYPE | DOIT~, DOIT+4 |
| APPTS | GETAPPTS+1~, GETAPPTS+2*, GETAPPTS+6*, GETAPPTS+8 |
| ARDATA | WLPC~ |
| ARDATA( | WLPC+3, WLPC+6, WLPC+7, WLPC+8, WLPC+9, WLPC+10 |
| ARIEN | GETAPPTS~, GETAPPTS+3, GETAPPTS+4, GETAPPTS+5, GETAPPTS+6, CHILDREN~, CHILDREN+3, CHILDREN+4, CALLET~, CALLET+3 , CALLET+5, CALLET+6, CALLET+7, CALLET+8 |
| ASDIEN | WLPC~, WLPC+4 |
| CHILDS | CHILDREN+1~, CHILDREN+2*, CHILDREN+6*, CHILDREN+7 |
| CLINIC | CALLET+1~, CALLET+5*, CALLCON+1~, CALLCON+5*, CALLWL+1~, CALLWL+3*, RECALL+1~, RECALL+4* |
| DFN | CALLET~, CALLCON~, CALLWL~, RECALL~, ARDEMO~, ARDEMO+2 |
| I | GETAPPTS+1~, GETAPPTS+2*, GETAPPTS+5*, GETAPPTS+6 |
| IN | PIDDT~, PIDDT+2 |
| MULT | CHILDREN+1~, CHILDREN+4*, CHILDREN+6 |
| OUT | PIDDT+1~, PIDDT+3*, PIDDT+4 |
| PC | WLPC+1~, WLPC+2*, WLPC+11*, WLPC+12 |
| PC1 | WLPC+1~, WLPC+5*, WLPC+6*, WLPC+7*, WLPC+8*, WLPC+9*, WLPC+10*, WLPC+11 |
| PCIEN | WLPC+1~, WLPC+3*, WLPC+4, WLPC+6, WLPC+7, WLPC+8, WLPC+9, WLPC+10 |
| PID | CALLET+1~, CALLET+6*, CALLCON+1~, CALLCON+6*, CALLWL+1~, CALLWL+4*, RECALL+1~, RECALL+5* |
| PRIGRP | ARDEMO+1~, ARDEMO+7*, ARDEMO+72 |
| RCIEN | RECALL~, RECALL+4, RECALL+5, RECALL+7 |
| REQ | CHILDREN+1~ |
| REQTYPE | CALLET+1~, CALLET+3*, CALLET+4*, CALLCON+1~, CALLCON+3*, CALLWL+1~, CALLWL+2*, RECALL+1~, RECALL+3* |
| SDDEMO | ARDEMO+1~, ARDEMO+2 |
| SDDEMO("BADADD" | ARDEMO+24 |
| SDDEMO("DOB" | ARDEMO+4 |
| SDDEMO("ELIGIEN" | ARDEMO+8 |
| SDDEMO("ELIGNAME" | ARDEMO+9 |
| SDDEMO("GENDER" | ARDEMO+6 |
| SDDEMO("HPHONE" | ARDEMO+21 |
| SDDEMO("HRN" | ARDEMO+23 |
| SDDEMO("K2CITY" | ARDEMO+43 |
| SDDEMO("K2NAME" | ARDEMO+37 |
| SDDEMO("K2PHONE" | ARDEMO+39 |
| SDDEMO("K2REL" | ARDEMO+38 |
| SDDEMO("K2STATE" | ARDEMO+44 |
| SDDEMO("K2STREET" | ARDEMO+40 |
| SDDEMO("K2STREET2" | ARDEMO+41 |
| SDDEMO("K2STREET3" | ARDEMO+42 |
| SDDEMO("K2ZIP" | ARDEMO+45 |
| SDDEMO("KCITY" | ARDEMO+33 |
| SDDEMO("KNAME" | ARDEMO+27 |
| SDDEMO("KPHONE" | ARDEMO+29 |
| SDDEMO("KREL" | ARDEMO+28 |
| SDDEMO("KSTATE" | ARDEMO+34 |
| SDDEMO("KSTREET" | ARDEMO+30 |
| SDDEMO("KSTREET2" | ARDEMO+31 |
| SDDEMO("KSTREET3" | ARDEMO+32 |
| SDDEMO("KZIP" | ARDEMO+35 |
| SDDEMO("NAME" | ARDEMO+3 |
| SDDEMO("NOK" | ARDEMO+26 |
| SDDEMO("NOK2" | ARDEMO+36 |
| SDDEMO("OPHONE" | ARDEMO+25 |
| SDDEMO("PADDRES1" | ARDEMO+14 |
| SDDEMO("PADDRES2" | ARDEMO+15 |
| SDDEMO("PADDRES3" | ARDEMO+16 |
| SDDEMO("PCELL" | ARDEMO+64 |
| SDDEMO("PCITY" | ARDEMO+17 |
| SDDEMO("PCOUNTRY" | ARDEMO+19 |
| SDDEMO("PCOUNTY" | ARDEMO+46 |
| SDDEMO("PEMAIL" | ARDEMO+66 |
| SDDEMO("PETH" | ARDEMO+47 |
| SDDEMO("PFLOCAL" | ARDEMO+70 |
| SDDEMO("PFNATIONAL" | ARDEMO+69 |
| SDDEMO("PF_FFF" | ARDEMO+67 |
| SDDEMO("PF_VCD" | ARDEMO+68 |
| SDDEMO("PMARITAL" | ARDEMO+49 |
| SDDEMO("PPAGER" | ARDEMO+65 |
| SDDEMO("PRACE" | ARDEMO+48 |
| SDDEMO("PRELIGION" | ARDEMO+50 |
| SDDEMO("PRIGRP" | ARDEMO+7 |
| SDDEMO("PSTATE" | ARDEMO+18 |
| SDDEMO("PTACTIVE" | ARDEMO+51 |
| SDDEMO("PTADDRESS1" | ARDEMO+52 |
| SDDEMO("PTADDRESS2" | ARDEMO+53 |
| SDDEMO("PTADDRESS3" | ARDEMO+54 |
| SDDEMO("PTCITY" | ARDEMO+55 |
| SDDEMO("PTCOUNTRY" | ARDEMO+59 |
| SDDEMO("PTCOUNTY" | ARDEMO+60 |
| SDDEMO("PTEND" | ARDEMO+63 |
| SDDEMO("PTPHONE" | ARDEMO+61 |
| SDDEMO("PTSTART" | ARDEMO+62 |
| SDDEMO("PTSTATE" | ARDEMO+56 |
| SDDEMO("PTZIP" | ARDEMO+57 |
| SDDEMO("PTZIP+4" | ARDEMO+58 |
| SDDEMO("PZIP+4" | ARDEMO+20 |
| SDDEMO("SIMILAR" | ARDEMO+73 |
| SDDEMO("SSN" | ARDEMO+5 |
| SDDEMO("SUBGRP" | ARDEMO+71, ARDEMO+72 |
| SDDEMO("SVCCONN" | ARDEMO+10 |
| SDDEMO("SVCCONNP" | ARDEMO+11 |
| SDDEMO("TYPEIEN" | ARDEMO+12 |
| SDDEMO("TYPENAME" | ARDEMO+13 |
| >> SDECALL | CALLET+2*, CALLETX+1, CALLCON+2*, CALLCONX+1, CALLWL+2*, CALLWLX+1, RECALL+2*, RECALLX+1, DOIT+3*, DOIT+10* , DOIT+15*, DOIT+17 |
| SDECEMAIL | CALLET+1~, CALLET+2*, CALLETX+1, CALLCON+1~, CALLCON+2*, CALLCONX+1, RECALL+1~, RECALL+2*, RECALLX+1, DOIT+3* , DOIT+12*, DOIT+17 |
| SDECG | DOIT+1~, DOIT+6*, DOIT+8 |
| >> SDECLET | CALLET+2*, CALLETX+1, CALLCON+2*, CALLCONX+1, CALLWL+2*, CALLWLX+1, RECALL+2*, RECALLX+1, DOIT+3*, DOIT+11* , DOIT+15*, DOIT+16*, DOIT+17 |
| SDECLP | DOIT+1~, DOIT+2*, DOIT+8*, DOIT+9*, DOIT+10, DOIT+11, DOIT+12, DOIT+13, DOIT+14 |
| SDECM | DOIT+1~, DOIT+2*, DOIT+4*, DOIT+5, DOIT+6, DOIT+7, DOIT+9, DOIT+10, DOIT+11, DOIT+12 , DOIT+13, DOIT+14 |
| SDECMT | DOIT+1~ |
| SDECSEC | CALLET+2*, CALLETX+1, CALLCON+1~, CALLCON+2*, CALLCONX+1, RECALL+2*, RECALLX+1, DOIT+3*, DOIT+14*, DOIT+17 |
| SDECSUB | DOIT+1~, DOIT+7*, DOIT+8 |
| SDECTEXT | CALLET+1~, CALLET+2*, CALLETX+1, CALLCON+1~, CALLCON+2*, CALLCONX+1, RECALL+1~, RECALL+2*, RECALLX+1, DOIT+3* , DOIT+13*, DOIT+17 |
| SDESEC | CALLET+1~, RECALL+1~ |
| SDI | CHILDREN+1~, CHILDREN+3*, CHILDREN+4 |
| SDIEN | DOIT~ |
| SDREC | CALLCON~, CALLCON+3, CALLCON+5, CALLCON+6, CALLCON+7 |
| SERVICE | CALLET+1~, CALLET+7* |
| STR | ARDEMO~, ARDEMO+3*, ARDEMO+4*, ARDEMO+5*, ARDEMO+6*, ARDEMO+7*, ARDEMO+8*, ARDEMO+9*, ARDEMO+10*, ARDEMO+11* , ARDEMO+12*, ARDEMO+13*, ARDEMO+14*, ARDEMO+15*, ARDEMO+16*, ARDEMO+17*, ARDEMO+18*, ARDEMO+19*, ARDEMO+20*, ARDEMO+21* , ARDEMO+23*, ARDEMO+24*, ARDEMO+25*, ARDEMO+26*, ARDEMO+27*, ARDEMO+28*, ARDEMO+29*, ARDEMO+30*, ARDEMO+31*, ARDEMO+32* , ARDEMO+33*, ARDEMO+34*, ARDEMO+35*, ARDEMO+36*, ARDEMO+37*, ARDEMO+38*, ARDEMO+39*, ARDEMO+40*, ARDEMO+41*, ARDEMO+42* , ARDEMO+43*, ARDEMO+44*, ARDEMO+45*, ARDEMO+46*, ARDEMO+47*, ARDEMO+48*, ARDEMO+49*, ARDEMO+50*, ARDEMO+51*, ARDEMO+52* , ARDEMO+53*, ARDEMO+54*, ARDEMO+55*, ARDEMO+56*, ARDEMO+57*, ARDEMO+58*, ARDEMO+59*, ARDEMO+60*, ARDEMO+61*, ARDEMO+62* , ARDEMO+63*, ARDEMO+64*, ARDEMO+65*, ARDEMO+66*, ARDEMO+67*, ARDEMO+68*, ARDEMO+69*, ARDEMO+70*, ARDEMO+71*, ARDEMO+72* , ARDEMO+73* |
| U | GETAPPTS+6, CHILDREN+4, CALLETX+1, CALLCONX+1, CALLWLX+1, RECALLX+1, DOIT+7, DOIT+8, DOIT+10, DOIT+11 , DOIT+12, DOIT+13, DOIT+14, DOIT+17, ARDEMO+3, ARDEMO+4, ARDEMO+5, ARDEMO+6, ARDEMO+7, ARDEMO+8 , ARDEMO+9, ARDEMO+10, ARDEMO+11, ARDEMO+12, ARDEMO+13, ARDEMO+14, ARDEMO+15, ARDEMO+16, ARDEMO+17, ARDEMO+18 , ARDEMO+19, ARDEMO+20, ARDEMO+21, ARDEMO+23, ARDEMO+24, ARDEMO+25, ARDEMO+26, ARDEMO+27, ARDEMO+28, ARDEMO+29 , ARDEMO+30, ARDEMO+31, ARDEMO+32, ARDEMO+33, ARDEMO+34, ARDEMO+35, ARDEMO+36, ARDEMO+37, ARDEMO+38, ARDEMO+39 , ARDEMO+40, ARDEMO+41, ARDEMO+42, ARDEMO+43, ARDEMO+44, ARDEMO+45, ARDEMO+46, ARDEMO+47, ARDEMO+48, ARDEMO+49 , ARDEMO+50, ARDEMO+51, ARDEMO+52, ARDEMO+53, ARDEMO+54, ARDEMO+55, ARDEMO+56, ARDEMO+57, ARDEMO+58, ARDEMO+59 , ARDEMO+60, ARDEMO+61, ARDEMO+62, ARDEMO+63, ARDEMO+64, ARDEMO+65, ARDEMO+66, ARDEMO+67, ARDEMO+68, ARDEMO+69 , ARDEMO+70, ARDEMO+71, ARDEMO+72, ARDEMO+73 |
| >> WCLN | CALLWL+3* |
| WLIEN | CALLWL~, CALLWL+3, CALLWL+4, CALLWL+6 |
| X | PIDDT+1~, PIDDT+2* |
| X1 | PIDDT+1~, PIDDT+2*, PIDDT+3 |
| Y | PIDDT+1~, PIDDT+2 |