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

Package: Scheduling

Routine: SDLTP


Information

SDLTP ;ALB/LDB - PRINT SCHEDULING LETTERS ; 11/27/00 1:53pm

Source Information

Source file <SDLTP.m>

Entry Points

Name Comments DBIA/ICR reference
R
R1
R2
DIV
L0
DATE
QUE
EXIT
HELP
HELP1
PC
HELP2
PAT
EX
EXASK
MAX
IND
HLP3

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Prompt: !
  • Variable: "PRINT LETTER ASSIGNED TO THE CLINIC(S)" S %=1 D YN^DICN G
  • Timeout: '%
  • Line Location: R1+0
Function Call: READ
  • Variable: I VAUTC D EX G
  • Timeout: %Y="^"!($D(DTOUT))
  • Line Location: L0+3
Function Call: WRITE
  • Prompt: !,"LETTER TYPE MUST EXIST IN LETTERS TYPE FILE!"
  • Line Location: HELP+0
Function Call: WRITE
  • Prompt: !,"If you want to print another letter for the selected clinic(s), you must answer",!,"""N"""_" and select another letter of the appropriate type. If you do this, that ",!,"letter will print for (ALL) the selected clinic(s)."
  • Line Location: HELP1+0
Function Call: READ
  • Formatting: !
  • Prompt: "Enter 'P' for individual PATIENT letters or 'C' for letters by CLINIC: P// "
  • Variable: S1
  • Timeout: DTIME
  • Line Location: PC+0
Function Call: WRITE
  • Prompt: "??"
  • Line Location: PC+0
Function Call: WRITE
  • Prompt: !,"Entering 'P' will allow you to select PATIENT(S) and entering a 'C' will allow",!,"you to select CLINIC(S)."
  • Line Location: HELP2+0
Function Call: WRITE
  • Prompt: !,"RESPOND YES OR NO"
  • Line Location: EX+0
Function Call: WRITE
  • Prompt: !,*7,"THIS CLINIC HAS ALREADY BEEN SELECTED!"
  • Line Location: EXASK+0
Function Call: WRITE
  • Prompt: !,*7,"NO MORE THAN TEN CLINICS ALLOWED TO BE EXCLUDED"
  • Line Location: MAX+0
Function Call: WRITE
  • Prompt: !!,"If the clinic was cancelled for any length of time respond 'Y'.",!,"If individual appointments were cancelled without cancelling the clinic respond 'N'",!
  • Line Location: HLP3+0
Function Call: WRITE
  • Prompt: !,"CLINIC CANCELLATION LETTERS will be selectable with 'C' response.",!
  • Line Location: HLP3+1
Info |  Source |  Entry Points |  Interaction Calls