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

Package: Kernel

Routine: XUTMUSE


Information

XUTMUSE ;SEA/RDS - TaskMan: Option, XUTMUSER, Part 1 (Driver) ;11/30/94 11:43

Source Information

Source file <XUTMUSE.m>

Entry Points

Name Comments DBIA/ICR reference
ENV ;Establish Routine Environment
SELECT ;Prompt User For Action
ACT ;SELECT Subroutine--Act On User's Selection
HELP1 ;ENV Subroutine--Help Message For Initial Task Selection For "?"
HELP2 ;Subroutine--Help Message For Initial Task Selection For "??"
H1
H2
H3
HPRINT ;HELP2 Subroutine--Print A Task
SORT ;HELP2--sort tasks by start time, in reverse order
HELP3 ;ACT Subroutine--Help Message For Task Reselection For "?"
EOP ;Simulate DIR(0)="E" Call To DIR (For Use Within DIR calls)
EOL ;Simulate DIR(0)="E" call to DIR for end of listings

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: ACT+2
Function Call: WRITE
  • Prompt: !
  • Line Location: ACT+3
Function Call: WRITE
  • Prompt: !!,"This option will allow you to look at and manipulate your queued jobs, and is",!?5,"only useful for you when you have such jobs to work with."
  • Line Location: HELP1+1
Function Call: WRITE
  • Prompt: !!,"You must begin this option by entering the task number of the queued job that",!?5,"you want to work with first."
  • Line Location: HELP1+2
Function Call: WRITE
  • Prompt: !!,"If you don't know the task number of any of your queued jobs then enter",!?5,"two question marks ('??') and you will be shown all of your queued jobs",!?5,"on this computer."
  • Line Location: HELP1+3
Function Call: WRITE
  • Prompt: " The task number of each task is the number listed on the",!?5,"first line of the display, before the colon (':')."
  • Line Location: HELP1+4
Function Call: WRITE
  • Prompt: !!,"After you pick a task to work with, you will be shown a list of the things",!?5,"you can do with that task, and will be asked to pick one.",!
  • Line Location: HELP1+5
Function Call: WRITE
  • Prompt: @IOF,"Please wait while I find your tasks...searching..."
  • Line Location: HELP2+3
Function Call: WRITE
  • Prompt: "finished!",!
  • Line Location: H3+0
Function Call: WRITE
  • Prompt: !,"There are no tasks listed that were queued by you.",!
  • Line Location: H3+1
Function Call: WRITE
  • Prompt: !
  • Line Location: H3+5
Function Call: WRITE
  • Prompt: !,"-------------------------------------------------------------------------------"
  • Line Location: HPRINT+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HPRINT+5
Function Call: WRITE
  • Prompt: !!,"Enter the task number of the queued job you want to work with."
  • Line Location: HELP3+1
Function Call: WRITE
  • Prompt: !!,"Enter '??' to see the list of tasks you can choose from.",!
  • Line Location: HELP3+2
Function Call: READ
  • Formatting: !
  • Prompt: "Press RETURN to continue or '^' to exit: "
  • Variable: Y
  • Timeout: $S($D(DTIME)#2:DTIME,1:60)
  • Line Location: EOP+1
Function Call: READ
  • Formatting: !
  • Prompt: "End of listing. Press RETURN to continue: "
  • Variable: Y
  • Timeout: $S($D(DTIME)#2:DTIME,1:60)
  • Line Location: EOL+1
Info |  Source |  Entry Points |  Interaction Calls