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

Package: Kernel

Routine: XQ62


Information

XQ62 ;SEA/MJM - Generalized file look-up utility ;8/2/89 09:53;5/13/93 11:53 AM

Source Information

Source file <XQ62.m>

Entry Points

Name Comments DBIA/ICR reference
MENU
ASK ;Get user's response, check it, and branch to subroutine
USER ;Look at the User File
MAILG ;Examine a mail group
PRINT
OUT ;Clean up and return

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,?5,"Please choose the information you would like to examine by number",!!,?10,$S($D(XQ6):"1. The key file",1:"1. Help Frame File"),!!,?10,"2. Current ",$S($D(XQ6):"holders of a key",1:"editors of a help frame")
  • Line Location: MENU+0
Function Call: WRITE
  • Prompt: !!,?10,"3. The User File",!!,?10,"4. A mail group"
  • Line Location: MENU+1
Function Call: READ
  • Timeout: DTIME
  • Line Location: ASK+1
Function Call: WRITE
  • Prompt: " ??",*7,!!,"Please enter the number corresponding to the information you seek or '^' to quit."
  • Line Location: ASK+1
Function Call: WRITE
  • Prompt: !!
  • Line Location: ASK+2
Function Call: WRITE
  • Prompt: !!,"Something's wrong...what was it you wanted again? "
  • Line Location: ASK+9
Function Call: WRITE
  • Prompt: !!," Members are: "
  • Line Location: MAILG+1
Function Call: WRITE
  • Prompt: !
  • Line Location: MAILG+1
Function Call: WRITE
  • Prompt: !!,?5," There is no one listed in the file.",!!
  • Line Location: PRINT+1
Function Call: WRITE
  • Prompt: !,?5,I
  • Line Location: PRINT+2
Info |  Source |  Entry Points |  Interaction Calls