cleanup

in src/zgoog_i_bqtr_gen_repl_objl_im1.prog.abap [0:0]


  METHOD cleanup.
    DATA: lt_return TYPE bapiret2_t.
    DATA: lv_sy_subrc TYPE sy-subrc.
    CONSTANTS: lc_delete TYPE c VALUE 'D'.



    IF p_schai = abap_true OR p_sall = abap_true.
      zgoog_cl_bqtr_gen_bw_object=>delete_process_chain(
        EXPORTING
          iv_chain    = iv_chain
        IMPORTING
          ev_sy_subrc = lv_sy_subrc
          et_return   = lt_return ).

      add_status( iv_ds         = iv_ds
                  iv_description = 'Process Chain'
                  iv_value       = |{ iv_chain }|
                  iv_category    = lc_delete
                  it_return      = lt_return ).
    ENDIF.
    IF p_strig = abap_true OR p_sall = abap_true.
      zgoog_cl_bqtr_gen_bw_object=>delete_trigger(
        EXPORTING
          iv_trigger  = iv_trig
        IMPORTING
          ev_sy_subrc = lv_sy_subrc
          et_return   = lt_return ).

      add_status( iv_ds         = iv_ds
                  iv_description = 'Process Chain Trigger'
                  iv_value       = |{ iv_trig }|
                  iv_category    = lc_delete
                  it_return      = lt_return ).

    ENDIF.


    IF p_sbwds = abap_true OR p_sall = abap_true.
      zgoog_cl_bqtr_gen_bw_object=>delete_bw_ds(
        EXPORTING
          iv_name     = CONV #( iv_dsname )
          iv_logsys   = iv_logsy
        IMPORTING
          ev_sy_subrc = lv_sy_subrc
          et_return   = lt_return ).

      add_status( iv_ds         = iv_ds
                  iv_description = 'BW Data Source (including Dependencies)'
                  iv_value       = CONV #( iv_ds )
                  iv_category    = lc_delete
                  it_return      = lt_return ).


    ENDIF.
    IF p_sadso = abap_true OR p_sall = abap_true.
      zgoog_cl_bqtr_gen_bw_object=>delete_odso(
        EXPORTING
          iv_adsonm   = CONV #( iv_odso )
          iv_iobj     = iv_iobj
        IMPORTING
          ev_sy_subrc = lv_sy_subrc
          et_return   = lt_return ).

      add_status( iv_ds         = iv_ds
                  iv_description = 'Data Store Object (ODSO)'
                  iv_value       = CONV #( iv_odso )
                  iv_category    = lc_delete
                  it_return      = lt_return ).
    ENDIF.