Comment 1 Hopmann, Peter 2021-03-19 09:42:48 CET

/GIB/CL_DCV_MATERIAL_DATA_HIST
METHOD get_instance.
...
  LOOP AT gt_instanz INTO ls_instanz
    WHERE keyval = lf_keyval
      OR objectid = if_objectid.
    EXIT.
  ENDLOOP.
  IF sy-subrc <> 0.
*#HW13109
    IF if_objectid_scmat IS INITIAL.
      DATA(lf_objectid_scmat) = ls_key-objectid_scmat.
    ELSE.
      lf_objectid_scmat = if_objectid_scmat.
    ENDIF.
    IF lf_objectid_scmat IS INITIAL.
      EXIT.
    ENDIF.
*##13109
    CREATE OBJECT ls_instanz-data_r
      TYPE /gib/cl_dcv_material_data_hist
      EXPORTING
        ir_sc_mat = ir_sc_mat
*13109        if_objectid_scmat = if_objectid_scmat       "5417
        if_objectid_scmat = lf_objectid_scmat       "HW13109
        if_erdat  = ls_key-erdat
        if_updkz  = if_updkz
      EXCEPTIONS
        not_found = 1
        OTHERS    = 2.
    IF sy-subrc <> 0.
...