
  TYPE
    dbt$debug = ^procedure (    condition: pmt$condition;
                                condition_descriptor:
                                 ^pmt$condition_information;
                                condition_save_area:
                                 ^ost$stack_frame_save_area;
                                trapped_save_area: ^ost$stack_frame_save_area;
                                debug_id: pmt$debug_identifier;
                                multiple_conditions: boolean;
                            VAR status: ost$status);

*copyc jmd$job_resource_condition
*copyc mmd$segment_access_condition
*copyc ost$stack_frame_save_area
*copyc ost$status
*copyc pmd$debug
*copyc pmt$condition
*copyc pmt$condition_information
