1 02/03/84  move_names_
 2 
 3 
 4 Entry points in move_names_:
 5    (List is generated by the help command)
 6 
 7 
 8 :Entry: move_names_: 02/03/84  move_names_
 9 
10 
11 Function: moves all the entry names, except the one used to designate
12 the original segment, from one segment to another.  Name duplications
13 are handled by nd_handler_.
14 
15 
16 Syntax:
17 declare move_names_ external entry (char(*), char(*), char(*), char(*),
18      char(*), bit(1) aligned, fixed bin(35));
19 call move_names_ (dir_name, entry_name, target_dir, target_name,
20      caller, error_sw, code);
21 
22 
23 Arguments:
24 dir_name
25    is the directory in which the original segment is found.  (Input)
26 entry_name
27    is a name on the original segment.  (Input)
28 target_dir
29    is the target segment's directory.  (Input)
30 target_name
31    is a name already on the target segment.  (Input)
32 caller
33    is the name of the calling procedure; it is used in calls to
34    nd_handler_.  (Input)
35 
36 
37 error_sw
38    indicates which segment the error indicated by "code" occurred on;it
39    is set to "0"b if the error was on the original segment and to "1"b
40    if on the target.  (Output)
41 code
42    is a standard status code.  (Output)
43 
44 
45 Notes:  If a name duplication occurs and the conflicting name is not
46 deleted, then the code "error_table_$namedup" is returned to the
47 caller.  The names that occur after the conflicting name are processed.