1 /* BEGIN include file dc_find_dcls.incl.pl1 */
 2 
 3 /* Calling sequences for dc_find.  Keith Loepere, June 1984. */
 4 /* Added a few more, October 1984. */
 5 /* 85-05-08, EJ Sharpe: added obj_delete_uid, obj_status_read_uid, and obj_status_read_raw_uid */
 6 /* 85-05-15, EJ Sharpe: changed dir_write_raw_uid to mdir_set_quota_uid */
 7 
 8 /* format: style4,indattr,ifthenstmt,ifthen,idind35,^indcomtxt */
 9 
10 dcl  DC_FIND_CHASE                      fixed bin (1) static options (constant) init (1);
11 dcl  DC_FIND_NO_CHASE                   fixed bin (1) static options (constant) init (0);
12 dcl  DC_FIND_NO_UNLOCK_DIR              bit (1) aligned static options (constant) init ("0"b);
13 dcl  DC_FIND_UNLOCK_DIR                 bit (1) aligned static options (constant) init ("1"b);
14 
15 dcl  dc_find$dir_for_append             entry (char (168), char (32), fixed bin (1), ptr, ptr, fixed bin (35));
16 dcl  dc_find$dir_for_append_raw         entry (char (168), char (32), fixed bin (1), ptr, ptr, fixed bin (35));
17 dcl  dc_find$dir_for_retrieve_append    entry (char (168), char (32), fixed bin (1), ptr, ptr, ptr, fixed bin (35));
18 
19 dcl  dc_find$dir_initiate               entry (char (168), ptr, fixed bin (35));
20 
21 dcl  dc_find$dir_move_quota             entry (char (168), ptr, ptr, fixed bin (35));
22 
23 dcl  dc_find$dir_read                   entry (char (168), ptr, fixed bin (35));
24 dcl  dc_find$dir_read_priv              entry (char (168), ptr, fixed bin (35));
25 
26 dcl  dc_find$dir_reclassify             entry (char (168), ptr, ptr, ptr, fixed bin (35));
27 
28 dcl  dc_find$dir_salvage                entry (char (168), bit (36) aligned, ptr, fixed bin (35));
29 
30 dcl  dc_find$dir_write                  entry (char (168), fixed bin (18) uns, ptr, fixed bin (35));
31 dcl  dc_find$dir_write_priv             entry (char (168), fixed bin (18) uns, ptr, fixed bin (35));
32 
33 dcl  dc_find$finished                   entry (ptr, bit (1) aligned);
34 
35 dcl  dc_find$link_target                entry (char (168), char (32), fixed bin (35));
36 
37 dcl  dc_find$mdir_set_quota_uid         entry ((0:15) bit (36) aligned, char (168), fixed bin (18) uns, ptr, ptr, fixed bin (35));
38 
39 dcl  dc_find$obj_access_write           entry (char (168), char (32), fixed bin (1), fixed bin (18) uns, ptr, fixed bin (35));
40 dcl  dc_find$obj_access_write_priv      entry (char (168), char (32), fixed bin (1), fixed bin (18) uns, ptr, fixed bin (35));
41 
42 dcl  dc_find$obj_attributes_read        entry (char (168), char (32), fixed bin (1), ptr, fixed bin (35));
43 dcl  dc_find$obj_attributes_read_ptr    entry (ptr, ptr, fixed bin (35));
44 
45 dcl  dc_find$obj_attributes_write       entry (char (168), char (32), fixed bin (1), fixed bin (18) uns, ptr, fixed bin (35));
46 dcl  dc_find$obj_attributes_write_ptr   entry (ptr, fixed bin (18) uns, ptr, fixed bin (35));
47 
48 dcl  dc_find$obj_bc_delta_write         entry (char (168), char (32), fixed bin (24), ptr, fixed bin (35));
49 dcl  dc_find$obj_bc_delta_write_ptr     entry (ptr, fixed bin (24), ptr, fixed bin (35));
50 dcl  dc_find$obj_bc_write               entry (char (168), char (32), fixed bin (24), ptr, fixed bin (35));
51 dcl  dc_find$obj_bc_write_ptr           entry (ptr, fixed bin (24), ptr, fixed bin (35));
52 
53 dcl  dc_find$obj_delete                 entry (char (168), char (32), fixed bin (1), ptr, fixed bin (35));
54 dcl  dc_find$obj_delete_priv            entry (char (168), char (32), fixed bin (1), ptr, fixed bin (35));
55 dcl  dc_find$obj_delete_uid             entry ((0:15) bit (36) aligned, char (168), char (32), ptr, fixed bin (35));
56 dcl  dc_find$obj_delete_priv_uid        entry ((0:15) bit (36) aligned, char (168), char (32), ptr, fixed bin (35));
57 dcl  dc_find$obj_delete_ptr             entry (ptr, ptr, fixed bin (35));
58 
59 dcl  dc_find$obj_existence_ptr          entry (ptr, ptr, fixed bin (35));
60 
61 dcl  dc_find$obj_for_audit              entry (char (168), char (32), ptr, fixed bin (35));
62 
63 dcl  dc_find$obj_initiate               entry (char (168), char (32), ptr, fixed bin (35));
64 dcl  dc_find$obj_initiate_for_linker_dp entry (ptr, char (32), ptr, fixed bin (35));
65 dcl  dc_find$obj_initiate_raw           entry (char (168), char (32), ptr, fixed bin (35));
66 
67 dcl  dc_find$obj_linkage_ring_ptr       entry (ptr, fixed bin (35));
68 
69 dcl  dc_find$obj_modes_ptr              entry (ptr, bit (36) aligned, bit (36) aligned, (3) fixed bin (3), fixed bin (35));
70 
71 dcl  dc_find$obj_reclassify             entry (char (168), char (32), ptr, ptr, fixed bin (35));
72 
73 dcl  dc_find$obj_status_attributes_read entry (char (168), char (32), fixed bin (1), ptr, fixed bin (35));
74 
75 dcl  dc_find$obj_status_read            entry (char (168), char (32), fixed bin (1), ptr, fixed bin (35));
76 dcl  dc_find$obj_status_read_uid        entry ((0:15) bit (36) aligned, char (168), char (32), ptr, fixed bin (35));
77 dcl  dc_find$obj_status_read_priv       entry (char (168), char (32), fixed bin (1), ptr, fixed bin (35));
78 dcl  dc_find$obj_status_read_priv_ptr   entry (ptr, ptr, fixed bin (35));
79 dcl  dc_find$obj_status_read_priv_uid   entry ((0:15) bit (36) aligned, char (168), char (32), ptr, fixed bin (35));
80 dcl  dc_find$obj_status_read_raw_uid    entry ((0:15) bit (36) aligned, char (168), char (32), ptr, fixed bin (35));
81 dcl  dc_find$obj_status_read_ptr        entry (ptr, ptr, fixed bin (35));
82 
83 dcl  dc_find$obj_status_write           entry (char (168), char (32), fixed bin (1), fixed bin (18) uns, ptr, fixed bin (35));
84 dcl  dc_find$obj_status_write_priv      entry (char (168), char (32), fixed bin (1), fixed bin (18) uns, ptr, fixed bin (35));
85 dcl  dc_find$obj_status_write_priv_ptr  entry (ptr, fixed bin (18) uns, ptr, fixed bin (35));
86 dcl  dc_find$obj_status_write_ptr       entry (ptr, fixed bin (18) uns, ptr, fixed bin (35));
87 
88 dcl  dc_find$obj_terminate              entry (char (168), char (32), fixed bin (1), ptr, fixed bin (35));
89 dcl  dc_find$obj_terminate_ptr          entry (ptr, ptr, fixed bin (35));
90 
91 dcl  dc_find$obj_truncate               entry (char (168), char (32), ptr, fixed bin (35));
92 dcl  dc_find$obj_truncate_ptr           entry (ptr, ptr, fixed bin (35));
93 dcl  dc_find$obj_truncate_raw_ptr       entry (ptr, ptr, fixed bin (35));
94 
95 dcl  dc_find$obj_volume_retrieve        entry (char (168), char (32), ptr, ptr, fixed bin (35));
96 
97 dcl  dc_find$seg_fault                  entry (ptr, ptr, fixed bin (35));
98 
99 /* END include file dc_find_dcls.incl.pl1 */