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

Package: Scheduling

Routine: SDRRCRR


Information

SDRRCRR ;10N20/MAH;clinic recall list report; 11/8/2006

Source Information

Source file <SDRRCRR.m>

Entry Points

Name Comments DBIA/ICR reference
STR
DATE ;SETS UP TO FROM DATE AND WILL GROUP BY MONTH IF SELECTED MULTIPLE MONTHS
EN ;all clinics by division
ENDIV ;
EDIV
ONDIV ;
ONDIV1 ;
EN1 ;BY CLINIC SELECTED CLINIC
REDO
CLIN ;
QQ
ONCLIN
ONCLIN1 ;
ENCLIN
ENCLIN1 ;
SET
QUIT

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: STR+2
Function Call: WRITE
  • Prompt: $C(7)," Can't be before Recall Date First - Try Again"
  • Line Location: DATE+2
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !!,"***This report requires 132 columns",!!
  • Line Location: ENDIV+1
Function Call: WRITE
  • Prompt: !!,"***This report requires 132 columns",!!
  • Line Location: ONDIV+1
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: REDO+1
Function Call: WRITE
  • Prompt: !,DIC("A")
  • Line Location: REDO+1
Function Call: WRITE
  • Prompt: D:X["?"
  • Condition for execution: '$D(VAUTNALL) "ALL// " R X:DTIME G QUIT:(X="^")!'$T
  • Line Location: REDO+1
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: REDO+3
Function Call: WRITE
  • Prompt: !,DIC("A")
  • Line Location: REDO+3
Function Call: WRITE
  • Prompt: !!,"Please select up to 20 clinics that you would like to print"
  • Line Location: QQ+0
Function Call: WRITE
  • Prompt: !!,"***This report requires 132 columns",!!
  • Line Location: ONCLIN+0
Function Call: WRITE
  • Prompt: !!,"***This report requires 132 columns",!!
  • Line Location: ENCLIN+0
Function Call: WRITE
  • Prompt: !?3,*7,"You have already selected that ",VAUTSTR,". Try again."
  • Line Location: SET+1

FileMan Files Accessed Via FileMan Db Call

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