Problem in N-STEP Approval BADI

Question

Hi ,
I'am new to Workflows,I need your guidance in finishing
the Item_level Approval BADI.
I'am working on N-Step Approval Badi(Item Level Implementation)
I have pasted the code here.There will be Multiple levels(Max 15 Levels) of Approvals.
When a new Shopping cart is created this BADI is not working.
Can you please suggest me, am i missing  something in the code.?.I'am also new to ABAP but i hope i'am managing with it.
Please Help me out.
METHOD if_ex_bbp_wfl_approv_badi~get_remaing_approvers .
Interface parameters:
OBJECT_ID                  TYPE  CRMT_OBJECT_ID                "Import
OBJECT_TYPE                TYPE  CRMT_SUBOBJECT_CATEGORY       "Import
GUID                       TYPE  BBP_GUID_32                   "Import
ACTUAL_APPROVAL_INDEX      TYPE  SWH_NUMC10                    "Import
APPROVAL_HISTORY_TABLE     TYPE  BBP_WFL_APPROVAL_HISTORY_BADI "Import
APPROVAL_TABLE             TYPE  BBPT_WFL_APPROVAL_TABLE_BADI  "Export
NO_FURTHER_APPROVAL_NEEDED TYPE  BOOLEAN                       "Export
  INCLUDE <swfcntn01>.                  "Workflow
  DATA:
    ls_header                   TYPE bbp_pds_sc_header_d,
    lt_item                     TYPE TABLE OF bbp_pds_sc_item_d,
    ls_item                     TYPE bbp_pds_sc_item_d,
    lt_account                  TYPE TABLE OF bbp_pds_acc,
    ls_account                  TYPE bbp_pds_acc,
    lt_partner                  TYPE TABLE OF bbp_pds_partner,
    ls_partner                  TYPE bbp_pds_partner,
    lc_partner                  TYPE but000-partner,
    lt_result_tab               TYPE TABLE OF swhactor,
    ls_result_tab               TYPE swhactor,
    lc_cost_ctr                 TYPE bbp_pds_acc-cost_ctr,
    lv_co_code                  TYPE bbp_pds_sc_item_d-be_co_code,
    lt_prodcat                  TYPE TABLE OF zmwfprodcat,
    ls_prodcat                  TYPE zmwfprodcat,
Inserted by Rakesh Palle for Assets DR # D0001055958
    lt_asset                    TYPE TABLE OF zmwfprodcat,
    lt_final                    TYPE TABLE OF zmwfprodcat,
    ls_asset                    TYPE zmwfprodcat,
    ls_final                    TYPE zmwfprodcat,
    lv_asset                    TYPE c,
End of insertion DR # D0001055958
Being D0001055958
    lt_order                    TYPE TABLE OF zmwfprodcat,
    ls_order                    TYPE zmwfprodcat,
    lv_order                    TYPE c,
End D0001055958
    lt_sets                     TYPE TABLE OF zmwf_sets,
    ls_sets                     TYPE zmwf_sets,
    lt_roles                    TYPE TABLE OF str_agr2,
    ls_roles                    TYPE str_agr2,
    lt_users                    TYPE TABLE OF str_agrs,
    ls_users                    TYPE str_agrs,
    lc_persnumber               TYPE usr21-persnumber,
    ls_approver                 TYPE bbp_wfl_approval_table_badi,
    ls_approver_check           TYPE bbp_wfl_approval_table_badi,
    lv_guid                     TYPE crmd_orderadm_h-guid,
    lv_call_value1    TYPE bbp_wfl_app_property,
    ev_app_obj_guid   TYPE bbp_guid_32,
    lc_sobid                    TYPE req_name,
    lc_objid                    TYPE hrp1001-objid,
    lc_objid_s                  type hrp1001-objid,
   lt_appr_def       TYPE TABLE OF bbpt_wfl_lia_def,
   lt_approver       TYPE TABLE OF bbp_wfl_approval_table_badi,
    lc_slapprover               TYPE hrv1222a-low,
    li_limit                    TYPE bbp_limit,
    li_last_level               TYPE zmwfprodcat-appr_level,
    li_stepno                   TYPE i,
    lv_index                    type i,
    lc_stepno(3)                TYPE c,
    lc_first(1)                 TYPE c,
    lc_pass(1)                  TYPE c,
    li_last_setid               LIKE ls_prodcat-setid,
    c_cost_centre      TYPE bbp_wfl_app_criterion  VALUE 'COST_CTR',
    li_stop_amt                 LIKE ls_header-total_value,
    li_set_amt                  LIKE li_stop_amt,
    lt_cost_ctr                 type table of zitem_costctr,
    ls_cost_ctr                 type zitem_costctr,
   ls_approval_item  TYPE bbps_wfl_item_approval,
   lt_approval_items TYPE TABLE OF bbps_wfl_item_approval.
