How to do the RELATIONSHIP in the BP transaction....???

Question

Hi all,
Actually, I am working with the Business Partner(BP) transaction.  I have loaded some of the contact data using the LSMW.  Now I need to create relationship between the customer contacts and the main customer masters..  There is a RELATIONSHIP TAB in the BP transaction which creates the relationship between the partners.... I did created some of the relations manually, but I have to do it for a large amount of data.... Can anyone give me a idea as to how will I be going forward, is there any method that I need to follow or do I need to write any program.... ??
If at all, I need to write a program, is it possible to give me a sample code????
I will really appreciate your answers in the form of points.
Thanks,
    -Warren....

Answer 1

Hi Warren,
1) Upload the so called large amount of data (Typically residing in a file) into Internal table.
2) Record the steps done in the Business partner transaction using SHDB transaction and generate a BDC program out of the transaction.
3) Change the logic of the population of the BDC table using the data in the internal tables.
3) Call the transaction using the statement
call transaction using <BDC_INternal_Table>.
In Short, what we are trying here is simulating the manual entry of data into the transaction using a BDC Program.
Program skeleton
g_file hold the file name and path.
  CALL FUNCTION 'GUI_UPLOAD'
    EXPORTING
      filename                      = g_file
    TABLES
      data_tab                      = i_dataf
    EXCEPTIONS
      file_open_error               = 1
      file_read_error               = 2
      no_batch                      = 3
      gui_refuse_filetransfer       = 4
      invalid_type                  = 5
      no_authority                  = 6
      unknown_error                 = 7
      bad_data_format               = 8
      header_not_allowed            = 9
      separator_not_allowed         = 10
      header_too_long               = 11
      unknown_dp_error              = 12
      access_denied                 = 13
      dp_out_of_memory              = 14
      disk_full                     = 15
      dp_timeout                    = 16
      OTHERS                        = 17
  IF sy-subrc <> 0.
    write: / Text-032.
    stop.
  ENDIF.
loop at i_dataf.
*bulid the bdc table
      perform bdc_dynpro      using <screen Program Name> <Screen number>.
             perform bdc_field       using <Field name> <Value>.
          call transaction <TRansaction Name> using t_bdcdata
                                   mode 'N'
                                 update 'S'
                               messages into t_messages.
endloop.
form bdc_dynpro using    p_program
                         p_dynpro.
  t_bdcdata-program  = p_program.
  t_bdcdata-dynpro   = p_dynpro.
  t_bdcdata-dynbegin = 'X'.
  append t_bdcdata.
  clear t_bdcdata.
endform.                    " bdc_dynpro
*&      Form  bdc_field
      text
form bdc_field using    p_fnam
                        p_fval.
  t_bdcdata-fnam = p_fnam.
  t_bdcdata-fval = p_fval.
  append t_bdcdata.
  clear t_bdcdata.
endform.                    " bdc_field
Regards,
Ravi
Message was edited by: Ravi Kanth Talagana