1 /* ******************************************************
 2    *                                                    *
 3    *                                                    *
 4    * Copyright (c) 1972 by Massachusetts Institute of   *
 5    * Technology and Honeywell Information Systems, Inc. *
 6    *                                                    *
 7    *                                                    *
 8    ****************************************************** */
 9 
10 /* BEGIN INCLUDE FILE audit_entry.incl.pl1  */
11 
12 /*
13    This structure is the format of an entry in the audit file. It is not intended to be
14    allocated, but overlayed (note the 0 refer for string).
15 
16    12/08/78 Written by Lindsey L. Spratt
17 
18 */
19 
20 dcl  impossible_audit_entry_length fixed bin (24) aligned static init (9999999) options (constant),
21      audit_entry_header_length fixed bin aligned static init (32) options (constant);
22 
23 dcl  aep ptr;
24 dcl 1 audit_entry aligned based (aep),
25     2 time fixed bin (71),                                  /* Value is either time of day of entry, or -1. */
26     2 virtual_time fixed bin (71),                          /* Virtual cpu time from this entry to the next. */
27     2 paging fixed bin (24),                                /* Paging from this entry to the next. */
28     2 last_entry_length fixed bin (24),                     /* Length of last entry's string. */
29     2 entry_length fixed bin (24),                          /* Length of this entry's string. */
30     2 tag char (2),                                         /* Denotes class of entry (e.g., "IL"). */
31     2 string char (0 refer (audit_entry.entry_length));     /* Text of this entry. */
32 
33 /* END INCLUDE FILE audit_entry.incl.pl1        */