BDC related runtime error

Question

Hi gurus,
when we exicute it will occure the runtime error( convertin
form process_data .
  data : wa_vbco3 type vbco3.
  data : i_vbplp like vbplp occurs 0 with header line.
  data : v_str type string.
  data : begin of i_lips occurs 0,
         matnr type mara-matnr ,
         lfimg type lips-lfimg,
         end of i_lips.
  clear   : i_lips.
  refresh : i_lips.
  select matnr lfimg from lips
                     into table i_lips
                    where vbeln = p_vbeln.
  loop at i_pack into wa_pack.
    replace '|' with '' into wa_pack-huno.
    v_str = wa_pack-huno.
    shift v_str by 10 places circular right.
    wa_proc-exidv = v_str(10).
    unpack wa_proc-exidv to wa_proc-exidv.
    condense wa_proc-exidv.
    select single * into wa_vekp
                    from vekp
                   where exidv eq wa_proc-exidv.
    if sy-subrc eq 0.
      if wa_vekp-vpobj ne '12'.
        pack wa_vekp-exidv to wa_vekp-exidv.
        condense wa_vekp-exidv.
        wa_error-text  = wa_vekp-exidv.
        wa_error-error = text-001.
        append wa_error to i_error.
        continue.
      endif.
      wa_final-exidv =  wa_proc-exidv.
      append wa_final to i_final.
      wa_vbco3-venum = wa_vekp-venum.
      call function 'SD_PACKING_PRINT_VIEW_SINGLE'
        exporting
          comwa                    = wa_vbco3
        tables
          vbplp_tab                = i_vbplp
        exceptions
          shipping_unit_not_found  = 1
          shipping_unit_not_unique = 2
          others                   = 3.
    endif.
    loop at i_vbplp where vemng is not initial.
      wa_proc-matnr = i_vbplp-matnr.
      wa_proc-vemng = i_vbplp-vemng.
      select single maktx from makt
                     into wa_proc-maktx
                    where matnr = i_vbplp-matnr.
      append wa_proc to i_proc.
      wa_proc-exidv = space.
      wa_proc-maktx = space.
      collect wa_proc into i_proc1.
      clear : wa_proc.
    endloop.
    clear : v_str,
            wa_pack,
            wa_proc,
            wa_final.
    refresh : i_vbplp.
  endloop.
  loop at i_proc1 into wa_proc.
    read table i_lips with key matnr = wa_proc-matnr.
    if sy-subrc eq 0.
      if wa_proc-vemng ne i_lips-lfimg.
        wa_error-text  = i_lips-matnr.
        wa_error-error = text-002.
        append wa_error to i_error.
      endif.
    endif.
    clear: i_lips.
  endloop.
endform.                    " process_data

Answer 1

well I haven't finished my tinkering yet so that remains to be seen........
I spent an hour working out my ResultSet did not contain all the data I expected....... In the end it was because I was executing a ORM method in another of my classes that was reusing the statement, and hence closing the ResultSet...... but at least it gave me an excuse to refactor my classes.......
At least with my programming skills I should be good at debugging and anlysing problems.... ;)
Thanks again!!!