*&---------------------------------------------------------------------*
*&  Include           ZXV6PU12                                         *
*&---------------------------------------------------------------------*
*C_VKDFIF STRUCTURE  VKDFIF
 
tables: kna1, vbpa.
 
LOOP AT C_VKDFIF.
select single * from vbpa where vbeln = C_VKDFIF-VBELN
                           and   parvw = 'RE'.
 
if sy-subrc = 0.
   select single * from kna1 where kunnr = vbpa-kunnr.
endif.
 
if sy-subrc = 0.
    C_VKDFIF-ZZKUNRE = vbpa-kunnr.
    C_VKDFIF-ZZNAME1 = kna1-name2.
    modify C_VKDFIF.
endif.
 
ENDLOOP.