1 /* Begin include file ..... mdc_data.incl.pl1 */ 2 3 /* Declaration of mdc_data segment, containing mdc lock */ 4 5 dcl mdc_datap ptr; 6 7 dcl 1 mdc_data aligned based (mdc_datap), 8 2 lock bit (36), /* The actual lock */ 9 2 lock_cnt fixed bin (35), /* Meter of times locked */ 10 2 unlock_cnt fixed bin (35), /* Meter of times unlocked */ 11 2 fill fixed bin (35), 12 2 time_locked fixed bin (71), /* Time last locked */ 13 2 time_spent_locked fixed bin (71), /* Total time lock was locked */ 14 2 locker_name char (32); /* Name of process locking lock */ 15 16 /* End include file ..... mdc_data.incl.pl1 */