Business objects type (local constants)
  CONSTANTS:
    c_shop          TYPE crmt_subobject_category VALUE 'BUS2121',
    c_aprover_value TYPE zmwf_setty VALUE 'AV',
    c_comp_value    TYPE zmwf_setty VALUE 'CD',
**// Begin D0001055958
    c_ac_value      TYPE zmwf_setty VALUE 'AC',
    c_ad_value      TYPE zmwf_setty VALUE 'AD',
    c_oc_value      TYPE zmwf_setty VALUE 'OC',
    c_od_value      TYPE zmwf_setty VALUE 'OD',
**// End D0001055958
    c_yes(1)        TYPE c VALUE 'X',
    c_no(1)         TYPE c VALUE ' ',
    c_requisitioner TYPE bbp_pds_partner-partner_fct VALUE '00000016'.
**********begin of change D0001034557
  TYPES : BEGIN OF ty_swhactor,
            otype TYPE otype,
            objid TYPE actorid,
          END OF ty_swhactor.
  DATA : lt_user TYPE TABLE OF ty_swhactor,
         ls_user TYPE ty_swhactor,
         v_guid TYPE BBP_GUID_32.
***********end of change D0001034557
***********begin of change D0001043944
  DATA : lt_prodcat2  TYPE TABLE OF zmwfprodcat,
         new_approval_table TYPE BBPT_WFL_APPROVAL_TABLE_BADI,
         wa_new_approval_table TYPE BBP_WFL_APPROVAL_TABLE_BADI.
***********end of change D0001043944
*****Change by suresh D0001110145
  data ws_set type zmwf_sets.
  data cd_flag.
*****End of change by suresh D0001110145
  DEFINE set_approval_level.
    if lc_first = 'X' or
       ls_prodcat-appr_level gt li_last_level or
       ls_prodcat-setid ne li_last_setid.                  "D0001055958
      add 1 to li_stepno.
      clear lc_first.
    endif.
    ls_approver-approval_index = li_stepno.
  END-OF-DEFINITION.
  DEFINE set_approval_level_2.
    if lc_first = 'X' or
       ls_asset-appr_level gt li_last_level.
      add 1 to li_stepno.
      clear lc_first.
    endif.
    ls_approver-approval_index = li_stepno.
  END-OF-DEFINITION.
  DEFINE set_approval_description.
    write li_stepno to lc_stepno left-justified.
    concatenate 'Approval step #'
                lc_stepno
                into ls_approver-approval_description.
  END-OF-DEFINITION.
  CLEAR: lt_prodcat[], ls_approver.
  CLEAR: li_stepno.
  break-point.
map input data to local data
map char32 to raw16
  MOVE guid TO lv_guid.
  break-point.
  IF object_type = c_shop.
get the details of the shopping cart
    CALL FUNCTION 'BBP_PD_SC_GETDETAIL'
      EXPORTING
        i_guid      = lv_guid
        i_object_id = object_id
      IMPORTING
        e_header    = ls_header
      TABLES
        e_item      = lt_item
        e_account   = lt_account
        e_partner   = lt_partner.
Modification for Item-Level Approval-Start
    select * from zitem_costctr
    into table lt_cost_ctr.
    lv_index = actual_approval_index.
    if lv_index = 0.
       lv_index = 1.
    endif.
    LI_STOP_AMT = LS_HEADER-TOTAL_VALUE.
Modification for Item-Level Approval-End
    LOOP AT lt_item INTO ls_item.
