1 /* BEGIN INCLUDE FILE mtape_err_stats.incl.pl1. Created by J. A. Bush 07/22/83. */
 2 /* format: style4 */
 3 
 4 dcl  es_ptr ptr;
 5 
 6 dcl  1 mtape_err_stats aligned based (es_ptr),              /* Error statistics block */
 7        2 read like err_entry,                               /* For read operations */
 8        2 write like err_entry,                              /* For write operations */
 9        2 orders like err_entry,                             /* For non-data xfer operations */
10        2 successful_retry (7) fixed bin (35);               /* retrys that succeeded after 1-7 trys */
11 
12 dcl  1 err_entry aligned based,
13        2 errors fixed bin (35),
14        2 operations fixed bin (35);
15 
16 /* END INCLUDE FILE mtape_err_stats.incl.pl1 */