Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: SDMULT0

Package: Scheduling

Routine: SDMULT0


Information

SDMULT0 ;ALB/TMP - MAKE MULTI-CLINIC APPOINTMENTS ; 18 APR 86

Source Information

Source file <SDMULT0.m>

Entry Points

Name Comments DBIA/ICR reference
START
OK
DT
LIM
OVR
A
LOOKA
AV
LOOP
CHECK
NEXT
DAY ;;^SUN^MON^TUES^WEDNES^THURS^FRI^SATUR
S1
END

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$P(SDC1(I),"^",1),?45,+$P(SDC1(I),"^",2)," MINUTE APPOINTMENT"
  • Line Location: START+0
Function Call: WRITE
  • Prompt: !,"RESPOND YES (Y) OR NO (N)"
  • Line Location: OK+0
Function Call: WRITE
  • Prompt: !
  • Line Location: OK+1
Function Call: READ
  • Prompt: "// "
  • Variable: X
  • Timeout: DTIME
  • Line Location: LIM+0
Function Call: WRITE
  • Prompt: !,"SELECT LATEST DATE TO CHECK FOR AVAILABLE SLOTS: "
  • Line Location: LIM+0
Function Call: WRITE
  • Prompt: !," The latest date for future bookings (based on the limits from the selected",!," clinics) is: "
  • Line Location: LIM+1
Function Call: WRITE
  • Prompt: Y," If you enter a date here, it must be less than this",!," date to further limit the search"
  • Line Location: LIM+1
Function Call: WRITE
  • Prompt: !,*7,"No 'SL' node defined - cannot proceed with this clinic"
  • Line Location: AV+0
Function Call: WRITE
  • Prompt: !,"NO AVAILABILITY FOUND"
  • Line Location: END+1
Function Call: WRITE
  • Prompt: !
  • Line Location: END+3
Info |  Source |  Entry Points |  Interaction Calls