Modification for Item-Level Approval-Start
    if actual_approval_index le lv_index.
      ls_approval_item-approval_item_guid = ls_item-guid.
      READ TABLE lt_account INTO ls_account
             WITH KEY p_guid = ls_item-guid.
      if sy-subrc is initial.
        READ TABLE LT_COST_CTR INTO LS_COST_CTR
        WITH KEY COST_CENTER_NO = LS_ACCOUNT-COST_CTR.
        LV_CALL_VALUE1 = LS_ACCOUNT-COST_CTR.
        CALL FUNCTION 'BBP_WFL_DIN_APP_OBJ_GET'
          EXPORTING
            sc_guid           = ls_header-guid
            criterion1        = 'COST_CTR'
            value1            = lv_call_value1
            iv_item_value     = ls_item-value
            iv_add_value      = 'X'
          IMPORTING
            approval_obj_guid = ev_app_obj_guid
          TABLES
            item_app_obj      = item_approval_obj.
        ls_approval_item-approval_object_guid = ev_app_obj_guid.
        LS_APPROVAL_ITEM-APPROVAL_ITEM_GUID = LS_ITEM-GUID.
        APPEND ls_approval_item TO lt_approval_items.
     approval_table[]      = lt_approver[].
Get the Object ID of user
       SELECT SINGLE objid
              INTO lc_objid
              FROM hrp1001
              WHERE sobid = ls_cost_ctr-CC_MANAGER_ID
                AND otype = 'CP'
                AND plvar = '01'.
       IF sy-subrc NE 0.
         EXIT.
       ENDIF.
       SELECT SINGLE objid
              INTO lc_objid_s
              FROM hrp1001
              WHERE sobid = lc_objid
                AND otype = 'S'
                AND plvar = '01'.
       IF sy-subrc NE 0.
         EXIT.
       ENDIF.
Get the Approver's Limit
        CLEAR li_limit.
        lc_sobid = ls_cost_ctr-CC_MANAGER_ID.
        CALL FUNCTION 'BBP_BW_GET_APPR_LIMIT'
          EXPORTING
            i_userid     = lc_sobid
          IMPORTING
            e_appr_limit = li_limit.
        IF LI_LIMIT > LS_ITEM-VALUE. "LI_STOP_AMT.
          SELECT SINGLE persnumber
                 INTO lc_persnumber
                 FROM usr21
                 WHERE bname = lc_sobid.
          IF sy-subrc IS INITIAL.
            SELECT name_text
                   INTO ls_approver-name
                   FROM adrp
                   UP TO 1 ROWS
                   WHERE persnumber =  lc_persnumber
                     AND date_from  LE sy-datum
                     AND date_to    GE sy-datum.
            ENDSELECT.
          ENDIF.
          ADD 1 TO li_stepno.
          ls_approver-approval_index = li_stepno.
          ls_approver-approval_agent = lc_SOBID.
          set_approval_description.
          APPEND ls_approver TO approval_table.
          CLEAR ls_approver.
        ELSE.
          do.
Get the Object ID of user
            CALL FUNCTION 'BBP_WFL_DIN_APP_OBJ_GET'
              EXPORTING
                sc_guid           = ls_header-guid
                criterion1        = 'COST_CTR'
                value1            = lv_call_value1
                iv_item_value     = ls_item-value
                iv_add_value      = 'X'
              IMPORTING
                approval_obj_guid = ev_app_obj_guid
              TABLES
                item_app_obj      = item_approval_obj.
            ls_approval_item-approval_object_guid = ev_app_obj_guid.
            LS_APPROVAL_ITEM-APPROVAL_ITEM_GUID = LS_ITEM-GUID.
            APPEND ls_approval_item TO lt_approval_items.
            CLEAR : LC_OBJID,LC_OBJID_S.
            SELECT SINGLE objid
                   INTO lc_objid
                   FROM hrp1001
                   WHERE sobid = ls_cost_ctr-CC_MANAGER_ID
                     AND otype = 'CP'
                     AND plvar = '01'.
            IF sy-subrc NE 0.
              EXIT.
            ENDIF.
            SELECT SINGLE objid
                   INTO lc_objid_s
                   FROM hrp1001
                   WHERE sobid = lc_objid
                     AND otype = 'S'
                     AND plvar = '01'.
            IF sy-subrc NE 0.
              EXIT.
            ENDIF.
Get the SL Approver
            SELECT SINGLE low
                     INTO lc_slapprover
                     FROM hrv1222a
                     WHERE plvar  =  '01'
                       AND otype  =  'S'
                       AND objid  =  lc_objid_s
                       AND begda  LE sy-datum
                       AND endda  GE sy-datum
                       AND attrib =  'SLAPPROVER'.
            IF sy-subrc NE 0.
              EXIT.
            ENDIF.
