add_status

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

• 36 lines of code
• 9 McCabe index (conditional complexity)

  METHOD add_status.
    DATA: ls_output TYPE mty_output,
          lv_error  TYPE boolean.

    ls_output-description = iv_description.
    ls_output-value       = iv_value.
    ls_output-cds         = iv_ds.

    LOOP AT it_return ASSIGNING FIELD-SYMBOL(<ls_return>) WHERE type IS NOT INITIAL.
      IF     <ls_return>-type = 'E'.
        lv_error = abap_true.
        ls_output-status      = icon_red_light.
      ELSEIF <ls_return>-type = 'S' OR <ls_return>-type = 'I'.
        ls_output-status      = icon_green_light.
      ELSEIF <ls_return>-type = 'W'.
        ls_output-status      = icon_yellow_light.
      ENDIF.
      ls_output-type        = <ls_return>-type.
      IF <ls_return>-type IS NOT INITIAL.
        MESSAGE ID <ls_return>-id TYPE <ls_return>-type NUMBER <ls_return>-number
                                                          WITH <ls_return>-message_v1
                                                               <ls_return>-message_v2
                                                               <ls_return>-message_v3
                                                               <ls_return>-message_v4
                                                               INTO ls_output-error.
        APPEND ls_output TO mt_output.
      ENDIF.
    ENDLOOP.

    IF lv_error IS INITIAL.
      ls_output-type   = 'S'.
      ls_output-status = icon_green_light.
      IF iv_category = 'C'.
        ls_output-error  = 'Successfully created!'.
      ELSEIF iv_category = 'D'.
        ls_output-error  = 'Successfully deleted!'.
      ENDIF.

      APPEND ls_output TO mt_output.
    ENDIF.