1
2
3
4
5
6 dcl 1 dq_header based,
7 2 dhcks fixed bin (36) unsigned unaligned,
8 2 dhnam fixed bin (36) unsigned unaligned,
9 2 dhdat bit (36) unaligned,
10 2 dhtim fixed bin (36) unsigned unaligned,
11 2 dhbsn,
12 3 no_of_cea fixed bin (18) unsigned unaligned,
13 3 tss_ssn fixed bin (18) unsigned unaligned,
14 2 dhseq,
15 3 no_of_ceiu fixed bin (18) unsigned unaligned,
16 3 no_of_dss fixed bin (18) unsigned unaligned,
17 2 dhtns,
18 3 no_of_srts fixed bin (18) unsigned unaligned,
19 3 no_of_dsi fixed bin (18) unsigned unaligned,
20 2 dhrns fixed bin (36) unsigned unaligned;
21
22
23 dcl 1 dq_catalog based,
24 2 dcjid,
25 3 bcd_job_id bit (30) unaligned,
26 3 job_status fixed bin (6) unsigned unaligned,
27 2 dcseq,
28 3 jsn fixed bin (18) unsigned unaligned,
29 3 reserved bit (1) unaligned,
30 3 init_seq fixed bin (17) unsigned unaligned,
31 2 dcuid bit (72) unaligned,
32 2 dcdsd bit (36) unaligned,
33 2 dcdst fixed bin (35) unaligned,
34 2 dcelp fixed bin (35) unaligned,
35 2 dcusr,
36 3 not_used bit (18) unaligned,
37 3 b18_35_lswth bit (18) unaligned;
38
39 dcl 1 dq_dib based,
40 2 dbdat bit (36) unaligned,
41 2 dbtim bit (36) unaligned,
42 2 dblin fixed bin (36) unaligned unsigned,
43 2 dberr,
44 3 dbalt_cc fixed bin (18) unaligned unsigned,
45 3 dbdsc_cc fixed bin (18) unaligned unsigned,
46 2 dbptr,
47 3 dbdsc_ro fixed bin (18) unaligned unsigned,
48 3 ofn_ro fixed bin (17) unaligned,
49 2 dbflg,
50 3 alloc_perm bit (9) unaligned,
51 3 del_char char (1) unaligned,
52 3 f_res bit (1) unaligned,
53 3 f_sub bit (1) unaligned,
54 3 f_arg bit (1) unaligned,
55 3 f_del bit (1) unaligned,
56 3 f_exc bit (1) unaligned,
57 3 f_inc bit (1) unaligned,
58 3 f_lni bit (1) unaligned,
59 3 f_alt bit (1) unaligned,
60 3 f_fnq bit (1) unaligned,
61 3 f_ucs bit (1) unaligned,
62 3 f_lcs bit (1) unaligned,
63 3 arg_char char (1) unaligned,
64 2 rest (58) bit (36) unaligned;
65
66 dcl 1 cout_sector based,
67 2 filler_1 (6) bit (36),
68 2 c_lcfio,
69 3 sector_out fixed bin (18) unaligned unsigned,
70 3 sector_in fixed bin (18) unaligned unsigned,
71 2 c_lcfst,
72 3 init_sect_out fixed bin (18) unaligned unsigned,
73 3 start_term fixed bin (18) unaligned unsigned,
74 2 filler_2 (40) bit (36),
75 2 label_table (8),
76 3 label_name bit (54),
77 3 label_pos fixed bin (18) unaligned unsigned;
78
79