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: SDMM

Package: Scheduling

Routine: SDMM


Information

SDMM ;SF/GFT,MAN/GRR - MULTIPLE APPOINTMENTS ; 2/7/05 12:51pm ; Compiled September 25, 2006 13:33:14

Source Information

Source file <SDMM.m>

Call Graph

Call Graph

Call Graph Total: 12

Package Total Call Graph
Scheduling 8 ^SDM  (D,DOW)^SDM0  ($$REDDT,L)^SDM1  SDMM^SDM1A  MAKE^SDMM1  (AT,DTS)^SDUTL  (ANSW,ASKREM,EN)^SDWLEVAL  (INIT,LIST)^SDWLPL  
VA FileMan 3 ^%DT  C^%DTC  YN^DICN  
Kernel 1 $$UP^XLFSTR  

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: 4

Package Total Caller Graph
Scheduling 4 SDM1  SDM1A  SDMM1  SDMULTIBOOK  

Entry Points

Name Comments DBIA/ICR reference
RDTY
RD22
ADT
OVR
LEN
RDC
OTHER
BEGIN
END
GETNEX
GETNXD
DAY ;;^SUN^MON^TUES^WEDNES^THURS^FRI^SATUR
TM
HLP
HLP22
INACT
HLP1
SDFT
MSG
MORDIS
MORD2
EN
DISP

External References

Name Field # of Occurrence
^%DT ADT+8, ADT+9, EN+3
C^%DTC ADT+8, ADT+10, GETNEX+1, GETNXD+1, SDFT, MORDIS+1, DISP+2
YN^DICN RD22
^SDM SDMM+2
D^SDM0 DISP+2
DOW^SDM0 LEN+1, GETNXD, GETNXD+1
$$REDDT^SDM1 ADT+5
L^SDM1 LEN
SDMM^SDM1A BEGIN
MAKE^SDMM1 BEGIN+1
AT^SDUTL ADT+7
DTS^SDUTL OVR+1, MORD2, DISP+1
ANSW^SDWLEVAL END+7, END+8
ASKREM^SDWLEVAL END+16
EN^SDWLEVAL END+2, END+9
INIT^SDWLPL END+4
LIST^SDWLPL END+7
$$UP^XLFSTR RDTY+1

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Formatting: !
  • Prompt: "WANT TO MAKE DAILY OR WEEKLY APPOINTMENTS?: WEEKLY// "
  • Variable: SDTYP
  • Timeout: DTIME
  • Line Location: RDTY+1
Function Call: WRITE
  • Prompt: !,"ENTER 'D' FOR DAILY OR PRESS RETURN"
  • Line Location: RDTY+1
Function Call: WRITE
  • Prompt: !,"WANT APPOINTMENTS MADE ON SATURDAYS AND SUNDAYS"
  • Line Location: RD22+0
Function Call: READ
  • Formatting: !
  • Prompt: "DATE/TIME: "
  • Variable: X
  • Timeout: DTIME
  • Line Location: ADT+3
Function Call: WRITE
  • Prompt: Y
  • Line Location: ADT+7
Function Call: WRITE
  • Prompt: *7,?50,$P(^(0),U,2),"??"
  • Line Location: OVR+0
Function Call: WRITE
  • Prompt: !,*7,"Clinic is scheduled to be inactivated on ",Y
  • Line Location: OVR+1
Function Call: WRITE
  • Prompt: $S(SDRE:" and reactivated on "_Y,1:"")
  • Line Location: OVR+1
Function Call: WRITE
  • Prompt: !,*7,"EXCEEDS MAXIMUM DAYS FOR FUTURE APPOINTMENT!!",*7
  • Line Location: OVR+3
Function Call: READ
  • Variable: S
  • Timeout: DTIME
  • Line Location: LEN+0
Function Call: WRITE
  • Prompt: !,"LENGTH OF APPOINTMENTS (IN MINUTES): ",+SL,"// "
  • Line Location: LEN+0
