Create Contact Person via Function Modules

Hi,

I have a problem when i try to create a contact person in abap code: The contact is created, but the business partner is also an account... And this is what we want to avoid.

At the moment code looks like this:

First we call:

  CALL FUNCTION 'BAPI_BUPA_CREATE_FROM_DATA'    EXPORTING      partnercategory         = lv_partnr_cat      centraldata             = ls_central      centraldataperson       = ls_person      centraldataorganization = ls_organ      addressdata             = ls_address      accept_error            = abap_true      duplicate_message_type  = '-'    IMPORTING      businesspartner         = lv_bp    TABLES      telefondata             = lt_tel      e_maildata              = lt_mail      return                  = lt_return.

And then we call:

          CALL FUNCTION 'BAPI_BUPA_ROLE_ADD'            EXPORTING              businesspartner     = lv_bp              businesspartnerrole = 'BUP001'            TABLES              return              = lt_return.          CALL FUNCTION 'BAPI_BUPR_CONTP_CREATE'            EXPORTING              businesspartner = is_contact-account              contactperson   = lv_bp              validfromdate   = sy-datum              validuntildate  = '99991231'            TABLES              return          = lt_return.

Anybody has an idea how i can avoid that for the business partner also an account is created?

Thanks in advance!

Kind regards,

Robin