1 /* BEGIN INCLUDE FILE sub_error_info.incl.pl1 */ 2 /* format: style2 */ 3 4 /* The include file condition_info_header must be used with this file */ 5 6 declare sub_error_info_ptr pointer; 7 declare 1 sub_error_info aligned based (sub_error_info_ptr), 8 2 header aligned like condition_info_header, 9 2 retval fixed bin (35), /* return value */ 10 2 name char (32), /* module name */ 11 2 info_ptr ptr; 12 13 declare sub_error_info_version_1 14 internal static options (constant) fixed bin init (1); 15 16 /* END INCLUDE FILE sub_error_info.incl.pl1 */