1 & Modified August 1981 by F. W. Martinson for MR9.0
 2 & ec to install changes of directory structure and file
 3 & organization for new MR9 volume backup subsystem
 4 &command_line off
 5 &if [equal [user name] Volume_Dumper] &then &else &goto err1
 6 &if  [not [exists dir >daemon_dir_dir>volume_retriever]] &then  goto err
 7 cd >daemon_dir_dir>volume_backup
 8 cd >daemon_dir_dir>volume_backup>contents
 9 cd >daemon_dir_dir>volume_backup>pvolog
10 sis >daemon_dir_dir>volume_backup rew *.SysDaemon rew *.Daemon rew *.SysAdmin rew *.SysMaint
11 sis >daemon_dir_dir>volume_backup>contents rew *.SysDaemon rew *.Daemon rew *.SysAdmin rew *.SysMaint
12 sis >daemon_dir_dir>volume_backup>pvolog rew *.SysDaemon rew *.Daemon rew *.SysAdmin rew *.SysMaint
13 mv *.contents >daemon_dir_dir>volume_backup>contents>==
14 mv *.pvolog >daemon_dir_dir>volume_backup>pvolog>==
15 mv *.volog >daemon_dir_dir>volume_backup>==
16 mv *.volumes >daemon_dir_dir>volume_backup>==
17 &quit
18 &label err
19 &print ">daemon_dir_dir>volume_retriever" does not exist"
20 &quit
21 &label err1
22 &print This exec_com must be executed by Volume_Dumper personid
23 &print from the Volume_Dumper home_dir.
24 &quit