SDEC08A ;ALB/PWC - VISTA SCHEDULING RPCS ;Aug 10, 2020@09:30
Source file <SDEC08A.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 |
|---|---|---|
| AVUPDT(SDECSCD,SDECSTART,SDECLEN) | ;Update Clinic availability
|
|
| APCAN(SDECZ,SDECLOC,SDECDFN,SDECSD,SDECAPTID,SDECLEN) | ;
|
|
| SDECUCAN(SDECAPTID) | ;called internally to update SDEC APPOINTMENT by clearing cancel date/time
|
|
| APUCAN(SDECZ,SDECLOC,SDECPATID,SDECSTART,SDECDAM,SDECDEC,SDECLEN,SDECNOTE,SDECRES,SDECWKIN) | ;
|
|
| UNCANCEL(BSDR) | ;PEP; called to un-cancel appt
; Make call using: S ERR=$$UNCANCEL(.ARRAY) |
| FileNo | Call Tags |
|---|---|
| ^SDEC(409.84 - [#409.84] | GET1^DIQ |
| ^SC - [#44] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | APCAN+4, UNCANCEL+18 |
| ^SC - [#44] | AVUPDT+5, AVUPDT+6, AVUPDT+8, AVUPDT+10*, UNCANCEL+19 |
| ^VA(200 - [#200] | UNCANCEL+21 |
| Name | Line Occurrences |
|---|---|
| $$UNCANCEL | APUCAN+17 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %H | APCAN+2~, APCAN+14*, APUCAN+7~ |
| BSDR | UNCANCEL~ |
| BSDR("ADT" | UNCANCEL+20, UNCANCEL+23 |
| BSDR("CLN" | UNCANCEL+19, UNCANCEL+23 |
| BSDR("LEN" | UNCANCEL+23 |
| BSDR("NOTE" | UNCANCEL+23 |
| BSDR("PAT" | UNCANCEL+18, UNCANCEL+23 |
| BSDR("RES" | UNCANCEL+23 |
| BSDR("USR" | UNCANCEL+21 |
| BSDR("WKIN" | UNCANCEL+23 |
| DA | APCAN+2~, APCAN+7* |
| DIE | APCAN+2~, APCAN+6* |
| DPTNOD | UNCANCEL+17~ |
| DPTNODR | UNCANCEL+17~ |
| DPTST | APCAN+2~, APCAN+5*, APCAN+8 |
| DR | APCAN+2~, APCAN+8* |
| DUZ | APUCAN+13 |
| HSI | AVUPDT+2~, AVUPDT+6*, AVUPDT+8 |
| I | AVUPDT+2~, AVUPDT+4*, AVUPDT+5, AVUPDT+6, AVUPDT+8, AVUPDT+9* |
| PROVIEN | SDECUCAN+1~, SDECUCAN+9*, SDECUCAN+10 |
| S | AVUPDT+2~, AVUPDT+3*, AVUPDT+8*, AVUPDT+9*, AVUPDT+10 |
| SB | AVUPDT+2~, AVUPDT+6*, AVUPDT+8 |
| SD | AVUPDT+2~, AVUPDT+3*, AVUPDT+5, AVUPDT+8, AVUPDT+10 |
| SDAPTYP | SDECUCAN+1~, SDECUCAN+6*, SDECUCAN+7, SDECUCAN+10 |
| SDCL | SDECUCAN+1~, SDECUCAN+8*, SDECUCAN+9 |
| SDDIF | AVUPDT+2~, AVUPDT+6*, AVUPDT+9 |
| SDECAPTID | APCAN~, APCAN+7, SDECUCAN~, SDECUCAN+2, SDECUCAN+6, SDECUCAN+8 |
| SDECC | APCAN+2~, APCAN+19, APUCAN+7~, APUCAN+17 |
| SDECC("ADT" | APCAN+13*, APUCAN+10* |
| SDECC("CDT" | APCAN+15* |
| SDECC("CLN" | APCAN+11*, APUCAN+9* |
| SDECC("CR" | APCAN+17* |
| SDECC("LEN" | APUCAN+14* |
| SDECC("NOT" | APCAN+16* |
| SDECC("NOTE" | APUCAN+11* |
| SDECC("PAT" | APCAN+10*, APUCAN+8* |
| SDECC("RES" | APUCAN+12* |
| SDECC("TYP" | APCAN+12* |
| SDECC("USR" | APCAN+18*, APUCAN+13* |
| SDECC("WKIN" | APUCAN+15* |
| >> SDECCR | APCAN+17 |
| SDECDAM | APUCAN~ |
| >> SDECDATE | APCAN+15 |
| SDECDEC | APUCAN~ |
| SDECDFN | APCAN~, APCAN+10 |
| SDECERR | UNCANCEL+17~, UNCANCEL+23*, UNCANCEL+24 |
| >> SDECFDA( | SDECUCAN+3* |
| >> SDECI | UNCANCEL+23 |
| SDECIENS | SDECUCAN+1~, SDECUCAN+2*, SDECUCAN+3 |
| SDECLEN | AVUPDT~, AVUPDT+7, APCAN~, APCAN+8, APUCAN~, APUCAN+14 |
| SDECLOC | APCAN~, APCAN+11, APUCAN~, APUCAN+9 |
| SDECMSG | SDECUCAN+4! |
| >> SDECNOT | APCAN+16 |
| SDECNOTE | APUCAN~, APUCAN+11 |
| SDECPATID | APCAN+4, APUCAN~, APUCAN+8 |
| SDECPNOD | APCAN+2~, APCAN+4*, APCAN+5 |
| SDECRES | APUCAN~, APUCAN+12 |
| SDECSCD | AVUPDT~, AVUPDT+4, AVUPDT+10 |
| SDECSD | APCAN~, APCAN+4, APCAN+13 |
| SDECSTART | AVUPDT~, AVUPDT+3, APUCAN~, APUCAN+10 |
| >> SDECTYP | APCAN+12 |
| SDECWKIN | APUCAN~, APUCAN+15 |
| SDECZ | APCAN~, APCAN+19*, APUCAN~, APUCAN+17* |
| SDRES | SDECUCAN+1~ |
| >> SDUSER | APCAN+18 |
| SI | AVUPDT+2~, AVUPDT+6*, AVUPDT+8 |
| SL | AVUPDT+2~, AVUPDT+6*, AVUPDT+7*, AVUPDT+8 |
| SS | AVUPDT+2~, AVUPDT+8*, AVUPDT+9* |
| ST | AVUPDT+2~, AVUPDT+8*, AVUPDT+9 |
| STARTDAY | AVUPDT+2~, AVUPDT+6* |
| STR | AVUPDT+2~, AVUPDT+6*, AVUPDT+9 |
| U | AVUPDT+6, APCAN+5, UNCANCEL+18, UNCANCEL+19, UNCANCEL+20, UNCANCEL+21 |
| X | AVUPDT+2~, AVUPDT+6* |
| Y | AVUPDT+2~, AVUPDT+8*, AVUPDT+9* |
