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

Package: Kernel

Routine: ZTMCHK1


Information

ZTMCHK1 ;SEA/RDS-Taskman: Option, ZTMCHECK, Part 2 ;5/31/07 12:13

Source Information

Source file <ZTMCHK1.m>

Entry Points

Name Comments DBIA/ICR reference
LINKS ;Check Required Volume Sets' Links
EOP ;Pause at end of page
INFO ;Display Task Manager's Information
STATUS ;Display Task Manager's Status-Related Information
DONE ;Prompt To Continue And Quit
EXIT
MGR ;LINKS--lookup name of another volume set's library uci
LK ;Check one link
ERLINKS ;Error Trap For LINKS Code

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Checking the links to the required volume sets..."
  • Line Location: LINKS+1
Function Call: WRITE
  • Prompt: !?5,"There are no volume sets whose links are required!"
  • Line Location: LINKS+4
Function Call: WRITE
  • Prompt: !!,"Checks completed...Taskman's environment is okay!"
  • Line Location: LINKS+5
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: WRITE
  • Prompt: !
  • Line Location: EOP+1
Function Call: WRITE
  • Prompt: @IOF,!!,"Here is the information that Taskman is using:"
  • Line Location: INFO+1
Function Call: WRITE
  • Prompt: !?5,"Operating System: ",$P(ZTOS,U)
  • Line Location: INFO+2
Function Call: WRITE
  • Prompt: !?5,"Volume Set: ",ZTVOL
  • Line Location: INFO+3
Function Call: WRITE
  • Prompt: !?5,"Cpu-volume Pair: ",ZTPAIR
  • Line Location: INFO+4
Function Call: WRITE
  • Prompt: !?5,"TaskMan Files UCI and Volume Set: ",$P(ZTVSS,U,6),","
  • Line Location: INFO+5
Function Call: WRITE
  • Prompt: $S(X="":ZTVOL,$D(^%ZIS(14.5,X,0))[0:ZTVOL,$P(^(0),U)="":ZTVOL,1:$P(^(0),U))
  • Line Location: INFO+5
Function Call: WRITE
  • Prompt: !!?5,"Log Tasks? ",$P(ZTPS,U,3)
  • Line Location: INFO+6
Function Call: WRITE
  • Prompt: !?5,"Task Partition Size: ",ZTSIZ
  • Line Location: INFO+8
Function Call: WRITE
  • Prompt: !?5,"Submanager Retention Time: ",ZTRET
  • Line Location: INFO+9
Function Call: WRITE
  • Prompt: !?5,"Min Submanager Count: ",$P(ZTPS,U,12)
  • Line Location: INFO+10
Function Call: WRITE
  • Prompt: !?5,"Taskman Hang Between New Jobs: ",ZTSLO
  • Line Location: INFO+11
Function Call: WRITE
  • Prompt: !?5,"TaskMan running as a type: ",$P("^COMPUTE^PRINT^GENERAL^","^",$F("CPG",$P(ZTPS,U,9)))
  • Line Location: INFO+12
Function Call: WRITE
  • Prompt: !?5,"TaskMan is using VAX enviroment: ",$P(ZTPS,U,10)
  • Line Location: INFO+13
Function Call: WRITE
  • Prompt: !?5,"TaskMan is using '",^(2),"' for load balancing"
  • Line Location: INFO+15
Function Call: WRITE
  • Prompt: !?5,"Balance Interval: ",$P(ZTPS,U,14)
  • Line Location: INFO+16
Function Call: WRITE
  • Prompt: !!?5,"Logons Inhibited?: ",ZTVLI
  • Line Location: STATUS+1
Function Call: WRITE
  • Prompt: !?5,"Taskman Job Limit: ",ZTVMJ
  • Line Location: STATUS+2
Function Call: WRITE
  • Prompt: !?5,"Max sign-ons: ",$P($G(^XTV(8989.3,1,4,+%,0)),U,3)
  • Line Location: STATUS+3
Function Call: WRITE
  • Prompt: !?5,"Current number of active jobs: ",Y
  • Line Location: STATUS+4
Function Call: READ
  • Formatting: !
  • Prompt: "End of listing. Press RETURN to continue: "
  • Variable: Y
  • Timeout: $S($D(DTIME)#2:DTIME,1:60)
  • Line Location: DONE+1
Function Call: WRITE
  • Prompt: !?5,"The link to volume set ",ZTS," is present!"
  • Line Location: LK+2
Function Call: WRITE
  • Prompt: !?5,"The link to volume set ",ZTS," appears to be down!",$C(7)
  • Line Location: ERLINKS+1
Info |  Source |  Entry Points |  Interaction Calls