Get the Approver's Limit
            CLEAR li_limit.
            lc_sobid = lc_slapprover+2.
            CALL FUNCTION 'BBP_BW_GET_APPR_LIMIT'
              EXPORTING
                i_userid     = lc_sobid
              IMPORTING
                e_appr_limit = li_limit.
            SUBTRACT '.01' FROM li_limit.  "D0001093425
            IF li_limit GT 0.
Add the approver to the list
              SELECT SINGLE persnumber
                     INTO lc_persnumber
                     FROM usr21
                     WHERE bname = lc_sobid.
              IF sy-subrc IS INITIAL.
                SELECT name_text
                       INTO ls_approver-name
                       FROM adrp
                       UP TO 1 ROWS
                       WHERE persnumber =  lc_persnumber
                         AND date_from  LE sy-datum
                         AND date_to    GE sy-datum.
                ENDSELECT.
              ENDIF.
              ADD 1 TO li_stepno.
              ls_approver-approval_index = li_stepno.
              ls_approver-approval_agent = lc_slapprover.
              set_approval_description.
              APPEND ls_approver TO approval_table.
              CLEAR ls_approver.
            ENDIF.
If the limit is greater than the stop amount, exit - we are finished
            IF li_limit GE li_stop_amt.
              EXIT.
            ENDIF.
          ENDDO.
         endif.
         endif.
      ENDIF.
    endloop.
    data : cc type BBP_STEP_DESCRIPTION value 'CoCentre_Approvers'.
    if actual_approval_index le lv_index.
    CALL FUNCTION 'BBP_WFL_DIN_FILL_APPROVER'
      EXPORTING
        iv_approval_index   = lv_index
        ic_step_description = cc
        iv_criterion1       = 'COST_CTR'
      TABLES
        it_approval_def     = lt_appr_def
        it_approval_object  = item_approval_obj
        et_approver         = lt_approver
        it_approval_items   = lt_approval_items.
    endif.
    item_approval_table[] = lt_approval_items[].
    approval_table[]      = lt_approver[].
  endif.
Modification for Item-Level Approval-End
Use the product category to link to the Product Category Approval
table and use the corresponding approver(s) for the total shopping
cart value.
     SELECT *
            INTO TABLE lt_prodcat
            FROM zmwfprodcat.
            WHERE catid    LIKE  ls_item-category_id.
     IF sy-subrc IS INITIAL.
****begin of change D0001034557
***//Buyer to be the first approver
       MOVE lv_guid TO v_guid.
       READ TABLE lt_account INTO ls_account
                    WITH KEY p_guid = ls_item-guid.
****Begin of change by suresh for adding codition for buyer determination
****for company codes 7000 and greater D0001110145
       clear cd_flag.
       select single * into ws_set
                       from ZMWF_SETS
                        where setid = 'FCD1'.
       if ( ls_item-be_co_code GE ws_set-val_low and
            ls_item-be_co_code LE ws_set-val_high ).
         cd_flag = 'X'.
       endif.
       IF ( ls_item-itm_type = 'LIMI' OR
        ls_item-product_type = '02' OR
          ls_account-acc_cat = 'AS' ) AND
          cd_flag is initial.
*****end of changes by suresh D0001110145
Begin of changes by Suresh-EBDK902401
Added the Object Type and Object ID
         CALL FUNCTION 'BBP_PDH_WFL_GET_PURCHASER_LIST'
              EXPORTING
                IV_GUID                 =   v_guid
    IV_OBJECT_TYPE                      =  'BUS2121'
    IV_OBJECT_ID                        = OBJECT_ID
          IV_GET_FIRST_PURCH_FROM_GROUP     =  'X'
              TABLES
                ET_USER                       =  lt_user.
***End of changes by Suresh-EBDK902401
         LOOP AT lt_user INTO ls_user.
           LOOP AT lt_prodcat INTO ls_prodcat.
             IF NOT ls_prodcat-bname IS INITIAL.
               CONCATENATE 'US' ls_user-objid INTO
                             ls_approver-approval_agent.
               READ TABLE approval_table INTO ls_approver_check
                  WITH KEY approval_agent =
