Obtén los datos de las tablas A004 y A005...
Ver ejemplo a continuación del código del precio por unidad de material:
-
Obtén los datos de la tabla A004 para obtener KNUMH
-
Se añadió un nuevo campo Unidad de Venta - Seshu 01/09/2006
refresh : i_a004.
clear : i_a004.
data : lv_kbetr like konp-kbetr," Valor de la condición
lv_KPEIN like konp-kpein , "por
lv_KMEIN like konp-KMEIN. " Unidad de Venta
select * from a004 into table i_a004
where matnr = i_join-matnr
and vkorg = '0001'
and vtweg = '01'.
if sy-subrc eq 0.
sort i_a004 by DATAB descending.
-
Obtén la última fecha
lee tabla i_a004 con clave matnr = i_join-matnr
vkorg = '0001'
vtweg = '01'
búsqueda binaria.
-
Obtén el Valor de Venta
select single kbetr KPEIN KMEIN from konp
into (lv_kbetr,lv_KPEIN, lv_KMEIN)
where knumh = i_a004-knumh
and kappl = i_a004-kappl
and kschl = i_a004-kschl.
if sy-subrc eq 0.
i_output-kbetr = lv_kbetr / lv_KPEIN.
i_output-KMEIN = lv_KMEIN.
endif.
endif.
clear : lv_kbetr,
lv_kpein,
lv_KMEIN.
Puntos de Recompensa si es útil
Gracias
Seshu
