1 /*  START OF:       rmdb_relmgr_entries.incl.pl1              *  *  *  *  *  *  *  *  *  *  *  *  *  *  *  *  */
 2 
 3 
 4 /****^  HISTORY COMMENTS:
 5   1) change(82-08-20,Davids), approve(), audit(), install():
 6      written
 7   2) change(86-01-28,Spitzer), approve(86-01-28,MCR7311),
 8      audit(86-09-15,Gilcrease), install(86-10-16,MR12.0-1187):
 9      add get_tuples_by_spec, put_tuple, put_tuples, create_cursor entry points.
10   3) change(86-08-21,Blair), approve(86-08-21,MCR7311),
11      audit(86-09-15,Gilcrease), install(86-10-16,MR12.0-1187):
12      Back out the entries get_tuples_by_spec and put_tuples since they aren't
13      sufficiently well tested to be reliable.  Replace with get_tuple_id and
14      get_tuple_by_id.
15                                                    END HISTORY COMMENTS */
16 
17 
18 dcl 01 rmdb_relmgr_entries based (rmdb_relmgr_entries_ptr),
19      02 create_relation entry (char (*), char (*), ptr, ptr, bit (36) aligned,
20           bit (36) aligned, fixed bin (35)),
21      02 delete_relation entry (char (*), char (*), fixed bin (35)),
22      02 open entry (char (*), char (*), bit (36) aligned, fixed bin (35)),
23      02 close entry (bit (36) aligned, fixed bin (35)),
24      02 create_index entry (bit (36) aligned, ptr, bit (36) aligned, fixed bin (17),
25           bit (36) aligned, fixed bin (35)),
26      02 delete_index entry (bit (36) aligned, bit (36) aligned, fixed bin (35)),
27      02 put_tuple entry (ptr, ptr, bit (36) aligned, fixed bin (35)),
28      02 get_tuple_id entry (ptr, ptr, ptr, ptr, fixed bin (35)),
29      02 get_tuple_by_id entry (ptr, bit (36) aligned, ptr, ptr, ptr, fixed bin (35)),
30      02 create_cursor entry (bit (36) aligned, ptr, ptr, fixed bin (35));
31 
32 dcl rmdb_relmgr_entries_ptr ptr;
33 
34 /*  END OF:         rmdb_relmgr_entries.incl.pl1              *  *  *  *  *  *  *  *  *  *  *  *  *  *  *  *  */