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

Package: Toolkit

Routine: XINDX6


Information

XINDX6 ;ISC/REL,GRK - GET SET OF ROUTINES TO INDEX ;07/22/08 13:54

Source Information

Source file <XINDX6.m>

Entry Points

Name Comments DBIA/ICR reference
L7
DEVICE
END
PARAM ;Setup Parameters
QUICK(RL) ;Quick Report, Just errors on some routines.
ANS(PR,DEF,HELP) ;Ask question get answer
YN
NY
RD
RLIST
ASKRTN ;Collect a list of routines to index.
R1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$C(7),"This report could take some time, Remember to QUEUE the report.",!
  • Condition for execution: NRO>2
  • Line Location: DEVICE+0
Function Call: WRITE
  • Prompt: !,$C(7),"XINDEX terminated. No device specified."
  • Line Location: DEVICE+0
Function Call: WRITE
  • Prompt: !,"Do you really mean queue to this device? NO//"
  • Line Location: DEVICE+2
Function Call: WRITE
  • Prompt: !!,"Ok, tell me again ..."
  • Line Location: DEVICE+2
Function Call: WRITE
  • Prompt: !,"No Routines to process.",!
  • Line Location: QUICK+9
Function Call: WRITE
  • Prompt: !!,PR
  • Line Location: ANS+1
Function Call: WRITE
  • Prompt: !,HELP
  • Condition for execution: $D(HELP)
  • Line Location: YN+0
Function Call: WRITE
  • Prompt: !,"Please enter 'Y' or return for YES, 'N' for NO"
  • Line Location: YN+0
Function Call: WRITE
  • Prompt: !,HELP
  • Condition for execution: $D(HELP)
  • Line Location: NY+0
Function Call: WRITE
  • Prompt: !,"Please enter 'N' or return for NO, 'Y' for YES"
  • Line Location: NY+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: RD+0
Function Call: WRITE
  • Prompt: !,"Please select one of the choices."
  • Line Location: RLIST+0
Function Call: WRITE
  • Prompt: !!,"LIST OF ROUTINES TO BE INDEXED; PRESS RETURN TO TERMINATE LIST",!
  • Line Location: ASKRTN+4
Function Call: READ
  • Formatting: !
  • Prompt: "ROUTINE NAME: "
  • Variable: ROU
  • Timeout: $S($G(DTIME):DTIME,1:360)
  • Line Location: R1+0
Function Call: WRITE
  • Prompt: " INVALID ROUTINE NAME"
  • Line Location: R1+1
Function Call: WRITE
  • Prompt: " INVALID ROUTINE NAME"
  • Line Location: R1+2
Info |  Source |  Entry Points |  Interaction Calls