PDA

Ver la Versión Completa : Historico cambios precios articulo proveedor


vlg1971
01/02/08, 11:47:11
Hola buenos dias, tengo que realizar un listado en el que debo de mostrar un historico de cambios de precios en los articulos proveedor, no estoy muy puesto en este tema, creo que igual hay que sacar la informacion del registro info de compras (tablas eina, eine, konp) pero no lo tengo claro, me podeis confirmar si estoy en lo cierto y que combinacion de tablas tengo que realizar para obtener los diferentes precios que articulo por proveedor

Gracias por la atencion

ibecerra
01/02/08, 12:57:02
lo mismo me paso hace tiempo asi q me puse a debugear la tx.ME13
y las funciones que te devuelven la informacion son la siguientes


*Inicio IBF 24.08.2007
*Tomar Registro Info para ello llamar función
clear t_konp.
REFRESH t_konp.
CALL FUNCTION 'ME_FILL_KOMG_IN'
EXPORTING
i_eina = WT_EINA
i_eine = eine
IMPORTING
e_komg = komg
e_vake = vake
EXCEPTIONS
OTHERS = 1.
CALL FUNCTION 'ME_DETERMINE_KOTABNR'
EXPORTING
i_komg = komg
IMPORTING
e_kotabnr = vake-kotabnr.

CALL FUNCTION 'MEX_SCHEMA_SUCHEN'
EXPORTING
pi_lifnr = WT_EINA-lifnr
pi_ekorg = eine-ekorg
IMPORTING
po_kalsm = kalsm.
REFRESH: t_kschl. "322598
CALL FUNCTION 'ME_GET_CONDITIONS_TO_SEARCH' "322598
EXPORTING
application = kappl
dialog = ' '
kondtyp = 'H'
pricing_scheme = kalsm
tabelle = vake-kotabnr
TABLES
koart = it_koart
EXCEPTIONS
no_success = 2
terminated_by_user = 3
OTHERS = 1.
LOOP AT it_koart. "322598
t_kschl = it_koart-kschl. "322598
APPEND t_kschl.
ENDLOOP. "322598
CALL FUNCTION 'MM_CONDITION_RECORDS_READ'
EXPORTING
i_application = vake-kappl
i_condition_table = vake-kotabnr
i_date = sy-datlo
i_keyfields = komg
IMPORTING
e_prdat = eine-prdat
TABLES
t_kschl = t_kschl
t_konp = t_konp
EXCEPTIONS
OTHERS = 0.
t_archivo-netpr = 0.
READ TABLE t_konp INDEX 1.
t_archivo-netpr = t_konp-KBETR. ---> precio