SDEC32 ;ALB/SAT,DMR - VISTA SCHEDULING RPCS ;JUL 26, 2017
Source file <SDEC32.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 | 10 | SDCCRSEN SDEC SDEC01 SDEC04 SDEC07 SDEC57 SDESAPPTREQ2 SDESAPTREQ44 SDESCREATEAPPT2 SDESCREATEAPPT44 |
| Text Integration Utility | 1 | TIUCCHL7UT |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ERROR | ;
|
|
| ERR(SDECERR) | ;Error processing
|
|
| HOSPLOC(SDECY,SDECP,MAXREC,LSUB) | ;return HOSPITAL LOCATIONs
|
|
| CLINSET(SDECY,SDNOSLOT,SDIENS,SDECP,SDNOLET,MAXREC) | ;Returns CLINIC SETUP PARAMETERS for clinics that are active in the HOSPITAL LOCATION file
|
|
| PART | ||
| PROCESS(SDECIEN) | ;Process an individual clinic
|
|
| CHK(SDECP,SDECIEN) | ||
| GETSLOTS(SDDATA) | ;get slots - NUMBER OF PATIENTS in the AVAILABILITY multiple of file 44
|
|
| INACTIVE(SDCL,SDDT) | ;determine if clinic is active
; X=0=ACTIVE ; X=1=INACTIVE |
|
| PRIV(SDECY,CLINIEN,USER) | ;IS this USER in the PRIVILEGED USER multiple for the clinic
|
|
| BOOKHLDY(SDECY,SDECCL) | ; Returns can book on holiday flag for a clinic. 12/1/17 wtc 679
|
|
| VVCSTPCD(STOPCD) | ;
; Called from PROCES tag above |
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | GET1^DIQ |
| ^DIC(40.7 - [#40.7] | GET1^DIQ |
| ^SC - [#44] | GET1^DIQ, GETS^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^SC - [#44] | HOSPLOC+32, HOSPLOC+37, HOSPLOC+44, HOSPLOC+45, HOSPLOC+46, CLINSET+95, PART+2, PART+3, PROCESS+4, PROCESS+38 , PROCESS+39, PROCESS+40, INACTIVE+7, PRIV+13, PRIV+16, BOOKHLDY+9 |
| ^SC("B" | HOSPLOC+29, HOSPLOC+30 |
| ^SC("C" | CHK+5, CHK+6 |
| ^SD(403.52 - [#403.52] | PROCESS+6 |
| ^SDEC(409.98 - [#409.98] | VVCSTPCD+14 |
| ^TMP("SDEC" | ERR+2*, HOSPLOC+19!, HOSPLOC+22*, HOSPLOC+52*, HOSPLOC+54*, HOSPLOC+55*, CLINSET+49!, CLINSET+67*, CLINSET+103*, CLINSET+104* |
| ^VA(200 - [#200] | PRIV+15 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CLINIEN | PRIV~, PRIV+12*, PRIV+13, PRIV+16 |
| DT | INACTIVE+4 |
| FND | CHK+2~, CHK+3*, CHK+5, CHK+6*, CHK+7 |
| LASTSUB | HOSPLOC+18~, HOSPLOC+50*, HOSPLOC+52 |
| LSUB | HOSPLOC~, HOSPLOC+26*, HOSPLOC+27, HOSPLOC+28, HOSPLOC+30* |
| MAXREC | HOSPLOC~, HOSPLOC+25*, HOSPLOC+29, HOSPLOC+30, CLINSET~, CLINSET+72*, PART+2, PART+3 |
| N21 | INACTIVE+3~, INACTIVE+9*, INACTIVE+11, INACTIVE+12 |
| N25 | INACTIVE+3~, INACTIVE+10*, INACTIVE+13 |
| RETURN | VVCSTPCD+9~, VVCSTPCD+11*, VVCSTPCD+14*, VVCSTPCD+15 |
| SDA | CLINSET+46~, PROCESS+16*, PROCESS+17, PROCESS+18, PROCESS+19, PROCESS+21, PROCESS+22, PROCESS+23, PROCESS+24, PROCESS+25 , PROCESS+26, PROCESS+27, PROCESS+28, PROCESS+29, PROCESS+30, PROCESS+31, PROCESS+44 |
| SDAPLEN | CLINSET+46~, PROCESS+17*, PROCESS+50 |
| SDAR | CLINSET+46~ |
| SDAR( | CLINSET+97, CLINSET+98, CLINSET+99, CLINSET+100, PROCESS+55* |
| SDARR1 | CLINSET+48~ |
| SDARR1( | PROCESS+14, PROCESS+15* |
| SDCL | INACTIVE~, INACTIVE+7 |
| SDCNT | CLINSET+47~, CLINSET+50*, PART+2, PART+3, PROCESS+56* |
| SDCRSTOP | PROCESS+3~, PROCESS+44*, PROCESS+46 |
| SDDATA | CLINSET+46~, PROCESS+9!, PROCESS+37, GETSLOTS~ |
| SDDATA( | GETSLOTS+5, GETSLOTS+7, GETSLOTS+9 |
| SDDATA(44 | PROCESS+12, PROCESS+13 |
| SDDI | PROCESS+2~, PROCESS+21*, PROCESS+52 |
| SDDT | GETSLOTS+3~, GETSLOTS+6*, GETSLOTS+7*, GETSLOTS+8*, GETSLOTS+9, INACTIVE~, INACTIVE+4*, INACTIVE+5*, INACTIVE+12, INACTIVE+13 |
| SDDUP | HOSPLOC+17~, HOSPLOC+56! |
| SDDUP( | HOSPLOC+38, HOSPLOC+39* |
| SDECABR | PROCESS+2~, PROCESS+28*, PROCESS+52 |
| SDECCL | BOOKHLDY~, BOOKHLDY+8, BOOKHLDY+9 |
| SDECCRV | CLINSET+47~, PROCESS+32*, PROCESS+48 |
| SDECDAT | CLINSET+47~, CLINSET+69*, PROCESS+24*, PROCESS+50 |
| SDECDATN | CLINSET+47~, CLINSET+69*, PROCESS+25*, PROCESS+50 |
| SDECERR | ERR~ |
| SDECHPRV | CLINSET+47~, PROCESS+38*, PROCESS+50 |
| SDECI | ERR+1*, ERR+2, HOSPLOC+16~, HOSPLOC+21*, HOSPLOC+22, HOSPLOC+29, HOSPLOC+30, HOSPLOC+51*, HOSPLOC+52, HOSPLOC+54 , HOSPLOC+55, CLINSET+46~, CLINSET+54*, CLINSET+67, CLINSET+102*, CLINSET+103, CLINSET+104 |
| SDECIEN | HOSPLOC+16~, HOSPLOC+30*, HOSPLOC+31, HOSPLOC+32, HOSPLOC+33, HOSPLOC+34, HOSPLOC+35, HOSPLOC+36, HOSPLOC+37, HOSPLOC+38 , HOSPLOC+39, HOSPLOC+41, HOSPLOC+44, HOSPLOC+45, HOSPLOC+46, HOSPLOC+50, HOSPLOC+52, HOSPLOC+54, CLINSET+46~, CLINSET+76* , CLINSET+77, CLINSET+95*, CLINSET+96, PART+3*, PROCESS~, PROCESS+4, PROCESS+6, PROCESS+7, PROCESS+11, PROCESS+12 , PROCESS+13, PROCESS+14, PROCESS+15, PROCESS+16, PROCESS+38, PROCESS+39, PROCESS+40, PROCESS+48, PROCESS+55, CHK~ , CHK+6 |
| SDECIEN1 | HOSPLOC+17~, HOSPLOC+45*, HOSPLOC+46 |
| SDECINA | HOSPLOC+16~, HOSPLOC+35*, HOSPLOC+52, CLINSET+46~, PROCESS+22* |
| SDECMOB | CLINSET+47~, PROCESS+30*, PROCESS+48 |
| SDECMULT | CLINSET+47~, PROCESS+34*, PROCESS+48 |
| SDECNAM | HOSPLOC+16~, HOSPLOC+27*, HOSPLOC+28*, HOSPLOC+29*, HOSPLOC+30, HOSPLOC+50, HOSPLOC+54, CLINSET+46~, CLINSET+47~, CLINSET+81* , CLINSET+86*, CLINSET+89*, CLINSET+92*, PART+2*, PART+3, PROCESS+2~, PROCESS+27*, PROCESS+29*, PROCESS+41, PROCESS+48 , PROCESS+55 |
| SDECNOD | HOSPLOC+16~, HOSPLOC+37*, HOSPLOC+40, CLINSET+46~ |
| SDECNOD1 | HOSPLOC+16~, HOSPLOC+46*, HOSPLOC+47 |
| SDECP | HOSPLOC~, HOSPLOC+24*, HOSPLOC+27, HOSPLOC+29, CLINSET~, CLINSET+79, CLINSET+81, CLINSET+95, PART+2, CHK~ , CHK+4, CHK+5 |
| SDECPCC | CLINSET+47~, PROCESS+36*, PROCESS+48 |
| SDECPROT | CLINSET+47~, PROCESS+39*, PROCESS+50 |
| SDECPRV | HOSPLOC+17~, HOSPLOC+43*, HOSPLOC+45, HOSPLOC+47*, HOSPLOC+52 |
| SDECREA | HOSPLOC+16~, HOSPLOC+36*, HOSPLOC+52, CLINSET+46~, PROCESS+23* |
| SDECREQ | CLINSET+47~, PROCESS+35*, PROCESS+48 |
| SDECSCOD | HOSPLOC+16~, HOSPLOC+41*, HOSPLOC+52 |
| SDECVSC | CLINSET+47~, PROCESS+33*, PROCESS+48 |
| SDECY | HOSPLOC~, HOSPLOC+20*, CLINSET~, CLINSET+53*, PRIV~, PRIV+9*, PRIV+10, PRIV+11, PRIV+13, PRIV+15 , PRIV+18, BOOKHLDY~, BOOKHLDY+7*, BOOKHLDY+9* |
| SDF | CLINSET+46~, CLINSET+51*, CLINSET+83*, CLINSET+86*, CLINSET+89*, CLINSET+92*, PROCESS+29, PROCESS+55 |
| SDFIELDS | CLINSET+46~, PROCESS+10*, PROCESS+11 |
| SDH | PROCESS+2~, PROCESS+31*, PROCESS+52 |
| SDHDB | PROCESS+2~, PROCESS+19*, PROCESS+20*, PROCESS+52 |
| SDI | CLINSET+46~, CLINSET+98*, CLINSET+99, CLINSET+100, PROCESS+2~, PROCESS+40*, GETSLOTS+3~, GETSLOTS+5*, GETSLOTS+6, GETSLOTS+7 , GETSLOTS+9 |
| SDI1 | PROCESS+2~, PROCESS+40* |
| SDIENS | CLINSET~, CLINSET+74, CLINSET+75, CLINSET+76, CLINSET+95 |
| SDJ | CLINSET+46~, CLINSET+99*, CLINSET+100 |
| SDK | CLINSET+46~, CLINSET+75*, CLINSET+76 |
| SDL | CLINSET+47~, CLINSET+97*, CLINSET+98, CLINSET+99, CLINSET+100 |
| SDMAX | CLINSET+47~, CLINSET+50*, CLINSET+101, PART+2*, PART+3* |
| SDMSG | PROCESS+9! |
| SDNAM | HOSPLOC+17~, HOSPLOC+40*, HOSPLOC+52 |
| SDNODI | INACTIVE+3~, INACTIVE+7*, INACTIVE+8, INACTIVE+9, INACTIVE+10 |
| SDNOLET | CLINSET~, CLINSET+71*, PROCESS+6 |
| SDNOSLOT | CLINSET~, CLINSET+70*, PROCESS+10, PROCESS+37 |
| SDR | CHK+2~, CHK+6* |
| SDREF | CLINSET+48~, CLINSET+84*, CLINSET+87*, CLINSET+90*, CLINSET+93*, PART+1, PART+2, PART+3 |
| SDRET | PRIV+8~, PRIV+16*, PRIV+17*, PRIV+18 |
| SDSLOTS | CLINSET+46~, PROCESS+8*, PROCESS+37*, PROCESS+50, GETSLOTS+3~, GETSLOTS+4*, GETSLOTS+9*, GETSLOTS+10 |
| SDSP | PROCESS+2~, PROCESS+40*, PROCESS+52 |
| SDSTOP | PROCESS+2~, PROCESS+26*, PROCESS+45, PROCESS+52 |
| SDTMP | CLINSET+46~, CLINSET+56*, CLINSET+58*, CLINSET+60*, CLINSET+62*, CLINSET+64*, CLINSET+66*, CLINSET+67, CLINSET+100*, CLINSET+101* , CLINSET+103, PROCESS+48*, PROCESS+50*, PROCESS+52*, PROCESS+54*, PROCESS+55 |
| SDV | CLINSET+48~, CLINSET+52*, PROCESS+41*, PROCESS+42*, PROCESS+52 |
| SDVAPL | CLINSET+46~, PROCESS+18*, PROCESS+50 |
| SDVVC | PROCESS+3~, PROCESS+43*, PROCESS+45*, PROCESS+46*, PROCESS+54 |
| SDX | CHK+2~, CHK+4*, CHK+5*, CHK+6 |
| SDXT | CLINSET+48~, CLINSET+81*, CLINSET+86, CLINSET+89, CLINSET+92 |
| STOP | VVCSTPCD+9~, VVCSTPCD+12*, VVCSTPCD+13, VVCSTPCD+14 |
| STOPCD | VVCSTPCD~, VVCSTPCD+8, VVCSTPCD+12 |
| U | HOSPLOC+40, HOSPLOC+47, HOSPLOC+52, HOSPLOC+54, CLINSET+101, PROCESS+42, PROCESS+48, PROCESS+50, PROCESS+52, PROCESS+54 , INACTIVE+9, INACTIVE+10, PRIV+17 |
| USER | PRIV~, PRIV+14*, PRIV+15, PRIV+16 |
| X | HOSPLOC+18~, INACTIVE+3~, INACTIVE+6*, INACTIVE+11*, INACTIVE+12*, INACTIVE+13*, INACTIVE+14 |