1 /*  START OF:       rmdb_rename_object_info.incl.pl1          *  *  *  *  *  *  *  *  *  *  *  *  *  *  *  *  */
 2 
 3 
 4 /****^  HISTORY COMMENTS:
 5   1) change(85-12-03,Spitzer), approve(85-12-03,MCR7311),
 6      audit(86-09-02,Blair), install(86-10-16,MR12.0-1187):
 7      Contains a list of attribute, domains or relations to rename
 8                                                    END HISTORY COMMENTS */
 9 
10 dcl rename_object_info_count fixed bin (17);
11 dcl rename_object_info_ptr ptr;
12 dcl rename_object_info_version_1 char (8) int static options (constant) init ("roi 1.0");
13 
14 dcl 1 rename_object_info based (rename_object_info_ptr),
15      2 version char (8),
16      2 type fixed bin (17) unal,
17      2 count fixed bin (17),
18      2 names (rename_object_info_count refer (rename_object_info.count)),
19       3 from char (32),
20       3 to char (32);
21 
22 dcl (RENAME_ATTRIBUTE init (1),
23      RENAME_DOMAIN init (2),
24      RENAME_RELATION init (3)) fixed bin (17) int static options (constant);
25 
26 /*  END OF:         rmdb_rename_object_info.incl.pl1          *  *  *  *  *  *  *  *  *  *  *  *  *  *  *  *  */