Function Call: WRITE
  • Prompt: !,"FOR HOW MANY CONSECUTIVE ",$S(SDTYP["W":$P($T(DAY),"^",Y+2)_"DAY'S",1:"DAYS")," DO YOU WANT APPOINTMENTS SCHEDULED",!," AT "
  • Line Location: RDC+0
Function Call: WRITE
  • Prompt: X,"?: "
  • Line Location: RDC+0
Function Call: READ
  • Variable: SDCN
  • Timeout: DTIME
  • Line Location: RDC+1
Function Call: READ
  • Formatting: !
  • Prompt: " OTHER INFO: "
  • Variable: D
  • Timeout: DTIME
  • Line Location: OTHER+0
Function Call: WRITE
  • Prompt: !,*7,"'^' not allowed - hit return if no 'OTHER INFO' is to be entered"
  • Line Location: OTHER+0
Function Call: WRITE
  • Prompt: " ENTER LAB, SCAN, ETC."
  • Line Location: OTHER+2
Function Call: WRITE
  • Prompt: !,SDMCNT," APPOINTMENTS MADE",!
  • Line Location: END+0
Function Call: WRITE
  • Prompt: !,"MUST ENTER A REASON NOT TO DISPOSITION MATCHED EWL ENTRY",!
  • Line Location: END+8
Function Call: WRITE
  • Prompt: !,"Enter the number of appointments you want made (between 1 and 60)."
  • Line Location: HLP+0
Function Call: WRITE
  • Prompt: !,"ENTER 'YES' IF YOU WANT THE SYSTEM TO TRY TO MAKE APPOINTMENTS ON SATURDAYS AND SUNDAYS"
  • Line Location: HLP22+0
Function Call: WRITE
  • Prompt: !,*7,"Appointments can't be made while clinic is inactivated"
  • Line Location: INACT+0
Function Call: WRITE
  • Prompt: !,"Enter a date/time for the appointment"
  • Line Location: HLP1+0
Function Call: WRITE
  • Prompt: ".",!,"You may also select 'M' to display the next month's availability or"
  • Line Location: HLP1+2
Function Call: WRITE
  • Prompt: !,"'D' to specify an earlier or later date to begin the availability display."
  • Line Location: HLP1+3
Function Call: WRITE
  • Prompt: !!?5,"Text entered at OTHER INFO prompt was too long. Please re-enter.",!
  • Line Location: MSG+0
Function Call: WRITE
  • Prompt: *7," ??"
  • Line Location: MORDIS+0
Function Call: WRITE
  • Prompt: *7,!,"Clinic is inactivated as of ",Y
  • Line Location: MORD2+0
Function Call: WRITE
  • Prompt: !!,"Unable to evaluate date value """_X_""".",!
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DISP+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DISV( EN+6*
^HOLIDAY - [#40.5] OVR, GETNEX, GETNEX+1, GETNXD, GETNXD+1
^SC - [#44] ADT+11, SDFT, DISP
^TMP("SDWLPL" END+3!
^TMP($J RDTY!, END+2, END+3!, END+5, END+7, END+8, END+9, END+16

Label References

Name Line Occurrences
ADT ADT+4, ADT+5, ADT+6, ADT+8, OVR, OVR+1, OVR+2, OVR+3, RDC+1, BEGIN+5
, MORDIS, MORD2
DAY RDC
GETNEX BEGIN+3, GETNEX, GETNEX+1
GETNXD BEGIN+3, GETNXD, GETNXD+1
HLP RDC+1
HLP1 ADT+6
HLP22 RD22
INACT GETNEX, GETNEX+1, GETNXD, GETNXD+1
LEN LEN
MORD2 ADT+5
MORDIS ADT+4
MSG OTHER+1, OTHER+3
OTHER OTHER, OTHER+1, OTHER+2, OTHER+3
OVR ADT+7
RD22 HLP22
RDC HLP
RDTY RDTY+1
SDFT OVR+3
TM RDC

Naked Globals

Name Field # of Occurrence
^("SDP" SDFT
^("SL" ADT+11, DISP
^(0 OVR

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% RD22*, END+21!, TM*
%DT ADT+8!*, ADT+9!*, EN+2~, EN+3*
%H END+21!
%T END+21!
C END+21!
CCX ADT*, END+20!
COLLAT END+20!
COV END+20!
D OTHER*, OTHER+1, OTHER+2, OTHER+3, BEGIN*, END+20!
>> DFN END+2, END+4, END+7, END+9
DISYS END+21!
DT SDFT
DTIME RDTY+1, ADT+3, LEN, RDC+1, OTHER
DUZ EN+6
I END+20!
IOF DISP*
POP LEN*, BEGIN+1, BEGIN+3*, END+20!, GETNEX*, GETNEX+1*, GETNXD*, GETNXD+1*, INACT*
S LEN*, END+20!
SC ADT+11, END+20!, SDFT, EN+6, DISP
SD ADT+3!, BEGIN+2, END+20!, HLP1+1
SDALLE END+21!
SDAPDT SDMM+2~, ADT+7, BEGIN+2*
SDAPTYP END+20!
SDATD END+21!
SDAV END+21!, DISP*
SDCN RDC+1*, BEGIN+1, END+20!
>> SDCTN END+16*
SDDAT LEN+1*, RDC+2, END+20!, GETNEX*, GETNEX+1*, GETNXD*, GETNXD+1*, INACT
SDDECOD END+21!
SDEC END+21!
SDEDT OVR+3, END+20!, SDFT*
SDEMP END+20!
SDERRFT ADT!, BEGIN+1, BEGIN+5
SDEV END+2~, END+9~
SDEV(1 END+2, END+9
SDHX SDMM+2~, ADT+1*, END+21!, MORDIS, MORDIS+1
SDHY MORD2*!, DISP+1*!
SDIN END+21!
SDINA OVR+1, END+20!, INACT, MORD2, DISP+1
SDINP END+21!
SDLOCK END+20!
SDM9 BEGIN*, END+20!
SDMADE RDC+2*, BEGIN+2, BEGIN+3*, END+20!
SDMCNT RDC+2*, BEGIN+2*, END, END+20!
SDMES END+20!
SDMM SDMM+2*!
SDNOT END+20!
SDOEL END+21!
SDOT LEN+1*, RDC, RDC+2, END+20!, GETNEX, GETNEX+1, GETNXD, GETNXD+1
SDPL END+20!
SDR END+7~, END+8~
SDRE OVR+1, END+20!, INACT, MORD2, DISP+1
SDRT END+20!
SDSC END+20!
SDSDATE ADT+1!
SDSOH ADT+11*, OVR, END+20!, GETNEX, GETNEX+1, GETNXD, GETNXD+1, DISP*
SDT END+21!
SDTTM END+20!
SDTYP RDTY+1*, RD22, RDC, BEGIN+3, END+20!
SDW OTHER+3, END+20!, END+21!
SDWE RD22*, END+21!, GETNXD, GETNXD+1
SDWEE END+20!
SDX DISP+2*!
SDX3 END+20!, END+21!
SDX7 END+20!, END+21!
SDX9 BEGIN*, END+20!, END+21!
SDXF END+21!, MORDIS+1*
SDY OVR+1*!, END+21!
SDY1 OVR*, OVR+1, END+20!, END+21!
SDYC END+20!, END+21!
SDZ BEGIN+1*, BEGIN+2, END+20!
SDZM BEGIN*!
SDZY BEGIN*, END+20!, END+21!
SI END+21!
SL LEN*, END+21!
SM END+21!
SS END+21!
U OVR, LEN, SDFT, EN+6
X ADT+1*, ADT+2, ADT+3*!, ADT+4, ADT+5*, ADT+6, ADT+7, ADT+8*, ADT+10, LEN+1*
, RDC*, BEGIN*, GETNEX+1, GETNXD*, GETNXD+1*, TM*, SDFT, MORD2, EN*, EN+4
, DISP+2*
X1 ADT+8*, ADT+10*, END+21!, GETNEX+1*, GETNXD+1*, SDFT*, MORDIS+1*, DISP+2*
X2 ADT+8*, ADT+10*, END+21!, GETNEX+1*, GETNXD+1*, SDFT*, MORDIS+1*, DISP+2*
Y ADT+7*, ADT+8, ADT+10*, OVR, OVR+1*, OVR+2, OVR+3, LEN+1, RDC, RDC+2*
, BEGIN*, END+21!, GETNEX*, GETNEX+1*, GETNXD*, GETNXD+1*, MORD2*, EN+1, EN+4, EN+6
, DISP+1*, DISP+2*

Marked Items

Name Field # of Occurrence
$T(DAY RDC
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