SDEC25 ;ALB/SAT,WTC - VISTA SCHEDULING RPCS ;Feb 12, 2020@15:22
Source file <SDEC25.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 | 8 | SDAM2 SDCODEL SDEC SDEC CHECKIN APPOINTMENT SDEC08 SDEC31 SDESCKNSTEP SDTMP08 |
Kernel | 1 | ^ORD(101 |
VA Point of Service | 1 | VPSRPC4 |
Name | Comments | DBIA/ICR reference |
---|---|---|
CHECKIN(SDECY,SDECAPTID,SDECCDT,SDECCC,SDECPRV,SDECROU,SDECVCL,SDECVFM,SDECOG,SDECCR,SDECPCC,SDECWHF) | ;Check in appointment
|
|
ENDBG | ;
|
|
SDECCHK(SDECAPTID,SDECCDT) | ;
|
|
APCHK(SDECZ,SDECSC1,SDECDFN,SDECCDT,SDECSTART) | ||
CANCHKIN(DFN,SDCL,SDT) | ; Logic to cancel a checkin if the checkin date/time is passed in as '@'
; input: DFN := ifn of patient ; SDCL := clinic# ; SDT := appt d/t |
|
FIND(DFN,SDT,SDCL) | ; -- return appt ifn for pat
; input: DFN := ifn of pat. ; SDT := appt d/t ; SDCL := ifn of clinic ; output: [returned] := ifn if pat has appt on date/time |
|
VALID(DFN,SDCL,SDT,SDDA) | ; -- return valid appt.
; **NOTE: For speed consideration the ^SC and ^DPT nodes must be ; check to see they exist prior to calling this entry point. ; input: DFN := ifn of pat. ; SDT := appt d/t ; SDCL := ifn of clinic ; SDDA := ifn of appt ; output: [returned] := 1 for valid appt., 0 for not valid |
|
CHKEVT(SDECPAT,SDECSTART,SDECSC) | ;EP Called by SDEC CHECKIN APPOINTMENT event
|
|
CHKEVT1(SDECRES,SDECSTART,SDECPAT,SDECSTAT) | ;
|
|
CHKEVT3(SDECRES) | ;
|
|
CHKEVTD(SDECPAT,SDECSTART,SDECSC) | ;EP Called by SDEC CHECKIN APPOINTMENT event
|
|
CHECKOUT(SDECY,DFN,SDT,SDCODT,SDECAPTID,VPRV) | ;Check Out appointment
|
|
CANCKOUT(SDECY,SDECAPTID) | ;Cancel Check Out appointment
|
|
CANAPPT(SDECAPTID) | ||
ERROR | ;
|
|
ERR(ERRNO) | ;Error processing
|
Name | Field # of Occurrence |
---|---|
^DIE | ENDBG+65, CANCKOUT+36, CANCKOUT+41, CANCKOUT+48, CANCKOUT+52, CANAPPT+16 |
FILE^DIE | SDECCHK+5, CANCHKIN+14 |
$$GET1^DIQ | CANCKOUT+44 |
$$FIND^SDAM2 | APCHK+12 |
$$HANDLE^SDAMEVT | ENDBG+56, CHECKOUT+57, CANCKOUT+26 |
AFTER^SDAMEVT | ENDBG+76, CHECKOUT+71, CANCKOUT+56 |
BEFORE^SDAMEVT | ENDBG+57, CHECKOUT+61, CANCKOUT+30 |
EVT^SDAMEVT | ENDBG+81, CHECKOUT+75, CANCKOUT+60 |
CO^SDEC25A | CHECKOUT+63 |
GETVISIT^SDECAPI4 | APCHK+30 |
$$NETTOFM^SDECDATE | ENDBG+21, CHECKOUT+28, CHECKOUT+31 |
$$SCIEN^SDECU2 | CANCKOUT+39 |
$$GETAPT^SDVSIT2 | CANCKOUT+43 |
$$FMTE^XLFDT | CHECKOUT+39 |
$$HTFM^XLFDT | CHECKOUT+34 |
$$NOW^XLFDT | SDECCHK+4, CANCKOUT+51 |
$$UP^XLFSTR | ENDBG+32 |
$$KCHK^XUSRB | CHECKOUT+17, CANCKOUT+12 |
FileNo | Call Tags |
---|---|
^SCE - [#409.68] | GET1^DIQ |
^SDEC(409.84 - [#409.84] | Classic Fileman Calls |
^AUPNVSIT - [#9000010] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(40.7 - [#40.7] | ENDBG+25 |
^DPT - [#2] | FIND+7, VALID+8 |
^SC - [#44] | ENDBG+36, ENDBG+37, ENDBG+51, FIND+7, VALID+8 |
^SDEC(409.831 - [#409.831] | ENDBG+46, ENDBG+47, CHKEVT+10, CHKEVT3+5, CHKEVTD+10, CHECKOUT+42, CANCKOUT+20, CANAPPT+10 |
^SDEC(409.84 - [#409.84] | ENDBG+13, ENDBG+39, CHKEVT1+7, CHKEVT1+8, CHKEVT1+9, CHECKOUT+19, CHECKOUT+37, CANCKOUT+14, CANCKOUT+15, CANAPPT+4 , CANAPPT+5 |
^TMP("SDEC" | ENDBG+8!, ENDBG+10*, ENDBG+84*, ENDBG+86*, CHECKOUT+13!, CHECKOUT+15*, CHECKOUT+84*, CHECKOUT+86*, CANCKOUT+8!, CANCKOUT+10* , CANCKOUT+63*, CANCKOUT+65*, ERR+2*, ERR+4* |
^VA(200 - [#200] | ENDBG+28 |
Name | Line Occurrences |
---|---|
$$CHKEVT1 | CHKEVT+10 |
$$FIND | ENDBG+56, CANCHKIN+6, CHECKOUT+57, CANCKOUT+26 |
$$VALID | FIND+7 |
APCHK | ENDBG+64 |
CANCHKIN | ENDBG+72 |
CHKEVT3 | CHKEVT+11, CHKEVTD+11 |
ERR | ENDBG+12, ENDBG+13, ENDBG+22, ENDBG+46, ENDBG+51, CHECKOUT+17, CHECKOUT+18, CHECKOUT+19, CHECKOUT+34, CHECKOUT+39 , CHECKOUT+80, CANCKOUT+12, CANCKOUT+13, CANCKOUT+14, CANCKOUT+21, ERROR+1 |
SDECCHK | ENDBG+63, ENDBG+71, CHKEVT1+12 |
Name | Field # of Occurrence |
---|---|
^( | FIND+7 |
^(0 | FIND+7 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
%DT | ENDBG+3~, CHECKOUT+9~ |
APIERR | CHECKOUT+9~, CHECKOUT+51!, CHECKOUT+52*, CHECKOUT+63, CHECKOUT+67, CHECKOUT+78, CHECKOUT+82 |
APIERR( | CHECKOUT+80 |
APS | CANCKOUT+4~, CANCKOUT+16*, CANCKOUT+50, CANCKOUT+51, CANAPPT+1~, CANAPPT+6* |
APTN | APCHK+3~, APCHK+12* |
BSDMSG | APCHK+3~ |
BSDVSTN | ENDBG+1~ |
CNT | CHECKOUT+9~, CHECKOUT+79*, CHECKOUT+80* |
DA | ENDBG+2~, ENDBG+65*, CANCKOUT+4~, CANCKOUT+34*, CANCKOUT+39*, CANCKOUT+46*, CANCKOUT+51*, CANAPPT+1~, CANAPPT+14* |
DA(1 | CANCKOUT+39* |
DA(2 | CANCKOUT+39* |
DFN | ENDBG+40*, ENDBG+56, ENDBG+57, ENDBG+76, CANCHKIN~, CANCHKIN+6, FIND~, FIND+7, VALID~, VALID+8 , CHECKOUT~, CHECKOUT+57, CHECKOUT+61, CHECKOUT+63, CHECKOUT+71, CANCKOUT+4~, CANCKOUT+17*, CANCKOUT+26, CANCKOUT+30, CANCKOUT+39 , CANCKOUT+43, CANCKOUT+56, CANAPPT+1~, CANAPPT+7* |
DIE | ENDBG+65*, CANCKOUT+4~, CANCKOUT+33*, CANCKOUT+38*, CANCKOUT+46*, CANCKOUT+51*, CANAPPT+1~, CANAPPT+13* |
DIK | ENDBG+2~ |
DR | ENDBG+65*, CANCKOUT+4~, CANCKOUT+35*, CANCKOUT+40*, CANCKOUT+47*, CANCKOUT+51*, CANAPPT+1~, CANAPPT+15* |
DUZ | APCHK+10, CHECKOUT+17, CANCKOUT+12, CANCKOUT+35, CANCKOUT+51, CANAPPT+15 |
DUZ(2 | APCHK+18 |
EMSG | ENDBG+1~, ENDBG+84 |
ERR | CANCHKIN+17!, CHECKOUT+9~, CHECKOUT+80* |
ERRNO | ERR~, ERR+2 |
FDA | CANCHKIN+17! |
FDA( | CANCHKIN+14* |
RES | CANCKOUT+4~, CANCKOUT+19*, CANCKOUT+20, CANAPPT+1~, CANAPPT+9*, CANAPPT+10 |
RPCPERM | CHECKOUT+11~, CHECKOUT+16*, CHECKOUT+17*, CANCKOUT+6~, CANCKOUT+11*, CANCKOUT+12* |
SDASK | CHECKOUT+10~, CHECKOUT+46*, CHECKOUT+63 |
SDATA | ENDBG+55~, ENDBG+56*, ENDBG+57, ENDBG+76, ENDBG+81, CHECKOUT+56~, CHECKOUT+57*, CHECKOUT+61, CHECKOUT+71, CHECKOUT+75 , CANCKOUT+25~, CANCKOUT+26*, CANCKOUT+30, CANCKOUT+56, CANCKOUT+60 |
SDATA("AFTER" | CHKEVT+8, CHKEVTD+9 |
SDCIHDL | ENDBG+55~, ENDBG+56*, ENDBG+57, ENDBG+76, ENDBG+81, CHECKOUT+56~, CHECKOUT+57*, CHECKOUT+61, CHECKOUT+71, CHECKOUT+75 , CANCKOUT+25~, CANCKOUT+26*, CANCKOUT+30, CANCKOUT+56, CANCKOUT+60 |
SDCL | CANCHKIN~, CANCHKIN+6, CANCHKIN+14, FIND~, FIND+7, VALID~, VALID+8, CHECKOUT+10~, CHECKOUT+43*, CHECKOUT+57 , CHECKOUT+61, CHECKOUT+63, CHECKOUT+71, CANCKOUT+5~, CANCKOUT+20*, CANCKOUT+26, CANCKOUT+30, CANCKOUT+38, CANCKOUT+39, CANCKOUT+43 , CANCKOUT+56, CANAPPT+1~, CANAPPT+10* |
SDCOACT | CHECKOUT+10~, CHECKOUT+48*, CHECKOUT+63 |
SDCOALBF | CHECKOUT+10~, CHECKOUT+47*, CHECKOUT+63 |
SDCODT | CHECKOUT~, CHECKOUT+31*, CHECKOUT+34, CHECKOUT+39, CHECKOUT+63 |
SDDA | ENDBG+55~, ENDBG+56*, ENDBG+57, ENDBG+76, CANCHKIN+5~, CANCHKIN+6*, CANCHKIN+14, VALID~, VALID+8, CHECKOUT+10~ , CHECKOUT+45*, CHECKOUT+56~, CHECKOUT+57*, CHECKOUT+61, CHECKOUT+63, CHECKOUT+71, CANCKOUT+25~, CANCKOUT+26*, CANCKOUT+30, CANCKOUT+56 |
SDECAPPT | CHKEVT1+4~, CHKEVT1+8*, CHKEVT1+9, CHKEVT1+11, CHKEVT1+12 |
SDECAPTID | CHECKIN~, ENDBG+12, ENDBG+13, ENDBG+39, ENDBG+63, ENDBG+65, ENDBG+71, SDECCHK~, SDECCHK+2, CHECKOUT~ , CHECKOUT+18, CHECKOUT+19, CHECKOUT+37, CHECKOUT+63, CANCKOUT~, CANCKOUT+13, CANCKOUT+14, CANCKOUT+15, CANCKOUT+34, CANAPPT~ , CANAPPT+3, CANAPPT+4, CANAPPT+5, CANAPPT+14 |
SDECC | APCHK+3~, APCHK+30 |
SDECC("ADT" | APCHK+21* |
SDECC("APPT D | ATE" , APCHK+8*, APCHK+12, APCHK+21 |
SDECC("CDT" | APCHK+9* |
SDECC("CLINIC | CODE" , APCHK+6* |
SDECC("CLN" | APCHK+20* |
SDECC("HOS LO | C" , APCHK+5*, APCHK+12, APCHK+20 |
SDECC("PAT" | APCHK+4*, APCHK+12 |
SDECC("PROVIDER" | APCHK+7* |
SDECC("SITE" | APCHK+18* |
SDECC("SRV CA | T" , APCHK+15* |
SDECC("TIME R | ANGE" , APCHK+16* |
SDECC("USR" | APCHK+10* |
SDECC("VISIT | DATE" , APCHK+17*, TYPE" , APCHK+19* |
SDECCAN | ENDBG+3~, ENDBG+5*, ENDBG+16*, ENDBG+21, ENDBG+59, ENDBG+67 |
SDECCC | CHECKIN~, ENDBG+24*, ENDBG+25*, ENDBG+37*, APCHK+6 |
SDECCDT | CHECKIN~, ENDBG+15*, ENDBG+16, ENDBG+21*, ENDBG+22, ENDBG+63, ENDBG+64, ENDBG+81, SDECCHK~, SDECCHK+3 , SDECCHK+4, APCHK~, APCHK+9, APCHK+17 |
SDECCR | CHECKIN~ |
SDECDFN | APCHK~ |
SDECFDA | SDECCHK+1~ |
SDECFDA( | SDECCHK+3*, SDECCHK+4* |
SDECFOUND | CHKEVT+6~, CHKEVT+9*, CHKEVT+10*, CHKEVT+11, CHKEVT1+4~, CHKEVT1+5*, CHKEVT1+6, CHKEVT1+7, CHKEVT1+8, CHKEVT1+10* , CHKEVT1+11, CHKEVT1+13, CHKEVTD+7~, CHKEVTD+12* |
SDECI | ENDBG+2~, ENDBG+7*, ENDBG+83*, ENDBG+84, ENDBG+85*, ENDBG+86, CHECKOUT+11~, CHECKOUT+12*, CHECKOUT+80*, CHECKOUT+83* , CHECKOUT+84, CHECKOUT+85*, CHECKOUT+86, CANCKOUT+6~, CANCKOUT+7*, CANCKOUT+62*, CANCKOUT+63, CANCKOUT+64*, CANCKOUT+65, ERR+1* , ERR+2, ERR+3*, ERR+4 |
SDECID | ENDBG+2~ |
SDECIENS | ENDBG+2~, SDECCHK+2*, SDECCHK+3, SDECCHK+4 |
SDECMSG | SDECCHK+1~ |
SDECNOD | ENDBG+2~, ENDBG+39*, ENDBG+40, ENDBG+41, ENDBG+42, ENDBG+44, ENDBG+47*, ENDBG+48, ENDBG+51, CHKEVT1+9* , CHKEVT1+10, CHECKOUT+11~, CHECKOUT+37*, CHECKOUT+39, CHECKOUT+41, CHECKOUT+42*, CHECKOUT+43, CANCKOUT+6~, CANCKOUT+15*, CANCKOUT+16 , CANCKOUT+17, CANCKOUT+18, CANCKOUT+19, CANCKOUT+21, CANAPPT+2~, CANAPPT+5*, CANAPPT+6, CANAPPT+7, CANAPPT+8, CANAPPT+9 , CANAPPT+11 |
SDECNOEV | ENDBG+3~, ENDBG+4*, CHKEVT+4, CHKEVTD+5 |
SDECOG | CHECKIN~, APCHK+27 |
SDECOUT | APCHK+29~, APCHK+30 |
SDECPAT | CHKEVT~, CHKEVT+10, CHKEVT1~, CHKEVT1+10, CHKEVTD~ |
SDECPATID | ENDBG+2~, ENDBG+41*, ENDBG+64, ENDBG+72, APCHK+4 |
SDECPCC | CHECKIN~ |
SDECPRV | CHECKIN~, ENDBG+27*, ENDBG+28*, ENDBG+65, APCHK+7 |
SDECR1 | ENDBG+3~, ENDBG+44*, ENDBG+46, ENDBG+47 |
SDECRES | CHKEVT+6~, CHKEVT+10*, CHKEVT+11, CHKEVT1~, CHKEVT1+6, CHKEVT1+7, CHKEVT1+8, CHKEVT3~, CHKEVT3+5, CHKEVTD+7~ , CHKEVTD+10*, CHKEVTD+11, CHECKOUT+41*, CHECKOUT+42 |
SDECRESN | CHKEVT3+4~, CHKEVT3+5*, CHKEVT3+6, CHKEVT3+7* |
SDECROU | CHECKIN~, ENDBG+32*, ENDBG+33* |
SDECSC | CHKEVT~, CHKEVT+5, CHKEVT+10, CHKEVTD~, CHKEVTD+6, CHKEVTD+10 |
SDECSC1 | ENDBG+48*, ENDBG+51, ENDBG+56, ENDBG+57, ENDBG+64, ENDBG+72, ENDBG+76, APCHK~, APCHK+5 |
SDECSTART | ENDBG+2~, ENDBG+42*, ENDBG+56, ENDBG+57, ENDBG+64, ENDBG+72, ENDBG+76, APCHK~, APCHK+8, CHKEVT~ , CHKEVT+10, CHKEVT1~, CHKEVT1+7, CHKEVT1+8, CHKEVTD~ |
SDECSTAT | CHKEVT+6~, CHKEVT+7*, CHKEVT+8*, CHKEVT+10, CHKEVT1~, CHKEVT1+12, CHKEVTD+7~, CHKEVTD+8*, CHKEVTD+9*, CHKEVTD+10 |
>> SDECTYP | ENDBG+81 |
SDECVCL | CHECKIN~, ENDBG+35*, ENDBG+36*, ENDBG+37, APCHK+25 |
SDECVEN | ENDBG+2~ |
SDECVEN("CLINIC" | APCHK+25* |
SDECVEN("FORM" | APCHK+26* |
SDECVEN("OUTGUIDE" | APCHK+27* |
SDECVFM | CHECKIN~, APCHK+26 |
SDECWHF | CHECKIN~ |
SDECY | CHECKIN~, ENDBG+9*, CHECKOUT~, CHECKOUT+14*, CANCKOUT~, CANCKOUT+9* |
SDECZ | ENDBG+2~, ENDBG+46, ENDBG+64, APCHK~ |
SDLNE | CHECKOUT+10~, CHECKOUT+49*, CHECKOUT+63 |
SDN | CANCKOUT+5~, CANCKOUT+39* |
SDOE | CANCKOUT+5~, CANCKOUT+43*, CANCKOUT+44, CANCKOUT+51 |
SDQUIET | CHECKOUT+10~, CHECKOUT+50*, CHECKOUT+63 |
SDT | CANCHKIN~, CANCHKIN+6, CANCHKIN+14, FIND~, FIND+7, VALID~, VALID+8, CHECKOUT~, CHECKOUT+28*, CHECKOUT+57 , CHECKOUT+61, CHECKOUT+63, CHECKOUT+71, CANCKOUT+5~, CANCKOUT+18*, CANCKOUT+26, CANCKOUT+30, CANCKOUT+38, CANCKOUT+39, CANCKOUT+43 , CANCKOUT+56, CANAPPT+1~, CANAPPT+8* |
SDV | CANCKOUT+5~, CANCKOUT+44*, CANCKOUT+45, CANCKOUT+46 |
U | ENDBG+37, ENDBG+40, ENDBG+41, ENDBG+42, ENDBG+44, ENDBG+46, ENDBG+48, ENDBG+51, ENDBG+56, VALID+8 , CHKEVT1+10, CHECKOUT+39, CHECKOUT+41, CHECKOUT+43, CHECKOUT+57, CANCKOUT+16, CANCKOUT+17, CANCKOUT+18, CANCKOUT+19, CANCKOUT+20 , CANCKOUT+21, CANCKOUT+26, CANAPPT+6, CANAPPT+7, CANAPPT+8, CANAPPT+9, CANAPPT+10, CANAPPT+11 |
VPRV | CHECKOUT~, CHECKOUT+63 |
X | ENDBG+3~, CHECKOUT+9~ |
Y | ENDBG+3~, FIND+6~, FIND+7*, FIND+8, CHECKOUT+9~ |