*ls_approver-approval_agent
               IF SY-SUBRC NE 0.
                 set_approval_level.
                 set_approval_description.
                 ls_approver-name = ls_approver-approval_agent.
                 APPEND ls_approver TO approval_table.
                 CLEAR ls_approver-name.
               ENDIF.
             ENDIF.
             CLEAR ls_prodcat.
           ENDLOOP.
           CLEAR ls_user.
         ENDLOOP.
       ENDIF.
       CLEAR ls_account.
****end of change D0001034557
****begin of change D0001043944
**//Special Approvers to be right after the buyer
       IF NOT ls_item-z_spl_approval IS INITIAL.
         SELECT *  INTO TABLE lt_prodcat2
                       FROM zmwfprodcat
                       WHERE setid = ls_item-z_spl_approval.
         SORT lt_prodcat2 BY catid appr_level.
         LOOP AT lt_prodcat2 INTO ls_prodcat.
           IF NOT ls_prodcat-bname IS INITIAL.
             CONCATENATE 'US' ls_prodcat-bname INTO
                           ls_approver-approval_agent.
             READ TABLE approval_table INTO ls_approver_check
                WITH KEY approval_agent = ls_approver-approval_agent.
             IF SY-SUBRC NE 0.
               set_approval_level.
               set_approval_description.
               ls_approver-name = ls_approver-approval_agent.
               APPEND ls_approver TO approval_table.
               CLEAR ls_approver-name.
               li_last_level = ls_prodcat-appr_level.
               li_last_setid = ls_prodcat-setid.
             ENDIF.
           ENDIF.
           CLEAR: ls_prodcat,ls_approver_check.
         ENDLOOP.
       ENDIF.
****end of change D0001043944
       LOOP AT lt_prodcat INTO ls_prodcat.
         IF NOT ls_item-category_id CP ls_prodcat-catid.
           DELETE TABLE lt_prodcat FROM ls_prodcat.
         ENDIF.
       ENDLOOP.
Inserted by Rakesh Palle for Assets DR # D0001055958
       LOOP AT lt_prodcat INTO ls_asset WHERE setid = 'AS01'.
         APPEND ls_asset TO lt_asset.
       ENDLOOP.
Begin D0001055958
       LOOP AT lt_prodcat INTO ls_order WHERE setid = 'OR01'.
         APPEND ls_order TO lt_order.
       ENDLOOP.
End D0001055958
       DELETE lt_prodcat WHERE setid = 'AS01' OR setid = 'OR01'.
       "D0001055958
End of insertion DR # D0001055958
       SORT lt_prodcat BY catid setid appr_level ASCENDING.
       lc_first = 'X'.
       SELECT *
              INTO TABLE lt_sets
              FROM zmwf_sets
              FOR ALL ENTRIES IN lt_prodcat
              WHERE setid = lt_prodcat-setid.
SORT lt_prodcat BY catid setid appr_level ASCENDING.
      lc_first = 'X'.
       LOOP AT lt_prodcat INTO ls_prodcat.
Check the set data
         IF NOT ls_prodcat-setid IS INITIAL.
           READ TABLE lt_account INTO ls_account
                WITH KEY p_guid = ls_item-guid.
***// Changed by Rakesh Palle to get ACC_STR & COST OBJ
***// if cost ctr is initial DR # D0001055958
           IF ls_account-cost_ctr IS INITIAL.
             IF ls_account-acc_str IS INITIAL.
               CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
                 EXPORTING
                   input  = ls_account-cost_obj
                 IMPORTING
                   output = lc_cost_ctr.
             ELSE.
               CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
                 EXPORTING
                   input  = ls_account-acc_str
                 IMPORTING
                   output = lc_cost_ctr.
             ENDIF.
           ELSE.
             CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
               EXPORTING
                 input  = ls_account-cost_ctr
               IMPORTING
                 output = lc_cost_ctr.
           ENDIF.
***// End of insertion DR # D0001055958
Check for valid Cost Center (set type = space)
           lc_pass = c_no.
           LOOP AT lt_sets INTO ls_sets
                WHERE setid =  ls_prodcat-setid
                  AND setty =  space.
             IF ls_sets-val_low = lc_cost_ctr OR
                ( ls_sets-val_low  LE lc_cost_ctr AND
                  ls_sets-val_high GE lc_cost_ctr ).
               lc_pass = c_yes.
               EXIT.
             ENDIF.
           ENDLOOP.
           IF sy-subrc IS INITIAL AND
              lc_pass  = c_no.
             CONTINUE.
           ENDIF.
