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 Total: 6

Package Total Call Graph
Scheduling 2 (A1,INAC,PG)^SDCLAV  NM^SDCLAV0  
VA Fileman 2 (,DW,NOW,YX)^%DTC  ^DIK  
IHS Changes To ADT 1 $$TIME^BDGF  
Kernel 1 ($$DOW,$$FMADD,$$FMTE)^XLFDT  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Scheduling 1 SDCLAV0  

Entry Points

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

External References

Name Field # of Occurrence
^%DTC DIFF
DW^%DTC WR+1
NOW^%DTC HDR
YX^%DTC CHKDT+6
$$TIME^BDGF W1+9
^DIK W1+6
A1^SDCLAV WR2+2
INAC^SDCLAV A
PG^SDCLAV HDR, WARN+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,?20,X4,?51,X6
  • Line Location: W1+10
Function Call: WRITE
  • Prompt: ?61,"("_M1_") MINUTES"
  • Line Location: W1+10
Function Call: WRITE
  • Prompt: ?61,"("_M1_") MINUTES"
  • Line Location: W1+10
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
  • Prompt: "PRESS RETURN TO CONTINUE OR ^ TO QUIT "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: SDU
  • 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] S1, HDR+1
^HOLIDAY - [#40.5] WW+1, WW+5
^SC - [#44] S1, S, S+2, MON, SDPT1+1, TIME+4, TIME+5, T1+1, X1+2, WW+1
, WW+2*, WW+5, H*, CHKDT+9, CHKDT+10, CHKDT+13, CHKDT+14, CHKDT+18
^UTILITY($J S2+1, S1+1*, WR+1, WR1, W, W1+2, W1+4, MIN, DAT

Label References

Name Line Occurrences
$$CHKDT WW+1
$$LEAP X1+1
3 LOOP, SS+1, SDPT1, WR2+1, W1+9, W2+2, WARN+11, A, WW+6
A LOOP, SS+1
DAT WR2+1, W1+9, W2+2, WARN+2
DAY WW+2
DOW X1+3
H WW+1
HDR S, S+1, LOOP+2, SDPT1, WW+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 S, S+1, LOOP, LOOP+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 LOOP, SS+1
WR1 WR+1
WR2 WR+3
WW L+1, H
X1 LOOP
YCNT SDPT1+2, 3, TAB, DAT, WW+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*, WR1, W, W1+1, W1+2, W1+4, W1+5, W1+9, MIN
, DAT
>> D S2+1*, S1*, S1+1, WR+1, WR1, HDR+1, W, W1+2, W1+4, MIN
, DAT, CHKDT+2, CHKDT+10, CHKDT+17, CHKDT+19, CHKDT+22
>> 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, HDR, WARN+1, 3+2
IOSL SDPT1, W1+9, W2+2, 3, 3+2, A, WW+6
IOST LOOP, SS+1, SDPT1, HDR, WARN+1, 3, 3+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+21*, CHKDT+25*, CHKDT+26
>> S8 WR+1*
SC S2~, S+2*, WW+1, WW+2, WW+5, H, CHKDT+2, CHKDT+9, CHKDT+10, CHKDT+13
, CHKDT+14, CHKDT+17, CHKDT+18, CHKDT+19, CHKDT+22
>> 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+12*, CHKDT+13, CHKDT+19*
SDAYCNT CHKDT+4~, CHKDT+7*, CHKDT+10*, CHKDT+13
SDAYI CHKDT+4~, CHKDT+8*, CHKDT+9, CHKDT+10
SDAYNAM CHKDT+4~, CHKDT+14*, CHKDT+15
SDAYNUM CHKDT+4~, CHKDT+15*, CHKDT+16, CHKDT+17, CHKDT+18, CHKDT+19
>> SDBD S2+1, S+1, S+2, HDR1
>> SDC S2+1*, S1, S1+1, S, S+2, MON, SDPT1+1, TIME+4, TIME+5, T1+1
, W1+4*, W1+5, X1+2
>> SDC1 WR*, WR+1*
SDDD S2~, X1+3*, WW+1, L*, DIFF*, CHKDT+21
>> SDED S+1, LOOP+2, HDR1, X1+1
SDEOM LEAP~, LEAP+2, LEAP+4, LEAP+5
SDFA CHKDT+1~, CHKDT+22*, CHKDT+23, CHKDT+24*, CHKDT+25
SDFMTDAY CHKDT+4~, CHKDT+6*, CHKDT+10
SDFRST S2~
SDFRST( CHKDT+2, CHKDT+10*, CHKDT+17, CHKDT+19*, CHKDT+22
>> SDI TIME+4*, TIME+5*, T1, T1+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+12*, CHKDT+13*, CHKDT+14, CHKDT+19
>> SDT TIME+4*, TIME+5*, T1
>> SDU 3+1*
>> SDUP S2+1, LOOP, LOOP+2, SS, SS+1, SDPT1, SDPT1+1, WR+1, WR+2, WR1
, W1+9, W2+2, 3+1*, 3+2, A, X1+2, WW+6
>> SDUT W*
>> SDV S2+1*, WR+1, WR1, HDR+2, HDR1, W, W1+2, W1+4, MIN, DAT
>> SDZ S+1*, S+2*, LOOP, LOOP+2*, SS*, MON, SDPT1+1, WR+3, HDR+2, SDM
>> SDZ1 LOOP, SS
>> SDZ2 S2+1*, S+1*, LOOP+2*, WR, WR+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, X1, WW+2, H
X S+2~*, LOOP+2*, WR~, WR+1*, HDR~, W1+1*, W1+2*, W1+9*, W2+2, 3~*
, A~, TAB, X1, X1+2, WW+1, WW+2, WW+5, L*, L+1, WM
, DOW, DIFF*, H, CHKDT+4~, CHKDT+6, CHKDT+25
>> X1 WR*, WR1*, W1+9*, W2+2*, DAT, X1*, X1+1*, X1+2, L+1, DIFF*
>> X2 WR1*, DIFF*
>> X4 WR1*, W, W1+2, W1+3, W1+4, W1+9, W2+2, MIN
>> X5 S2+1*
>> X6 WR1*, W, W1+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+21*
, CHKDT+22
>> Y1 WR+1*, W1+9, W2+2, DAT
>> Y2 WR+1*
>> Y3 WR*, WR+1, W1+9*, W2+2*
YCNT S2~, SDPT1, T1+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