cancel
Showing results for 
Search instead for 
Did you mean: 
Read only

Business Partner IBAN Upload S/4 Hana

Former Member
0 Kudos
364

Dear All,

We are trying to upload IBANs for business partner. What is the best practice for uploading mass data?

PS: 1 bp may or may not have multiple IBANs

Regards,

View Entire Topic
jonathanbarrio80
Explorer
0 Kudos

Hello. I arrive so late, never the less, for this answer help other user:

In note 
1973286 - CVI: Fecha de validez del IBAN como campo sensible - SAP for Me
I got this code, without self-testing:

  DATA: T_ITIBAN TYPE TABLE OF ITIBAN,
        WA_ITIBAN LIKE LINE OF T_ITIBAN,
        BANKN LIKE REGUH_BF-ZBNKN.

  DATA: LT_TIBAN_VAL TYPE TABLE OF ITIBAN,
        WA_TIBAN_VAL LIKE LINE OF LT_TIBAN_VAL,
        E_IBAN LIKE ITIBAN-IBAN.


*------ fill work tables -----------------------------------------------
*>>>> END OF INSERTION <<<<<<
...
    CALL FUNCTION 'UPDATE_IBAN'
      EXPORTING
        test_mode = gc_x
      IMPORTING
        e_changed = e_xchng.
*>>>> START OF DELETION <<<<<
  ENDIF.
ENDFORM.                    "BUT0BK_XCHNG
*>>>> END OF DELETION <<<<<<<
*>>>> START OF INSERTION <<<<
  ENDIF.

  CALL FUNCTION 'DATA_TRANSFER_IBAN'
*   EXPORTING
*     I_TIBAN        =
   TABLES
*     T_TIBAN        =
     T_ITIBAN       = T_ITIBAN[]
            .
  LOOP AT T_ITIBAN INTO wa_itiban WHERE KZ IS NOT INITIAL.

    BANKN = wa_itiban-BANKN(18).

   MOVE-CORRESPONDING wa_itiban to WA_TIBAN_VAL.

   CALL FUNCTION 'READ_IBAN_FROM_DB'
    EXPORTING
      I_BANKS                 = wa_itiban-BANKS
      I_BANKL                 = wa_itiban-BANKL
      I_BANKN                 = BANKN
      I_BKONT                 = wa_itiban-BKONT
*     I_BKREF                 =
   IMPORTING
*     E_ICON                  =
*     E_ICON_ID               =
     E_IBAN                  = E_IBAN
     E_IBAN_VALID_FROM       = WA_TIBAN_VAL-VALID_FROM
*     E_SUBRC                 =
*     E_ICON_TEXT             =
            .
     IF E_IBAN IS NOT INITIAL.
     APPEND WA_TIBAN_VAL TO LT_TIBAN_VAL.
     ENDIF.
  ENDLOOP.