1 /* BEGIN INCLUDE FILE...ls_error_info.incl.pl1 */
 2 
 3 /****^  HISTORY COMMENTS:
 4   1) change(85-04-01,Coren), approve(87-07-14,MCR7679), audit(87-03-18,GDixon),
 5      install(87-08-04,MR12.1-1056):
 6      Initial coding.
 7                                                    END HISTORY COMMENTS */
 8 
 9 /* This include file defines information to be passed by a login dialogue
10    control point to its parent in order for the latter to write an error
11    message.
12 */
13 
14 
15 dcl  ls_error_info_ptr pointer;
16 
17 dcl 1 ls_error_info aligned based (ls_error_info_ptr),
18     2 version char (8),                                     /* lseiNNNN */
19     2 caller_name char (32),                                /* name of program that generated the error */
20     2 reply_event_channel fixed bin (71),                   /* event channel over which to send wakeup after message has been printed */
21     2 error_message_length fixed bin,                       /* length of significant part of error message */
22     2 error_message char (256);
23 
24 dcl  LS_ERROR_INFO_V1 char (8) internal static options (constant) initial ("lsei0001");
25 
26 /* END INCLUDE FILE...ls_error_info.incl.pl1 */