Skip to content

Latest commit

 

History

History
393 lines (254 loc) · 4.11 KB

File metadata and controls

393 lines (254 loc) · 4.11 KB

Reading a Change Document Object Definition

Use method IF_CHDO_OBJECT_TOOLS_REL~READ_OBJECT to read a change document object definition.

The name of the object is assigned using the import parameter IV_OBJECT. The information is returned using the export parameter ET_OBJECT_INFO.

Import Parameter

Parameter Name

Field Name

Value Help

IV_OBJECT

 

Change document object name

Export Parameters

Parameter Name

Field Name

Value Help

ET_OBJECT_INFO

 

 

 

ET_OBJECT_INFO

Name of the change document object

 

ET_OBJECT_INFO

Generation information counter for field gen_type

 

ET_OBJECT_INFO

Generation information type technical name (DEFINITION, GENERATION, CLASS)

 

ET_OBJECT_INFO

Generation information type text (Definition, Generate, Class details)

 

ET_OBJECT_INFO

Line counter for field name

 

ET_OBJECT_INFO

Information long text

 

ET_OBJECT_INFO

Information technical name

 

ET_OBJECT_INFO

Value of the change document object

OBJECTCLASS

Name of the change document object

GNR

Generation information counter for field gen_type

GEN_TYPE

Generation information type technical name (DEFINITION, GENERATION, CLASS)

GROUP

Generation information type text (Definition, Generate, Class details)

ZNR

Line counter

INFOTEXT

Information long text

OBJ_TYPE

Information technical name

NAME

Information value (e.g. table name, package, user name, class name)

Sample Code:

CLASS zcl_chdo_read_object DEFINITION
  PUBLIC
  FINAL
  CREATE PUBLIC .

  PUBLIC SECTION.
   INTERFACES if_oo_adt_classrun.
  PROTECTED SECTION.
  PRIVATE SECTION.
ENDCLASS.

CLASS zcl_chdo_read_object IMPLEMENTATION.
  METHOD if_oo_adt_classrun~main.
    DATA: pt_object_info TYPE if_chdo_object_tools_rel=>tty_object_info.
    data: lr_err                TYPE REF TO cx_chdo_generation_error.
      TRY.
      cl_chdo_object_tools_rel=>if_chdo_object_tools_rel~read_object(
        EXPORTING
          iv_object      = 'ZCHDO_TEST'     " change document object name
        IMPORTING
          et_object_info = pt_object_info   " change document object details
      ).
      CATCH cx_chdo_generation_error INTO lr_err.
        out->write( |Exception occurred: { lr_err->get_text( ) }| ).
    ENDTRY.
  ENDMETHOD.
ENDCLASS.