1 &version 2
 2 &-  ***********************************************************
 3 &-  *                                                         *
 4 &-  * Copyright, (C) Honeywell Information Systems Inc., 1984 *
 5 &-  *                                                         *
 6 &-  ***********************************************************
 7 
 8 &- Created to allow the Hierarchy Dumper 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 &- Created 1985-02-21, BIM.
13 
14 &if &[equal [user name] Backup] &then &goto hbk_restrict
15 &if &[equal [user name] Dumper] &then &goto hbk_restrict
16 &quit
17 
18 &label hbk_restrict
19 enter_lss hierarchy_backup_dumper_lss
20 &quit
21