Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: SDEC40

Package: Scheduling

Routine: SDEC40


Information

SDEC40 ;ALB/SAT,WTC,LEG - VISTA SCHEDULING RPCS ;Feb 12, 2020@15:22

Source Information

Source file <SDEC40.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Scheduling 4 ERR^SDECERR  $$FILL^SDECU  $$TIMEZONEDATA^SDESUTIL  DTS^SDUTL  
Registration 2 $$FML^DGNFUNC  (ADD,KVAR)^VADPT  
VA FileMan 2 (C,DW)^%DTC  $$GET1^DIQ  
Kernel 1 $$NAMEFMT^XLFNAME  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Scheduling 1 SDEC  

Entry Points

Name Comments DBIA/ICR reference
APPTLETR(SDECY,SDECAPID,LT)
PRT(DFN,SDC,SD,LT,SDLET,SDFORM) ;
; DFN - pointer to PATIENT file 2
; SDC - pointer to HOSPITAL LOCATION file 44
; SD - appointment time in FM format
; LT - Letter type - "N"=No Show; "P"=Pre-Appointment; "A"=Cancelled by Patient; "C"=Cancelled by Clinic
; SDLET - pointer to LETTER file 407.5
WRAPP(DFN,SDC,SD,LT,SDLET) ;WRITE APPOINTMENT INFORMATION
FORM ;S:$D(SDX) X=SDX S SDHX=X D DW^%DTC S DOW=X,X=SDHX X ^DD("FUNC",2,1) S SDT0=X,SDDAT=$P("JAN^FEB^MAR^APR^MAY^JUN^JUL^AUG^SEP^OCT^NOV^DEC","^",$E(SDHX,4,5))_" "_+$E(SDHX,6,7)_", "_(1700+$E(SDHX,1,3)) ; See below wtc 6/7/18 694
REST(DFN,SDC,SD,LT,SDLET,SDFORM) ;WRITE THE REMAINDER OF LETTER
ADDR
LAST4(DFN) ;Return patient "last four"
BADADD ;Print patients with a Bad Address Indicator
TST ; SD*5.3*622 - handle scheduled tests

External References

