1 /*        BEGIN INCLUDE FILE probe_error_table.incl.pl1     */
 2 /*        Created:  04/09/79 W. Olin Sibert                 */
 3 
 4 /*        Describes interim kludge version of probe error table */
 5 
 6 dcl  probe_et_$ fixed bin external static;
 7 
 8 dcl 1 probe_error_table aligned based (probe_error_table_ptr),
 9     2 n_messages fixed bin (35),
10     2 array (1000) aligned,
11       3 error_number fixed bin (35),
12       3 short_message char (40) varying,
13       3 long_message char (108) varying;
14 
15 dcl  probe_error_table_ptr pointer;
16 
17 /*        END INCLUDE FILE probe_error_table.incl.pl1       */