1 &version 2
 2 &-  ***********************************************************
 3 &-  *                                                         *
 4 &-  * Copyright, (C) Honeywell Information Systems Inc., 1984 *
 5 &-  *                                                         *
 6 &-  ***********************************************************
 7 
 8 &- Created to allow the Volume Backup Daemons to run under a limited service subsystem.
 9 &- This exec_com should be run from the project_start_up_ process overseer to ensure
10 &- that these Daemons never reach an unprotected command level.
11 
12 &- Modified 1985-02-21, BIM: added _lss to names.
13 
14 &if &[equal [user name] Volume_Dumper] &then &goto volume_dumper
15 &if &[equal [user name] Volume_Retriever] &then &goto volume_retriever
16 &if &[equal [user name] Volume_Reloader] &then &goto volume_reloader
17 &quit
18 
19 &label volume_dumper
20 enter_lss volume_dumper_lss
21 &quit
22 
23 &label volume_retriever
24 enter_lss volume_retriever_lss
25 &quit
26 
27 &label volume_reloader
28 enter_lss volume_reloader_lss
29 &quit