FORM USEREXIT_MOVE_FIELD_TO_ME_REQ.

data: ZZWA_CONDR type KONP.
data: begin of ZZWA_AXXX,
   KNUMH type KNUMH,
end of ZZWA_AXXX.
select single * from A304 into corresponding fields of ZZWA_AXXX
   where KAPPL = 'V' and
         KSCHL = 'PR00' and
         VKORG = VBAK-VKORG and
         VTWEG = VBAK-VTWEG and
         MATNR = VBAP-MATNR and
         DATBI GE sy-datum.
select single * from KONP into ZZWA_CONDR
   where KNUMH = ZZWA_AXXX-KNUMH.
EBAN-PREIS = ZZWA_CONDR-KBETR.

ENDFORM.