Расширение кредитора на БЕ из делового партнера

Хотите автоматически создавать расширение кредитора на БЕ при синхронизации с деловыми партнерами? Вот вам! Код кривой, но лучше у меня нет времени и терпения 🙂 Кто поправит до красивого буду крайне благодарен! Это образец и только для моих нужд, адаптируйте. Надо сделать кнопочку Donate для пожертвований. Около 5 часов убил, чтобы найти где и как это сделать. Пожертвовали бы?

Реализуем BADI с таким интерфейсом IF_EX_CVI_CUSTOM_MAPPER~MAP_BP_TO_VENDOR

BADi искать тут: IMG — Cross-Application Components — Master Data Synchronization — Customer/Vendor Integration — Business Partner Settings — Business Add-Ins (BAdIS).

method IF_EX_CVI_CUSTOM_MAPPER~MAP_BP_TO_VENDOR.
DATA:
  l_pernr type pernr-pernr,
  lt_p0001 type table of p0001,
  wa_p0001 type p0001,
  ls_company_data type VMDS_EI_COMPANY,
  l_task TYPE VMD_EI_COMPANY_TASK,
  l_bank_detail type BUS_EI_BUPA_BANKDETAIL.
  l_pernr = i_partner-header-object_instance-bpartner.