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

Package: Scheduling

Routine: SDAMWI


Information

SDAMWI ;ALB/MJK - Unscheduled Appointments ; 5/3/05 5:50pm

Source Information

Source file <SDAMWI.m>

Entry Points

Name Comments DBIA/ICR reference
EN(DFN,SC) ; -- main entry point
; input: DFN ; SC := clinic#
; returned: success or fail := 1/0
ENQ
TIME(DFN,SC,SDT) ; -- get appt date/time
; input: DFN ; SC := clinic#
; output: SDT := date/time of wi appt
; returned: success or fail := 1/0
ASK
TIMEQ
CANCHK(SC,SDT) ; -- is clinic cancelled for date
; input: SC := clinic# ; SDT := date/time of wi appt
; returned: success or fail := 1/0
CANCHKQ
AVAIL(SC,SDT) ; -- does clinic meet
; input: SC := clinic# ; SDT := date/time of wi appt
; returned: success or fail := 1/0
AVAILQ
CL(DFN) ; -- make wi appt
; input: DFN
; returned: success or fail := 1/0
CLQ
PT(SC) ;
; input: SC := clinic#
; returned: success or fail := 1/0
PTQ

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?5,*7,"o Patient has died!"
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !!?5,*7,"o Clinic is inactive from ",$$FTIME^VALM1(SDIN)," to "_SDRE1
  • Line Location: EN+9
Function Call: WRITE
  • Prompt: !!?5,*7,"o Clinic is inactive as of ",$$FTIME^VALM1(SDIN)
  • Line Location: EN+10
Function Call: WRITE
  • Prompt: !,?5,*7,"o Clinic MUST be corrected before continuing."
  • Line Location: EN+12
Function Call: READ
  • Formatting: !!
  • Prompt: "APPOINTMENT TIME: NOW// "
  • Variable: X
  • Timeout: DTIME
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: !?5,*7,"o Patient already has an appt on ",$$FTIME^VALM1(SDT)
  • Line Location: ASK+9
Function Call: WRITE
  • Prompt: !?5,*7,"o This date's clinic has been cancelled!"
  • Line Location: CANCHK+7
Function Call: WRITE
  • Prompt: !?5,*7,"o Warning: Part of this day's clinic has been cancelled!"
  • Line Location: CANCHK+8
Function Call: WRITE
  • Prompt: !?5,*7,"o Clinic does not meet on this date!"
  • Line Location: AVAIL+7

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