***// Inserted by Rakesh Palle for Company code verification
Check for valid Company Code (set type = CC)
           LOOP AT lt_sets INTO ls_sets
                WHERE setid =  ls_prodcat-setid
                  AND setty =  c_comp_value.
             IF ls_sets-val_low = ls_item-be_co_code OR
                ( ls_sets-val_low  LE ls_item-be_co_code AND
                  ls_sets-val_high GE ls_item-be_co_code ).
               lc_pass = c_yes.
               EXIT.
             ENDIF.
           ENDLOOP.
           IF sy-subrc IS INITIAL AND
              lc_pass  = c_no.
             CONTINUE.
           ENDIF.
***// End of Insertion for Company code verification
***// Inserted by Rakesh Palle for Asset Company code verification
  Check for valid Asset Company Code (set type = AD)
  DR # D0001055958
           IF lv_asset = 'X'.
             LOOP AT lt_sets INTO ls_sets
                  WHERE setid = ls_prodcat-setid
                    AND setty = c_ad_value.
               IF ls_sets-val_low = ls_item-be_co_code OR
                  ( ls_sets-val_low  LE ls_item-be_co_code AND
                    ls_sets-val_high GE ls_item-be_co_code ).
                 lc_pass = c_yes.
                 EXIT.
               ENDIF.
             ENDLOOP.
             IF sy-subrc IS INITIAL AND
                lc_pass  = c_no.
               CONTINUE.
             ENDIF.
***// End of Asset Company code verification
***// Check for valid Cost Center (set type = AC)
             LOOP AT lt_sets INTO ls_sets
                  WHERE setid =  ls_prodcat-setid
                    AND setty =  c_ac_value.
               IF ls_sets-val_low = lc_cost_ctr OR
                  ( ls_sets-val_low  LE lc_cost_ctr AND
                    ls_sets-val_high GE lc_cost_ctr ).
                 lc_pass = c_yes.
                 EXIT.
               ENDIF.
             ENDLOOP.
             IF sy-subrc IS INITIAL AND
                lc_pass  = c_no.
               CONTINUE.
             ENDIF.
           ENDIF.
***// End of Asset Cost Center
***// Inserted by Rakesh Palle for Order Company code verification
Check for valid Order Company Code (set type = OD)
           IF lv_order = 'X'.
             LOOP AT lt_sets INTO ls_sets
                  WHERE setid = ls_prodcat-setid
                    AND setty = c_od_value.
               IF ls_sets-val_low = ls_item-be_co_code OR
                  ( ls_sets-val_low  LE ls_item-be_co_code AND
                    ls_sets-val_high GE ls_item-be_co_code ).
                 lc_pass = c_yes.
                 EXIT.
               ENDIF.
             ENDLOOP.
             IF sy-subrc IS INITIAL AND
                lc_pass  = c_no.
               CONTINUE.
             ENDIF.
***// End of Order Company code verification
***// Check for valid Order Cost Center (set type = OC)
             LOOP AT lt_sets INTO ls_sets
                  WHERE setid =  ls_prodcat-setid
                    AND setty =  c_oc_value.
               IF ls_sets-val_low = lc_cost_ctr OR
                  ( ls_sets-val_low  LE lc_cost_ctr AND
                    ls_sets-val_high GE lc_cost_ctr ).
                 lc_pass = c_yes.
                 EXIT.
               ENDIF.
             ENDLOOP.
             IF sy-subrc IS INITIAL AND
                lc_pass  = c_no.
               CONTINUE.
             ENDIF.
           ENDIF.
***// End of Order Cost Center
***// DR # D0001055958
Check for SL Approver Value
           LOOP AT lt_sets INTO ls_sets
                WHERE setid =  ls_prodcat-setid
                  AND setty =  c_aprover_value.
             IF NOT ls_sets-val_low CN '1234567890 .'.
               TRANSLATE ls_sets-val_low USING ', '.
               CONDENSE ls_sets-val_low NO-GAPS.
               li_set_amt = ls_sets-val_low.
               IF ls_header-total_value LT li_set_amt AND
                  li_set_amt GT li_stop_amt.
                 li_stop_amt = li_set_amt.
               ENDIF.
             ENDIF.
           ENDLOOP.
         ENDIF.
         CHECK ls_prodcat-val_from LE ls_header-total_value
           AND ls_prodcat-val_to   GE ls_header-total_value.
