ProNovia Produkte Korrekturanleitung
Knowledge Base ID / Version	CFM-206 / V8.0.2 	
Ausgabe Korrekturanleitung	I / CG / 06.04.2023	
Farblegende Korrekturen	INSERT	REPLACE THIS	REPLACE WITH	DELETE	

Klasse	/PRONOVIA/CL_PRM_CONFIGURATION	
Methode	REFRESH_OBJECTS	

METHOD refresh_objects.

. . .

      TRY.
          lo_material ?= lo_object2.
        CATCH cx_sy_move_cast_error.                    "#EC NO_HANDLER
      ENDTRY.
      lo_object2 = lo_object2->parent_object.
    ENDWHILE.

>>>REPLACE THIS
    READ TABLE et_objects_refreshed TRANSPORTING NO FIELDS WITH KEY object = lo_material.
    IF sy-subrc IS NOT INITIAL.
      IF lo_val IS NOT INITIAL.
        READ TABLE et_objects_refreshed TRANSPORTING NO FIELDS WITH KEY object = lo_val.
        IF sy-subrc IS NOT INITIAL.
          ls_objrfsh-object = lo_val.
        ENDIF.
      ELSEIF lo_material IS NOT INITIAL.
        ls_objrfsh-object = lo_material.
      ELSE.
        CONTINUE.
      ENDIF.
>>>REPLACE WITH 
    "<MK/CFM-206 - angepasst
    IF NOT line_exists( et_objects_refreshed[ object = lo_material ] ).
      IF lo_val IS NOT INITIAL.
        IF NOT line_exists( et_objects_refreshed[ object = lo_val ] ).
          ls_objrfsh-object = lo_val.
        ELSE.
          CONTINUE.
        ENDIF.
      ELSEIF lo_material IS NOT INITIAL.
        ls_objrfsh-object = lo_material.
      ELSE.
        CONTINUE.
      ENDIF.
      "MK/CFM-206>
>>>END REPLACE

      ls_objrfsh-children = abap_true.
      ls_objrfsh-object->refresh_data( iv_refresh_children = ls_objrfsh-children ).
      INSERT ls_objrfsh INTO TABLE et_objects_refreshed.
    ENDIF.
  ENDLOOP.

. . .	

<ENDE>