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

Package: Scheduling

Routine: SDNEXT


Information

SDNEXT ;ALB/TMP - FIND NEXT AVAILABLE APPOINTMENT FOR A CLINIC ; 18 APR 86

Source Information

Source file <SDNEXT.m>

Entry Points

Name Comments DBIA/ICR reference
1
DT
LIM
NEW ;entry point to be use for next available appt. 3/29/96
EXIT ;
LENGTH() ;
ST
EX
GETCLN(TEAM,CLINIC) ;add assoc. clinics for teams to clinic array
ADDCL(CLINIC,PTLIST) ;add team's associated clinics to clinic list
DRIVE(CLINICA,LEN,BEGEND) ;driver
CLEAN ;
ONE(CLNA) ;one clinic selected? 1 or 0
CONMA(CIEN,CONT) ;continue to view, exit or make appointment
PRT ;
EX2

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Prompt: "// "
  • Variable: X
  • Timeout: DTIME
  • Line Location: LIM+0
Function Call: WRITE
  • Prompt: !," ENTER LATEST DATE TO CHECK FOR 1ST AVAILABLE SLOT: "
  • Line Location: LIM+0
Function Call: WRITE
  • Prompt: !," The latest date for future bookings for ",$P(SDC(1),"^",2)," 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
Info |  Source |  Entry Points |  Interaction Calls