Begin D0001055958
         IF lc_pass  = c_no.
           CONTINUE.
         ENDIF.
End   D0001055958
Handle Approver Name - Explicit
         IF NOT ls_prodcat-bname IS INITIAL.
           CONCATENATE 'US' ls_prodcat-bname INTO
                       ls_approver-approval_agent.
           READ TABLE approval_table INTO ls_approver_check
                WITH KEY approval_agent = ls_approver-approval_agent.
           IF sy-subrc NE 0.
             set_approval_level.
             set_approval_description.
             ls_approver-name = ls_prodcat-name_text.
             APPEND ls_approver TO approval_table.
             CLEAR ls_approver-name.
             li_last_level = ls_prodcat-appr_level.
             li_last_setid = ls_prodcat-setid.          "D0001055958
           ENDIF.
         ENDIF.
Handle Approver Names - Derive from Role
         IF NOT ls_prodcat-agr_name IS INITIAL.
           ls_roles-agr_name = ls_prodcat-agr_name.
           APPEND ls_roles TO lt_roles.
           CALL FUNCTION 'BBP_READ_USERS_OF_ROLES'
             TABLES
               roles              = lt_roles
               users_of_roles     = lt_users
             EXCEPTIONS
               no_users_available = 1
               OTHERS             = 2.
           IF sy-subrc IS INITIAL.
             LOOP AT lt_users INTO ls_users.
               SELECT SINGLE persnumber
                      INTO lc_persnumber
                      FROM usr21
                      WHERE bname = ls_users-uname.
               IF sy-subrc IS INITIAL.
                 SELECT name_text
                        INTO ls_approver-name
                        FROM adrp
                        UP TO 1 ROWS
                        WHERE persnumber =  lc_persnumber
                          AND date_from  LE sy-datum
                          AND date_to    GE sy-datum.
                 ENDSELECT.
               ENDIF.
               CONCATENATE 'US' ls_users-uname INTO
                           ls_approver-approval_agent.
               READ TABLE approval_table INTO ls_approver_check
                  WITH KEY approval_agent = ls_approver-approval_agent.
               IF sy-subrc NE 0.
                 set_approval_level.
                 set_approval_description.
                 APPEND ls_approver TO approval_table.
                 CLEAR ls_approver-name.
                 li_last_level = ls_prodcat-appr_level.
                 li_last_setid = ls_prodcat-setid.       "D0001055958
               ENDIF.
             ENDLOOP.
           ENDIF.
           REFRESH: lt_roles, lt_users.
         ENDIF.
       ENDLOOP.
     ENDIF.
   ENDLOOP.
Add the SL approvers
   CLEAR lc_sobid.
Get the requisioner - in case the cart is created 'on behalf of'
   READ TABLE lt_partner INTO ls_partner
              WITH KEY partner_fct = c_requisitioner.
   IF sy-subrc IS INITIAL.
     SELECT SINGLE partner INTO lc_partner
            FROM but000
            WHERE partner = ls_partner-partner_id.
     CALL FUNCTION 'RH_STRUC_GET'
       EXPORTING
         act_otype      = 'BP'
         act_objid      = lc_partner
         act_wegid      = 'BP_US'
       TABLES
         result_tab     = lt_result_tab
       EXCEPTIONS
         no_plvar_found = 1
         no_entry_found = 2
         OTHERS         = 3.
     READ TABLE lt_result_tab INTO ls_result_tab WITH KEY otype = 'US'.
     lc_sobid = ls_result_tab-objid.
   ENDIF.
If the above code failed for any reason use the Created By user as the
requisioner
   IF lc_sobid IS INITIAL.
     lc_sobid = ls_header-created_by.
   ENDIF.
Set the stop amount to the total value of the cart
   IF li_stop_amt IS INITIAL.
     li_stop_amt = ls_header-total_value.
   ENDIF.
   DO.
Get the Object ID of user
     SELECT SINGLE objid
            INTO lc_objid
            FROM hrp1001
            WHERE sobid = lc_sobid
              AND otype = 'S'
              AND plvar = '01'.
     IF sy-subrc NE 0.
       EXIT.
     ENDIF.
