1 /*  BEGIN INCLUDE FILE ... uc_validate_info.incl.pl1 */
 2 
 3 /****^  HISTORY COMMENTS:
 4   1) change(87-05-14,GDixon), approve(87-07-13,MCR7737),
 5      audit(87-07-16,Brunelle), install(87-08-04,MR12.1-1056):
 6       A) Explicitly declare pad fields.
 7       B) Remove channel_info.line_type, since that is now stored in
 8          ute.line_type.
 9       C) Shift declarations to reduce padding needed for doubleword aligned
10          values.
11                                                    END HISTORY COMMENTS */
12 
13 /* format: style4,indattr */
14 
15 dcl  uc_validate_info_ptr   ptr automatic;
16 
17 dcl  1 uc_validate_info     structure aligned
18                             based (uc_validate_info_ptr),
19        2 input_info,
20          3 channel_info,
21            4 access_class_range (2) bit (72),
22          3 password         char (32) unaligned,
23          3 flags            aligned,
24            4 check_channel_access bit (1) unaligned,
25            4 check_anonymous_password bit (1) unaligned,
26            4 pad1           bit (36 - 2) unaligned,
27        2 output_info,
28          3 flags            aligned,
29            4 password_expired bit (1) unaligned,
30            4 password_unused_too_long bit (1) unaligned,
31            4 changed_password bit (1) unaligned,
32            4 changed_default_project bit (1) unaligned,
33            4 default_authorization_changed bit (1) unaligned,
34            4 pad2           bit (36 - 5) unaligned,
35          3 number_disconnected_processes fixed bin,
36          3 pad3             fixed bin,
37          3 password_interval fixed bin (71),
38          3 last_bad_pw_info,
39            4 time           fixed bin (71),
40            4 terminal_type  char (32) unaligned,
41            4 terminal_id    char (4) unaligned,
42            4 line_type      fixed bin,
43            4 number         fixed bin,
44            4 pad4           fixed bin,
45          3 last_login_info,
46            4 time           fixed bin (71),
47            4 terminal_type  char (32) unaligned,
48            4 terminal_id    char (4) unaligned,
49            4 line_type      fixed bin;
50 
51 /*  END INCLUDE FILE ... uc_validate_info.incl.pl1 */