Name Field # of Occurrence
C^%DTC ADDR+2
DW^%DTC FORM+5
$$FML^DGNFUNC ADDR
$$GET1^DIQ ADDR+6, ADDR+7
ERR^SDECERR APPTLETR+11, APPTLETR+12, APPTLETR+21
$$FILL^SDECU PRT+13, PRT+14, ADDR, ADDR+13, ADDR+16, ADDR+18, ADDR+19, ADDR+22, ADDR+24, ADDR+26
, ADDR+27, BADADD+3, BADADD+4, BADADD+8
$$TIMEZONEDATA^SDESUTIL FORM+4
DTS^SDUTL PRT+12
ADD^VADPT ADDR+3
KVAR^VADPT ADDR+29
$$NAMEFMT^XLFNAME PRT+21

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(5 - [#5] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("FUNC" - [#.5] FORM+7
^DG(40.8 - [#40.8] APPTLETR+22, APPTLETR+23
^DG(43 - [#43] ADDR+1
^DPT - [#2] APPTLETR+18, WRAPP+2, LAST4+2
^SC - [#44] APPTLETR+20, APPTLETR+21, APPTLETR+22, WRAPP+3, FORM+16, FORM+18, FORM+19, FORM+20, FORM+22
^SDEC(409.831 - [#409.831] APPTLETR+17
^SDEC(409.84 - [#409.84] APPTLETR+12, APPTLETR+14
^TMP("SDEC" APPTLETR+8!, APPTLETR+10*, APPTLETR+25*, APPTLETR+29*, PRT+13*, PRT+14*, PRT+16*, PRT+18*, PRT+23*, PRT+24*
, PRT+25*, PRT+28*, PRT+29*, WRAPP+6*, FORM+9*, FORM+11*, FORM+24*, FORM+28*, FORM+31*, REST+6*
, REST+7*, ADDR*, ADDR+13*, ADDR+16*, ADDR+18*, ADDR+19*, ADDR+22*, ADDR+24*, ADDR+26*, ADDR+27*
, ADDR+28*, BADADD+3*, BADADD+4*, BADADD+6*, BADADD+7*, BADADD+8*, BADADD+12*, BADADD+13*, BADADD+14*, BADADD+15*
, TST+2*, TST+3*, TST+4*
^TMP($J BADADD+1, BADADD+10, BADADD+11
^VA(200 - [#200] FORM+30
^VA(407.5 - [#407.5] PRT+27, PRT+28, FORM+23, FORM+31, REST+5, REST+6

Label References

Name Line Occurrences
$$LAST4 PRT+14, BADADD+12
ADDR PRT+17, REST+8
FORM WRAPP+3, WRAPP+5
PRT APPTLETR+26
REST APPTLETR+28
TST FORM+33
WRAPP APPTLETR+27

Naked Globals

Name Field # of Occurrence
^("BT" ADDR+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A PRT+7~, PRT+8*, PRT+14, PRT+20, REST+1~, REST+2*, ADDR
B WRAPP+1~, WRAPP+5*, FORM+9, FORM+10, FORM+23, FORM+25, FORM+31, FORM+33
DFN APPTLETR+5~, APPTLETR+16*, APPTLETR+18, APPTLETR+26, APPTLETR+27, APPTLETR+28, PRT~, PRT+8, PRT+9, WRAPP~
, WRAPP+2, REST~, REST+2, ADDR*, LAST4~, LAST4+2
DOW WRAPP+1~, FORM+5*, FORM+9, TST+2, TST+3, TST+4
DPTNAME PRT+7~, PRT+21
DPTNAME("FIELD" PRT+20*
DPTNAME("FILE" PRT+20*
DPTNAME("IENS" PRT+20*
DT PRT+12, ADDR+2
I PRT+16*, PRT+18*, REST+1~
IN APPTLETR+5~, PRT+7~, PRT+27*, PRT+28, REST+1~, REST+5*, REST+6
J FORM+15~, FORM+22*
LL ADDR+9~, ADDR+13*, ADDR+22*
LT APPTLETR~, APPTLETR+13*, APPTLETR+19, APPTLETR+26, APPTLETR+27, APPTLETR+28, PRT~, PRT+10, WRAPP~, REST~
RES APPTLETR+5~, APPTLETR+17*
S WRAPP+1~, WRAPP+2*, WRAPP+5*
SCLT APPTLETR+5~, APPTLETR+19*, APPTLETR+20, APPTLETR+21
SD PRT~, WRAPP~, WRAPP+2, REST~
SDC APPTLETR+5~, APPTLETR+17*, APPTLETR+20, APPTLETR+21, APPTLETR+22, APPTLETR+26, APPTLETR+27, APPTLETR+28, PRT~, WRAPP~
, WRAPP+3, FORM+4, FORM+9, FORM+10, FORM+16, FORM+18, FORM+19, FORM+20, FORM+22, FORM+23
, FORM+25, FORM+30, FORM+31, REST~
SDCCACT1 ADDR+9~, ADDR+10*, ADDR+12, ADDR+21
SDCCACT2 ADDR+9~, ADDR+10*, ADDR+12, ADDR+21
SDCL WRAPP+1~, WRAPP+3*, WRAPP+5*, FORM+11, TST+2, TST+3, TST+4
SDDAT WRAPP+1~, FORM+8*, FORM+9, TST+2, TST+3, TST+4
SDDFN BADADD+9~, BADADD+11*, BADADD+12
SDECAPID APPTLETR~, APPTLETR+11, APPTLETR+12, APPTLETR+14
SDECI APPTLETR+5~, APPTLETR+7*, APPTLETR+29*, PRT+13*, PRT+14*, PRT+16*, PRT+18*, PRT+23*, PRT+24*, PRT+25*
, PRT+28*, PRT+29*, WRAPP+6*, FORM+9*, FORM+11*, FORM+24*, FORM+28*, FORM+31*, REST+6*, REST+7*
, ADDR*, ADDR+13*, ADDR+16*, ADDR+18*, ADDR+19*, ADDR+22*, ADDR+24*, ADDR+26*, ADDR+27*, ADDR+28*
, BADADD+3*, BADADD+4*, BADADD+6*, BADADD+7*, BADADD+8*, BADADD+12*, BADADD+13*, BADADD+14*, BADADD+15*, TST+2*
, TST+3*, TST+4*
SDECNOD APPTLETR+5~, APPTLETR+14*, APPTLETR+15, APPTLETR+16, APPTLETR+17
SDECTMP APPTLETR+5~
SDECY APPTLETR~, APPTLETR+9*
SDFORM APPTLETR+6~, APPTLETR+23*, APPTLETR+26, APPTLETR+28, PRT~, PRT+11*, PRT+15, REST~, REST+3*, REST+8
SDHDR BADADD+2~, BADADD+4*
SDHDR1 BADADD+2~, BADADD+5*, BADADD+15
SDHX WRAPP+1~, FORM+5*, FORM+8
SDIENS ADDR+5~, ADDR+6*, ADDR+7*, ADDR+8!
SDIV APPTLETR+6~, APPTLETR+22*, APPTLETR+23
SDLET APPTLETR+5~, APPTLETR+20*, APPTLETR+21, APPTLETR+26, APPTLETR+27, APPTLETR+28, PRT~, PRT+27, PRT+28, WRAPP~
, FORM+23, FORM+31, REST~, REST+5, REST+6
SDLOC FORM+15~, FORM+16*, FORM+24
SDNAM APPTLETR+6~, BADADD+9~, BADADD+10*, BADADD+11, BADADD+12
SDPRNM FORM+15~, FORM+30*, FORM+31
SDPROV FORM+15~, FORM+22*, FORM+29, FORM+30
SDS APPTLETR+5~, APPTLETR+18*, WRAPP+5
SDSSN APPTLETR+6~
SDT APPTLETR+5~, APPTLETR+15*, APPTLETR+18, APPTLETR+26, APPTLETR+27, APPTLETR+28
SDT0 WRAPP+1~, FORM+8*, FORM+9, TST+2, TST+3, TST+4
SDTEL FORM+15~, FORM+18*, FORM+19, FORM+25, FORM+26
SDTELEXT FORM+15~, FORM+19*, FORM+20*, FORM+27
SDTMP WRAPP+1~, FORM+26*, FORM+27*, FORM+28
SDX WRAPP+1~, WRAPP+2*, WRAPP+5*, WRAPP+7*, FORM+5, LAST4+1~, LAST4+2*, LAST4+3
SDX1 WRAPP+1~, WRAPP+5*, WRAPP+7
TIMEZONE APPTLETR+5~, FORM+4*, FORM+9
U APPTLETR+15, APPTLETR+16, APPTLETR+17, APPTLETR+20, APPTLETR+21, APPTLETR+23, FORM+4, FORM+22, FORM+23, FORM+30
, FORM+31, ADDR+6, ADDR+7, ADDR+16, ADDR+19, ADDR+24, ADDR+27, LAST4+3
VAHOW ADDR!
VAPA APPTLETR+6~
VAPA( ADDR+13, ADDR+22
VAPA("P" ADDR+1*
VAPA(11 ADDR+16
VAPA(12 ADDR+10
VAPA(16 ADDR+24, ADDR+26
VAPA(17 ADDR+7*, ADDR+24
VAPA(18 ADDR+24
VAPA(22 ADDR+10
VAPA(23 ADDR+18
VAPA(24 ADDR+18
VAPA(25 ADDR+15, ADDR+19
VAPA(26 ADDR+26
VAPA(27 ADDR+26
VAPA(28 ADDR+23, ADDR+27
VAPA(4 ADDR+16, ADDR+18
VAPA(5 ADDR+6*, ADDR+16
X PRT+7~, PRT+21*, PRT+23, WRAPP+1~, WRAPP+7*, FORM+5*, FORM+6*, FORM+8, REST+1~, ADDR+5~
, ADDR+6*, ADDR+7*
X1 APPTLETR+5~, ADDR+2*
X2 APPTLETR+5~, ADDR+2*
Y APPTLETR+5~, PRT+7~, PRT+12*, PRT+13
Z5 REST+1~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All