Get the SL Approver
     SELECT SINGLE low
              INTO lc_slapprover
              FROM hrv1222a
              WHERE plvar  =  '01'
                AND otype  =  'S'
                AND objid  =  lc_objid
                AND begda  LE sy-datum
                AND endda  GE sy-datum
                AND attrib =  'SLAPPROVER'.
     IF sy-subrc NE 0.
       EXIT.
     ENDIF.
**break-point.
Get the Approver's Limit
     CLEAR li_limit.
     lc_sobid = lc_slapprover+2.
     CALL FUNCTION 'BBP_BW_GET_APPR_LIMIT'
       EXPORTING
         i_userid     = lc_sobid
       IMPORTING
         e_appr_limit = li_limit.
     SUBTRACT '.01' FROM li_limit.  "D0001093425
     IF li_limit GT 0.
Add the approver to the list
       SELECT SINGLE persnumber
              INTO lc_persnumber
              FROM usr21
              WHERE bname = lc_sobid.
       IF sy-subrc IS INITIAL.
         SELECT name_text
                INTO ls_approver-name
                FROM adrp
                UP TO 1 ROWS
                WHERE persnumber =  lc_persnumber
                  AND date_from  LE sy-datum
                  AND date_to    GE sy-datum.
         ENDSELECT.
       ENDIF.
       ADD 1 TO li_stepno.
       ls_approver-approval_index = li_stepno.
       ls_approver-approval_agent = lc_slapprover.
       set_approval_description.
       APPEND ls_approver TO approval_table.
       CLEAR ls_approver.
     ENDIF.
If the limit is greater than the stop amount, exit - we are finished
     IF li_limit GE li_stop_amt.
       EXIT.
     ENDIF.
   ENDDO.
ENDIF.
Inserted by Rakesh Palle for Order
DR # D0001055958
IF lv_order = 'X'.
   lc_first = 'X'.
   LOOP AT lt_order INTO ls_order.
     CHECK ls_order-val_from LE ls_header-total_value
       AND ls_order-val_to   GE ls_header-total_value.
Handle Approver Name - Explicit
     IF NOT ls_order-bname IS INITIAL.
       CONCATENATE 'US' ls_order-bname INTO
                   ls_approver-approval_agent.
       READ TABLE approval_table INTO ls_approver_check
            WITH KEY approval_agent = ls_approver-approval_agent.
       IF sy-subrc NE 0.
         set_approval_level_2.
         set_approval_description.
         ls_approver-name = ls_order-name_text.
         APPEND ls_approver TO approval_table.
         CLEAR ls_approver-name.
         li_last_level = ls_order-appr_level.
       ENDIF.
     ENDIF.
Handle Approver Names - Derive from Role
     IF NOT ls_order-agr_name IS INITIAL.
       ls_roles-agr_name = ls_order-agr_name.
       APPEND ls_roles TO lt_roles.
       CALL FUNCTION 'BBP_READ_USERS_OF_ROLES'
         TABLES
           roles              = lt_roles
           users_of_roles     = lt_users
         EXCEPTIONS
           no_users_available = 1
           OTHERS             = 2.
       IF sy-subrc IS INITIAL.
         LOOP AT lt_users INTO ls_users.
           SELECT SINGLE persnumber
                  INTO lc_persnumber
                  FROM usr21
                  WHERE bname = ls_users-uname.
           IF sy-subrc IS INITIAL.
             SELECT name_text
                    INTO ls_approver-name
                    FROM adrp
                    UP TO 1 ROWS
                    WHERE persnumber =  lc_persnumber
                      AND date_from  LE sy-datum
                      AND date_to    GE sy-datum.
             ENDSELECT.
           ENDIF.
           CONCATENATE 'US' ls_users-uname INTO
                       ls_approver-approval_agent.
           READ TABLE approval_table INTO ls_approver_check

Answer 1

hi,
let me know the following things
1) how many levels are working ? is the workitem send to the second approver (or) not?
is the issue occuring with the first approver?
2) are you using the index value correctly in your approval badi? please check out.
Badi is called during each approval stage 
3)  what is the value of approval_state in the workflow container ? 
if the value is 5 --> it will go to the next approver.
4) have you been able to debug --> the approval process --> this will enable you to find root cause of the issue.
check out FM
BBP_WFL_DIN_APPR_CONTAINER_SET --> this is the point where the approval update happens --> when the approver approves (or) rejects the cart.