Bank Detail Update

-
ATA: ls_message   TYPE bapiret2,
        lt_message   TYPE STANDARD TABLE OF bapiret2,
        ls_message1  TYPE                   bapiret2,
        ls_msg       TYPE                   bapiret2,
        bank_detail  TYPE                   bapibus1006_bankdetail,
        business_par TYPE                   bu_partner,
        gt_status    type STANDARD TABLE OF ZVENDOR_BANK_S,
        gs_status    type                   ZVENDOR_BANK_S.

  LOOP AT gt_file INTO gs_file.
    MOVE gs_file-bpartner                    TO business_par.
    MOVE gs_file-bank_ctry                   TO bank_detail-bank_ctry.
    MOVE gs_file-bank_key                    TO bank_detail-bank_key.
    MOVE gs_file-bank_acct                   TO bank_detail-bank_acct.
    MOVE gs_file-ctrl_key                    TO bank_detail-ctrl_key.
    MOVE gs_file-accountholder               TO bank_detail-accountholder.
    CONDENSE : business_par,bank_detail-bank_ctry,bank_detail-bank_key,bank_detail-bank_acct,bank_detail-bank_acct,bank_detail-ctrl_key,bank_detail-accountholder.
    MOVE gs_file-bankaccountname    TO bank_detail-bankaccountname.


    CALL FUNCTION 'BAPI_BUPA_BANKDETAIL_ADD'
      EXPORTING
        businesspartner = business_par
*       BANKDETAILID    =
        bankdetaildata  = bank_detail
*     IMPORTING
*       BANKDETAILIDOUT =
      TABLES
        return          = lt_message.
    READ TABLE lt_message INTO ls_msg INDEX 1.
     if sy-subrc eq 0.
       gs_status-PARTNER =  business_par.
       gs_status-MESSAGES =  ls_msg-MESSAGE.
       APPEND gs_status to gt_status.
     ENDIF.
    CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
      EXPORTING
        wait   = 'X'
      IMPORTING
        return = ls_message1.
    CLEAR: business_par,bank_detail,gs_file.
  ENDLOOP.
  IF gt_status IS NOT INITIAL.
  MODIFY ZVENDOR_BANK_S FROM TABLE gt_status.
  ENDIF.

Comments

Post a Comment

Popular posts from this blog

all user exit mv45afzz (implicit user exit )

-
MV45AFZZ this is included here all code put related to sales order creation while creating a sales order  va01 this exit trigger so as per your requirement we can write your code here I going to listed different type exit as per the real requirement you find the code and develop your business scenario INCLUDE MV45AFZZ . Modify Screen VA01/VA02/VA03 How to Activated and Deactivated Screen  Export Memory example While Creating a sales order  How to Call workflow While Creating a sales order  TYPES  :  BEGIN  OF  ty_vbak ,           KVGR1  TYPE  vbak - KVGR1 ,           KVGR2  TYPE  vbak - KVGR2 ,          END  OF  ty_vbak . DATA  :  ls_vbak  TYPE  ty_vbak . IF  sy - tcode  =  'VA02'  and...
Read more

Long Text in input and output field in module pool

-
Image
display long text in input and output field then below code help you how to display long text your input and output fields in sap ************************************************************************ * Program Name      :  ZLONG_TEXT_EDITOR           Object ID:   p002    * * Description       :  Long text with function module                   * * Create Date       :  26.12.2018                                      * * F...
Read more

MB_MIGO_BADI THIS BADI USED TO POSTING DATA IN MIGO

-
Here this badi used to how to work migo data migration and help to creating magi used to save  and validation of data  MB_DOCUMENT_UPDATE method  IF_EX_MB_MIGO_BADI ~ POST_DOCUMENT .    BREAK-POINT .    IF  is_mkpf - budat < is_mkpf - BLDAT .     sy - ucomm  =  'ENT1' .      MESSAGE  'Posting Date Should Not Be Less Than Document Date'   TYPE  'E'  .      SET SCREEN  syst - dynnr .      LEAVE SCREEN .    ENDIF . endmethod .
Read more