badi logic help

Former Member — Sun, 18 Mar 2012 07:24:23 GMT

Hi ,

I am having requirement as below ,

1 Read the shopping cart item ie ct_item and Run all items and

2 Determine and note the product categories-ID and process-ID of an item in an internal table.

            3 If 1^st item: continue, otherwise: check, whether same product category
              and process-ID are noted already. If no: is the combination of WGR_ID_ADD and
              PROCID_ADD as per table ZSRM_WGR_SORTEN is allowed and If no: Display an error message

I done coding as below , please check is it correct and suggest if changes required,

METHOD check_category.

DATA: ls_item    TYPE bbp_pds_sc_item_d,

        ls_message TYPE bbp_smessages_badi,

        lt_zsrm    TYPE TABLE OF zsrm_wgr_sorten,

        lt_item TYPE bbpt_pd_sc_item_d,

        varcatid TYPE comt_category_id,

        varprocind TYPE zprocind,

        varnumint TYPE bbp_item_no.

SELECT * FROM zsrm_wgr_sorten INTO TABLE lt_zsrm

FOR ALL ENTRIES IN ct_item

WHERE wgrid_add =   ct_item-category_id AND

         procid_add = ct_item-procind.

lt_item = ct_item.

SORT lt_item BY category_id procind.

LOOP AT lt_item INTO ls_item   WHERE del_ind = space.

    IF sy-tabix = 1.

      varcatid =   ls_item-category_id.

      varprocind = ls_item-procind.

      varnumint = ls_item-number_int.

      CONTINUE.

    ENDIF.

    READ TABLE lt_zsrm WITH KEY wgrid_add = varcatid

    procid_add = varprocind BINARY SEARCH TRANSPORTING NO FIELDS.

    IF sy-subrc = 0.

      IF   ls_item-category_id = varcatid AND ls_item-procind = varprocind .

        ls_message-msgno   = '002'.

        ls_message-msgty   = 'E'.

        ls_message-msgid   = 'ZSRM_SC'.

        ls_message-msgv1   = ls_item-number_int.

        ls_message-msgv2   = varnumint.

        APPEND ls_message TO et_messages.

        CLEAR ls_message.

        CLEAR varcatid.

        CLEAR varprocind.

        CLEAR varnumint.

      ENDIF.

    ENDIF.

    varcatid =   ls_item-category_id.

    varprocind = ls_item-procind.

    varnumint = ls_item-number_int.

ENDLOOP.

ENDMETHOD.

Thanks ,

Veeru.

Moderator message: duplicate post, spec dumping

Message was edited by: Thomas Zloch

Re: badi logic help

Clemenss — Sun, 18 Mar 2012 14:08:33 GMT

Hi veer P,

generate the code and test it.

Regards Clemens

topic badi logic help in Application Development and Automation Discussions

badi logic help

Re: badi logic help