create_class

in abap-sdk/ZGOOG_SDK_UTILITIES/zgoog_business_evt_toolkit/src/zgoog_cl_rap_evthdlr_generator.clas.abap [0:0]

• 34 lines of code
• 2 McCabe index (conditional complexity)

  METHOD create_class.
    DATA: ls_class TYPE vseoclass.

    ls_class = get_class_properties( iv_clsname     = iv_clsname
                                     iv_entity_name = iv_entity_name ).

    DATA(lt_code) = gen_evt_handler_local(
      iv_entity_name  = iv_entity_name
      iv_entity_event = iv_entity_event
      iv_event_key    = iv_event_key ).

    CALL FUNCTION 'SEO_CLASS_CREATE_COMPLETE'
      EXPORTING
        corrnr          = iv_trkorr
        devclass        = iv_devc
        version         = seoc_version_active
        genflag         = abap_false
        authority_check = abap_true
        overwrite       = iv_overwrite
        locals_imp      = lt_code
        suppress_dialog = abap_true
      CHANGING
        class           = ls_class
      EXCEPTIONS
        existing        = 1
        is_interface    = 2
        db_error        = 3
        component_error = 4
        no_access       = 5
        other           = 6
        OTHERS          = 7.
    IF sy-subrc <> 0.
      MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
        WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
    ELSE.
      MESSAGE 'Class created' TYPE 'S'.
    ENDIF.