1 /* BEGIN INCLUDE FILE ... ls_usage_types.incl.pl1 */
 2 
 3 /****^  HISTORY COMMENTS:
 4   1) change(86-06-30,Coren), approve(86-06-30,MCR7415),
 5      audit(86-07-02,Margolin), install(86-07-11,MR12.0-1092):
 6      Initial implementation.
 7   2) change(87-05-26,GDixon), approve(87-07-13,MCR7679),
 8      audit(87-07-16,Brunelle), install(87-08-04,MR12.1-1056):
 9       A) Add LS_USAGE_VALUES constant array.
10                                                    END HISTORY COMMENTS */
11 
12 /* Defines the permissible values for the "usage_type" field in the acctive_connection_list entry and elsewhere */
13 
14 dcl (LS_ENDPOINT_USAGE initial (0),                         /* an endpoint for logins, UFT, etc */
15      LS_LOGIN_USAGE initial (1),                            /* primary login connection */
16      LS_DIAL_USAGE initial (2),                             /* assigned to dial server */
17      LS_DIAL_OUT_USAGE initial (3),                         /* user did dial_out operation */
18      LS_SLAVE_ATTACH_USAGE initial (4),                     /* user did slave attachment */
19      LS_MC_USAGE initial (5))                               /* message coordinator channel */
20         fixed bin internal static options (constant);
21 
22 dcl  LS_USAGE_VALUES (0:5) char(16) varying int static options(constant) init(
23           "endpoint",
24           "login",
25           "dial-in",
26           "dial-out",
27           "slave attach",
28           "msg coord");
29 
30 /* END INCLUDE FILE ... ls_usage_types.incl.pl1 */