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 |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: SDCLAV1

Package: Scheduling

Routine: SDCLAV1


Information

SDCLAV1 ;ALB/LDB - OUTPUT PATTERNS (cont.) ; 9/1/00 10:57am

Source Information

Source file <SDCLAV1.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Scheduling 2 (A1,INAC,PG)^SDCLAV  NM^SDCLAV0  
VA FileMan 2 (,DW,NOW,YX)^%DTC  ^DIK  
Kernel 1 ($$DOW,$$FMADD,$$FMTE)^XLFDT  

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 SDCLAV0  

Entry Points

Name Comments DBIA/ICR reference
S2
S1
S
LOOP
MSG ;Added SD/517
SS
MON
SDPT1
TIME ;SD/533 $Select defaults to 8 when Z5=0, so a Midnight to 8am clinic
T1
WR
WR1
WR2 ;Added SD/517
HDR
HDR1
SDM
W
W1 ;added next 2 lines and changed 3rd line SD/517
W2 ;added SD/517
WARN ;added SD/517
3
A
TAB
MIN
DAT
X1
WW ;
L
WM
DT
DOW
YCNT
DAY ;;^SUN^MON^TUES^WEDNES^THURS^FRI^SATUR
DIFF
H
LEAP(SDEOM) ;Check for leap year, adjust if indicated
CHKDT() ;

External References

Name Field # of Occurrence
^%DTC DIFF
DW^%DTC WR+1
NOW^%DTC HDR
YX^%DTC CHKDT+6
^DIK W1+6
A1^SDCLAV WR2+2
INAC^SDCLAV A
PG^SDCLAV HDRWARN+1, 3+2
NM^SDCLAV0 SDPT1+1, X1+2
$$DOW^XLFDT DOW
$$FMADD^XLFDT LEAP+4
$$FMTE^XLFDT DT

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"THIS CLINIC DOES NOT HAVE APPT. LENGTH"
  • Line Location: S+0
Function Call: WRITE
  • Prompt: !," DATE",?SDI+SDI-1,"|"
  • Line Location: T1+1
Function Call: WRITE
  • Prompt: $J("|",SDI+SDI)
  • Line Location: T1+3
Function Call: WRITE
  • Prompt: !!,"No appointments scheduled"
  • Line Location: WR+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: WR2+1
Function Call: WRITE
  • Prompt: @IOF,!?52,Y
  • Line Location: HDR+0
Function Call: WRITE
  • Prompt: !?30,$P(^DG(40.8,D,0),"^")
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !?30,SDV,!?30,SDM," ",($E(SDZ,1,3)+1700)
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !!,?30,SDV,!,?30,$P(SDM1,"^",+$E(SDZ2,4,5))," ",($E(SDZ2,1,3)+1700)
  • Line Location: HDR1+0
Function Call: WRITE
  • Prompt: D1
  • Line Location: W+1
Function Call: WRITE
  • Prompt: X,?20,X4,?51,X6
  • Line Location: W1+9
Function Call: WRITE
  • Prompt: ?61,"("_M1_") MINUTES"
  • Line Location: W1+9
Function Call: WRITE
  • Prompt: ?61,"("_M1_") MINUTES"
  • Line Location: W1+9
Function Call: WRITE
  • Prompt: X,?23,X4,?51,X6
  • Line Location: W2+2
Function Call: WRITE
  • Prompt: ?61,"("_M1_") MINUTES"
  • Line Location: W2+2
Function Call: WRITE
  • Prompt: ?61,"("_M1_") MINUTES"
  • Line Location: W2+2
Function Call: WRITE
  • Prompt: @IOF,!
  • Line Location: WARN+1
Function Call: WRITE
  • Prompt: !!,"*************************************************************************"
  • Line Location: WARN+3
Function Call: WRITE
  • Prompt: !,"* WARNING: There is a data inconsistency or data corruption problem *"
  • Line Location: WARN+4
Function Call: WRITE
  • Prompt: !,"* with one or more of the above appointments. These appointments will *"
  • Line Location: WARN+5
Function Call: WRITE
  • Prompt: !,"* have WARNING displayed to the left of the time. Corrective action *"
  • Line Location: WARN+6
Function Call: WRITE
  • Prompt: !,"* needs to be taken. Please cancel any of the appointments above, which *"
  • Line Location: WARN+7
Function Call: WRITE
  • Prompt: !,"* have the WARNING display. If any of them are valid appointments, they *"
  • Line Location: WARN+8
Function Call: WRITE
  • Prompt: !,"* will have to be re-entered via Appointment Management. *"
  • Line Location: WARN+9
Function Call: WRITE
  • Prompt: !,"**************************************************************************"
  • Line Location: WARN+10
Function Call: WRITE
  • Prompt: !
  • Line Location: 3+0
Function Call: READ
  • Formatting: !!
  • Prompt: "PRESS RETURN TO CONTINUE OR ^ TO QUIT "
  • Variable: SDU
  • Timeout: DTIME
  • Line Location: 3+1
