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

Package: Kernel

Routine: ZTMOVE


Information

%ZTMOVE ;SF/STAFF - Easier Multi-CPU routine transfers ;12/27/94 09:26

Source Information

Source file <ZTMOVE.m>

Entry Points

Name Comments DBIA/ICR reference
OUT
EXIT
WHERE
WHEX
ESC
ALL ;
SEND
SENDREM
SENDLOC
NODE
ERR
IN ;
AUTO ;AUTO-LOAD

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This will move the complete text of the routines selected to",!,"the MGR account of the system being moved to."
  • Line Location: OUT+1
Function Call: WRITE
  • Prompt: !,"If you send a large number of routines you may run out of disk space",!,"on the target system.",!!
  • Line Location: OUT+2
Function Call: WRITE
  • Prompt: !,"From ",HOME," send what routines!"
  • Line Location: OUT+3
Function Call: WRITE
  • Prompt: !!,"You're in ",HOME
  • Line Location: OUT+4
Function Call: WRITE
  • Prompt: !!,"Then..."
  • Line Location: OUT+5
Function Call: WRITE
  • Prompt: !!,"Starting to send!"
  • Line Location: OUT+6
Function Call: READ
  • Variable: SYS
  • Timeout: DTIME
  • Line Location: WHERE+0
Function Call: WRITE
  • Prompt: !,"To which Volume Set (2-7 letters or * for all) to send routines? "
  • Line Location: WHERE+0
Function Call: WRITE
  • Prompt: !,*7,"THIS IS THE SAME SYSTEM!!"
  • Line Location: WHERE+1
Function Call: READ
  • Formatting: !
  • Prompt: "Auto-load or Manual: Manual//"
  • Variable: X
  • Timeout: DTIME
  • Line Location: WHERE+2
Function Call: READ
  • Formatting: !
  • Prompt: "Enter UCI to unload into: "
  • Variable: UCI
  • Timeout: DTIME
  • Line Location: WHERE+3
Function Call: READ
  • Formatting: !
  • Prompt: "Auto-load or Manual: Manual//"
  • Variable: X
  • Timeout: DTIME
  • Line Location: ALL+1
Function Call: WRITE
  • Prompt: !!,">>ROUTINES WILL NOW BE SENT TO "_SYS_" MACHINE"
  • Line Location: SENDREM+1
Function Call: WRITE
  • Prompt: " AS TASK # ",ZTSK," <<",!
  • Line Location: SENDREM+1
Function Call: WRITE
  • Prompt: !,"REMEMBER YOU MUST LOAD THE ROUTINES IN MANUALLY AT THE OTHER CPU",!,"WITH 'D IN^%ZTMOVE'"
  • Line Location: SENDREM+3
Function Call: WRITE
  • Prompt: !!
  • Line Location: SENDREM+4
Function Call: WRITE
  • Prompt: " Scheduled"
  • Line Location: SENDREM+7
Function Call: WRITE
  • Prompt: !!,">>ROUTINES WILL NOW BE SENT TO THIS MACHINE AS TASK # ",ZTSK," <<",!
  • Line Location: SENDLOC+1
Function Call: WRITE
  • Prompt: !,"REMEMBER YOU MUST LOAD THE ROUTINES IN MANUALLY ",!,"WITH 'D IN^%ZTMOVE'"
  • Line Location: SENDLOC+2
Function Call: WRITE
  • Prompt: !!
  • Line Location: SENDLOC+3
Function Call: WRITE
  • Prompt: " Scheduled"
  • Line Location: SENDLOC+6
Function Call: WRITE
  • Prompt: !,"CANNOT SEND TO '"_SYS_"'!",!
  • Line Location: ERR+0
Function Call: READ
  • Formatting: !
  • Prompt: "Task Number: "
  • Variable: ZTSK
  • Timeout: DTIME
  • Line Location: IN+2
Function Call: WRITE
  • Prompt: !,"Enter a number between ",$O(^%ZTSK(.1))," and ",^%ZTSK(-1),"!"
  • Line Location: IN+3
Function Call: READ
  • Formatting: !
  • Prompt: "Delete Task After Loading? "
  • Variable: YN
  • Timeout: DTIME
  • Line Location: IN+4
Function Call: WRITE
  • Prompt: !!?3,*7,"No such task number exists.",!
  • Line Location: IN+6
Function Call: WRITE
  • Prompt: !!?3,*7,"Not a 'ZTMOVE' task!"
  • Line Location: IN+7
Function Call: WRITE
  • Prompt: !!,N,^(0,"ZTMOVE"),!,"READY TO BE LOADED INTO '",Y
  • Line Location: IN+8
Function Call: READ
  • Prompt: "' ...OK? YES// "
  • Variable: X
  • Timeout: DTIME
  • Line Location: IN+9
Function Call: WRITE
  • Prompt: !
  • Line Location: IN+10
Info |  Source |  Entry Points |  Interaction Calls