BDC for VA02 to update Sales Order

Question

Hi,
I'm try to run a BDC to update partner data on the sales order header data but I get this error when I executed the BDC.
Field 'GVS_TC_DATA-REC-PARTNER(8) does not exist in the screen SAPMV45A 4002
Please advise. The code is as shown below:
REPORT zstd21  NO STANDARD PAGE HEADING
               LINE-SIZE 255.
INCLUDE bdcrecx1.
DATA:
  BEGIN OF itab OCCURS 0,
    vbeln  LIKE   vbak-vbeln,
    kunnr  LIKE   vbpa-kunnr,
  END OF itab.
PARAMETER: p_flname   LIKE   sopcpath-file  OBLIGATORY
                                            VISIBLE LENGTH 100.
START-OF-SELECTION.
  PERFORM read_data_from_file.
  PERFORM open_group.
  PERFORM update_order_salesrep.
  PERFORM close_group.
END-OF-SELECTION.
*&      Form  READ_DATA_FROM_FILE
      text
-->  p1        text
<--  p2        text
FORM read_data_from_file .
  DATA:
    lv_filename      TYPE    string.
  CONSTANTS:
    c_numeric        TYPE    char10    VALUE '0123456789'.
  CLEAR lv_filename.
  lv_filename = p_flname.
  CALL METHOD cl_gui_frontend_services=>gui_upload
    EXPORTING
      filename                = lv_filename
      filetype                = 'DAT'
      has_field_separator     = 'X'
      dat_mode                = 'X'
   CODEPAGE                = SPACE
    CHANGING
      data_tab                = itab[]
    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
      not_supported_by_gui    = 17
      error_no_gui            = 18
      OTHERS                  = 19 .
  IF sy-subrc <> 0.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
               WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
  ENDIF.
  IF itab[] IS INITIAL.
    MESSAGE i000(zv).
    STOP.
  ENDIF.
  CLEAR itab.
  LOOP AT itab.
    IF itab-vbeln CO c_numeric.
      UNPACK itab-vbeln TO itab-vbeln.
    ENDIF.
    IF itab-kunnr CO c_numeric.
      UNPACK itab-kunnr TO itab-kunnr.
    ENDIF.
    MODIFY itab.
  ENDLOOP.
ENDFORM.                    " READ_DATA_FROM_FILE
*&      Form  UPDATE_ORDER_SALESREP
      text
-->  p1        text
<--  p2        text
FORM update_order_salesrep .
  CONSTANTS:
    c_header    TYPE  vbpa-posnr    VALUE   '000000',
    c_srep      TYPE  vbpa-parvw    VALUE   'ZS',
    c_field     TYPE  bdcdata-fnam  VALUE   'GVS_TC_DATA-REC-PARTNER(',
    c_quote     TYPE  char1         VALUE   '''',
    c_bracket   TYPE  char1         VALUE   ')'.
  DATA:
    lit_vbpa    LIKE  vbpa OCCURS 0 WITH HEADER LINE,
    lv_field    TYPE  bdcdata-fnam,
    lv_pos(2)   TYPE  n.
  IF NOT itab[] IS INITIAL.
    SELECT mandt vbeln posnr parvw
    INTO   TABLE lit_vbpa
    FROM   vbpa
    FOR ALL ENTRIES IN itab
    WHERE  vbeln = itab-vbeln
    AND    posnr = c_header.
  ENDIF.
  SORT lit_vbpa BY vbeln posnr parvw.
  LOOP AT itab.
    CLEAR: lv_field,
           lv_pos.
    CLEAR lit_vbpa.
    LOOP AT lit_vbpa WHERE vbeln = itab-vbeln.
      lv_pos = lv_pos + 1.
      IF lit_vbpa-parvw EQ c_srep.
        CONCATENATE c_quote c_field lv_pos c_bracket c_quote
               INTO lv_field IN CHARACTER MODE.
        CONDENSE lv_field.
        EXIT.
      ENDIF.
    ENDLOOP.
    IF NOT lv_field IS INITIAL.
      PERFORM bdc_dynpro      USING 'SAPMV45A'    '0102'.
      PERFORM bdc_field       USING 'BDC_CURSOR'  'VBAK-VBELN'.
      PERFORM bdc_field       USING 'BDC_OKCODE'  '/00'.
      PERFORM bdc_field       USING 'VBAK-VBELN'  itab-vbeln.
      PERFORM bdc_dynpro      USING 'SAPMV45A'    '4001'.
      PERFORM bdc_field       USING 'BDC_OKCODE'  '=KPAR_SUB'.
      PERFORM bdc_dynpro      USING 'SAPMV45A'    '4002'.
      PERFORM bdc_field       USING 'BDC_OKCODE'  '=SICH'.
      PERFORM bdc_field       USING 'GV_FILTER'   'PARALL'.
      PERFORM bdc_field       USING lv_field      itab-kunnr.
      PERFORM bdc_transaction USING 'VA02'.
    ENDIF.
  ENDLOOP.
ENDFORM.                    " UPDATE_ORDER_SALESREP

Answer 1

Hi satyadev,
As per this error message "Field 'GVS_TC_DATA-REC-PARTNER(8) does not exist in the screen SAPMV45A 4002", screen does not have GVS_TC_DATA-REC-PARTNER(8) field.
It is obvious that your recording has this field but not the current screen.
Look at the screen and recording, if possible do a re-recording.
This is a general problem with  BDCs. Configuration / screen fields and screen order should be similar with the recording screen order and screen field.
One of the possible reason may be your functional team might have changed the screen number or they might have hide this field.
Hope this helps..
Mubeen