Function Call: WRITE
  • Prompt: @IOF,!
  • Line Location: 3+2
Function Call: WRITE
  • Prompt: !!!,"FOR CLINIC AVAILABILITY PATTERNS:"
  • Line Location: A+0
Function Call: WRITE
  • Prompt: !!?4,"0-9 and j-z",?15," --denote available slots where j=10,k=11...z=26",!?12,"A-W",?15," --denote overbooks with A being the first slot to be overbooked",!?18,"and B being the second for that same time, etc."
  • Line Location: A+1
Function Call: WRITE
  • Prompt: !?6,"*,$,!,@,#",?15," --denote overbooks or appts. that fall outside of a clinic's",!?18,"regular hours"
  • Line Location: A+2
Function Call: WRITE
  • Prompt: !
  • Line Location: TAB+0
Function Call: WRITE
  • Prompt: !,?1,X1,?11,Y1
  • Line Location: DAT+0
Function Call: WRITE
  • Prompt: !,$E(^SC(+SC,"ST",X,1),1,80)
  • Line Location: WW+5
Function Call: WRITE
  • Prompt: !?36
  • Line Location: WM+0
Function Call: WRITE
  • Prompt: $$FMTE^XLFDT(Y)
  • Line Location: DT+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" WR+1, HDR
^DD("FUNC" - [#.5] W1+1
^DG(40.8 - [#40.8] HDR+1
^DG(43 - [#43] S1HDR+1
^HOLIDAY - [#40.5] WW+1, WW+5
^SC - [#44] S1SS+2, MONSDPT1+1, TIME+4, TIME+5, T1+1, X1+2, WW+1
WW+2*, WW+5, H*, CHKDT+9, CHKDT+10, CHKDT+11, CHKDT+14, CHKDT+15, CHKDT+19, CHKDT+20
^UTILITY($J S2+1, S1+1*, WR+1, WR1WW1+2, W1+4, MINDAT

Label References

Name Line Occurrences
$$CHKDT WW+1
$$LEAP X1+1
3 LOOPSS+1, SDPT1WR2+1, W1+9, W2+2, WARN+11, AWW+6
A LOOPSS+1
DAT WR2+1, W1+9, W2+2, WARN+2
DAY WW+2
DOW X1+3
H WW+1
HDR SS+1, LOOP+2, SDPT1WW+6
HDR1 WR+1, WR+2, WR2+1, W1+9, W2+2, WARN+2
L WW+1, WW+5
LOOP LOOP+2
MIN W1+9, W2+2
MON LOOP
MSG LOOP+1, LOOP+3
S S2+1
SDM SS+1, LOOPLOOP+2
SDPT1 MON
T1 TIME+4
TAB W1+9, W2+2
TIME S+1, LOOP+2, SDPT1
W W1+9, W2+2
W1 WR1
W2 W1+2
WARN MSG+1
WM WW+5
WR LOOPSS+1
WR1 WR+1
WR2 WR+3
WW L+1, H
X1 LOOP
YCNT SDPT1+2, 3TABDATWW+5, WM

Naked Globals

Name Field # of Occurrence
^( WW+1, H
^("GL" HDR+1
^("SL" TIME+4
^(0 WW+2*, H*
^(1 WW+2, WW+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % HDR
%H CHKDT+4~, CHKDT+5*
>> C WR*, WR+1*, WR1WW1+1, W1+2, W1+4, W1+5, MINDAT
>> D S2+1*, S1*, S1+1, WR+1, WR1HDR+1, WW1+2, W1+4, MIN
DAT, CHKDT+2, CHKDT+11, CHKDT+18, CHKDT+21, CHKDT+24
>> D1 W*, W+1
>> D8 W*
DA W1+5*, W1+7!
DA(1 W1+5*, W1+6
DA(2 W1+5*, W1+6
DIK W1+6*, W1+7!
DTIME 3+1
I1 S2~
IOF WR2+1, HDRWARN+1, 3+2
IOSL SDPT1W1+9, W2+2, 33+2, AWW+6
IOST LOOPSS+1, SDPT1HDRWARN+1, 33+2
J T1+1!
J( T1+1*, WW+1
>> M1 W1+9, W2+2, MIN*
N1 W1+4*, W1+7!
>> P S2+1*
POP S+3~*, LOOP+1, LOOP+3, W2+1*, WARN+12*
RET CHKDT+1~, CHKDT+23*, CHKDT+27*, CHKDT+28
>> S8 WR+1*
SC S2~, S+2*, WW+1, WW+2, WW+5, H, CHKDT+2, CHKDT+9, CHKDT+10, CHKDT+11
, CHKDT+14, CHKDT+15, CHKDT+18, CHKDT+19, CHKDT+20, CHKDT+21, CHKDT+24
>> SD S1*
>> SD0 S+1*, LOOP, WR*, WR+1*, WR+2, WR+3
>> SD5 S1*, SS*, WR+1
>> SDAP SDPT1+1*, X1+2*
>> SDAP1 W1+4*, W1+5
SDAV S2~, WW+5*
SDAYCHK CHKDT+4~, CHKDT+13*, CHKDT+14, CHKDT+21*
SDAYCNT CHKDT+4~, CHKDT+7*, CHKDT+11*, CHKDT+14
SDAYI CHKDT+4~, CHKDT+8*, CHKDT+9, CHKDT+10, CHKDT+11
SDAYNAM CHKDT+4~, CHKDT+15*, CHKDT+16
SDAYNUM CHKDT+4~, CHKDT+16*, CHKDT+17, CHKDT+18, CHKDT+19, CHKDT+21
>> SDBD S2+1, S+1, S+2, HDR1
SDBEGO CHKDT+4~, CHKDT+7*, CHKDT+10*, CHKDT+20
>> SDC S2+1*, S1S1+1, SS+2, MONSDPT1+1, TIME+4, TIME+5, T1+1
W1+4*, W1+5, X1+2
>> SDC1 WR*, WR+1*
SDCNT CHKDT+4~, CHKDT+10*
SDDD S2~, X1+3*, WW+1, L*, DIFF*, CHKDT+23
>> SDED S+1, LOOP+2, HDR1X1+1
SDEOM LEAP~, LEAP+2, LEAP+4, LEAP+5
SDFA CHKDT+1~, CHKDT+24*, CHKDT+25, CHKDT+26*, CHKDT+27
SDFMTDAY CHKDT+4~, CHKDT+6*, CHKDT+11
SDFRST S2~
SDFRST( CHKDT+2, CHKDT+11*, CHKDT+18, CHKDT+21*, CHKDT+24
>> SDI TIME+4*, TIME+5*, T1T1+1, T1+3
SDLEAP LEAP+3~, LEAP+4*, LEAP+5
>> SDM HDR+2, SDM*
>> SDM1 HDR1, SDM*
SDMED S2~, S+1*, WR+1, X1+2*
>> SDNM S1*, S1+1
>> SDPT MON*, SDPT1+1
>> SDRE DIFF
SDSOH S+2~*, WW+1
SDST CHKDT+4~, CHKDT+13*, CHKDT+14*, CHKDT+15, CHKDT+20, CHKDT+21
>> SDT TIME+4*, TIME+5*, T1
>> SDU 3+1*
>> SDUP S2+1, LOOPLOOP+2, SSSS+1, SDPT1SDPT1+1, WR+1, WR+2, WR1
W1+9, W2+2, 3+1*, 3+2, AX1+2, WW+6
>> SDUT W*
>> SDV S2+1*, WR+1, WR1HDR+2, HDR1WW1+2, W1+4, MINDAT
>> SDZ S+1*, S+2*, LOOPLOOP+2*, SS*, MONSDPT1+1, WR+3, HDR+2, SDM
>> SDZ1 LOOPSS
>> SDZ2 S2+1*, S+1*, LOOP+2*, WRWR+3*, HDR1*
SI S2~, S+2*, WW+2
SL S2~, S+2*
SM S2~, S+2*, WW+5, WM*
SS S2~, WW+1*
STARTDAY S2~, S+2*
>> T W1+9, W2+2, TAB*
U S+2, TIME+4, TIME+5, W1+4, X1WW+2, H, CHKDT+10
X S+2~*, LOOP+2*, WR~, WR+1*, HDR~, W1+1*, W1+2*, W1+9, W2+2, 3~*
, A~, TABX1X1+2, WW+1, WW+2, WW+5, L*, L+1, WM
DOW, DIFF*, H, CHKDT+4~, CHKDT+6, CHKDT+27
>> X1 WR*, WR1*, W1+9*, W2+2*, DAT, X1*, X1+1*, X1+2, L+1, DIFF*
>> X2 WR1*, DIFF*
>> X4 WR1*, WW1+2, W1+3, W1+4, W1+9, W2+2, MIN
>> X5 S2+1*
>> X6 WR1*, WW1+2, W1+4, W1+9, W2+2, MIN
>> X9 WR+1*, W1+9, W2+2
Y WR+1*, HDR*, X1+3, WW+1*, WW+2, WM*, DT, DOW*, CHKDT+1~, CHKDT+23*
, CHKDT+24
>> Y1 WR+1*, W1+9, W2+2, DAT
>> Y2 WR+1*
>> Y3 WR*, WR+1, W1+9*, W2+2*
YCNT S2~, SDPT1T1+2*, HDR*, HDR+2*, HDR1*, W1+9, W2+2, 3+2*, A
A+2*, WW+6, YCNT*
>> Z SDPT1+1*
>> Z5 TIME+4*, TIME+5*
>> Z6 T1*
>> Z7 T1+1*
>> Z8 T1+3*

Marked Items

Name Field # of Occurrence
$T(DAY WW+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All