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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: SDMULT

Package: Scheduling

Routine: SDMULT


Information

SDMULT ;ALB/TMP - MAKE MULTI-CLINIC APPOINTMENTS ; 02 Jan 2000 6:30 PM

Source Information

Source file <SDMULT.m>

Entry Points

Name Comments DBIA/ICR reference
1
RD
C
LEN
CNAM(SDCL) ;Return clinic name

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?10,*7,"PATIENT HAS DIED."
  • Line Location: 1+1
Function Call: WRITE
  • Prompt: !!,"YOU MAY SELECT FROM 2-4 CLINICS",!
  • Line Location: 1+4
Function Call: WRITE
  • Prompt: !,*7,"MUST HAVE MORE THAN 1 CLINIC"
  • Line Location: RD+3
Function Call: WRITE
  • Prompt: !,?5,"Clinic MUST be corrected before continuing."
  • Line Location: RD+5
Function Call: WRITE
  • Prompt: !,*7,"This clinic has already been selected"
  • Line Location: RD+6
Function Call: WRITE
  • Prompt: !,*7,"Access to ",$$CNAM(+Y)," is prohibited!",!,"Only users with a special code may access this clinic.",*7
  • Line Location: C+0
Function Call: WRITE
  • Prompt: !,"CLINIC IGNORED!!"
  • Line Location: C+1
Function Call: WRITE
  • Prompt: !,"No appt length specified - cannot book appts"
  • Line Location: C+2
Function Call: READ
  • Prompt: "// "
  • Variable: X
  • Timeout: DTIME
  • Line Location: LEN+0
Function Call: WRITE
  • Prompt: !," APPOINTMENT LENGTH DESIRED: ",+SL
  • Line Location: LEN+0
Function Call: WRITE
  • Prompt: !,*7,$P(Y,"^",2)," has max # of days for future booking undef or = 0"
  • Line Location: LEN+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls
^SC - [#44] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call