Alguien conoce alguna bapi para la transacción IW32.

[chejoblanco]

Buscando en interne encontré la BAPI_ALM_ORDER_MAINTAIN, pero esta un poco difícil llenarla si alguien tiene algun pequeño ejemplo me lo puede enviar a soblanco@tutopia.com

[JuanFCalle]

Hola, tambien necesito un BAPI para modificar la norma de liquidacion en una orden de mantenimiento, alguna idea ?
gracias

[alvagu]

El sgte. código lo utilicé para modificar la duración de actividades.

La tabla interna t_modelcant tiene los campos:

AUFNR
MATNR
KWMENG


DATA: lt_operacion TYPE STANDARD TABLE OF bapi_alm_order_operation_e WITH HEADER LINE,
lt_methods TYPE STANDARD TABLE OF bapi_alm_order_method,
lt_operations TYPE STANDARD TABLE OF bapi_alm_order_operation,
lt_operations_up TYPE STANDARD TABLE OF bapi_alm_order_operation_up,
lt_return2 TYPE STANDARD TABLE OF bapiret2.

DATA: wa_header TYPE bapi_alm_order_header_e,
wa_operacion TYPE bapi_alm_order_operation_e,
wa_methods TYPE bapi_alm_order_method,
wa_operations TYPE bapi_alm_order_operation,
wa_operations_up TYPE bapi_alm_order_operation_up,
wa_return2 TYPE bapiret2.

DATA: lw_cont TYPE ifrefnum,
lw_stat TYPE j_status.

CONSTANTS: c_operat TYPE obj_typ VALUE 'OPERATION',
c_change TYPE swo_method VALUE 'CHANGE',
c_save TYPE swo_method VALUE 'SAVE'.

SORT t_modelcant BY aufnr ASCENDING.

LOOP AT t_modelcant.
AT NEW aufnr.
REFRESH: lt_operations, lt_methods, lt_return2, lt_operations.
CLEAR: wa_header, lw_cont, wa_operations, wa_operacion.

*&---------------------------------------------------------------------*
*& O B T E N E R D A T O S D E L A O R D E N
*&---------------------------------------------------------------------*
CALL FUNCTION 'BAPI_ALM_ORDER_GET_DETAIL'
EXPORTING
number = t_modelcant-aufnr
IMPORTING
es_header = wa_header
TABLES
et_operations = lt_operacion
return = lt_return2.

* Verificar que la Orden no ha sido Liberada
SELECT SINGLE stat INTO lw_stat
FROM jcds
WHERE objnr EQ wa_header-object_no
AND stat EQ 'I0002'
AND inact EQ space.

IF sy-subrc EQ 0.
CONTINUE.
ENDIF.

* Verificar que la Orden está asociada a un Pedido
IF wa_header-sales_ord IS INITIAL.
RAISE err_ped.
ENDIF.

* Verificar que no hay error
READ TABLE lt_return2 INTO wa_return2 WITH KEY type = 'E'.
IF sy-subrc EQ 0.
RAISE err_dat.
ELSE.
REFRESH: lt_return2.

* Agregar metodo para grabar
CLEAR wa_methods.
wa_methods-objecttype = space.
wa_methods-method = c_save.
APPEND wa_methods TO lt_methods.

LOOP AT lt_operacion INTO wa_operacion.
CHECK wa_operacion-number_of_capacities NE 0.

* Obtener cantidad de la posición del Pedido
READ TABLE lt_modelcant INTO wa_modelcant WITH KEY aufnr = t_modelcant-aufnr
matnr = wa_operacion-standard_text_key.
IF sy-subrc EQ 0.
ADD 1 TO lw_cont.

* Agregar evento de modificar Operación
CLEAR wa_methods.
wa_methods-refnumber = lw_cont.
wa_methods-objecttype = c_operat.
wa_methods-method = c_change.
wa_methods-objectkey+0(12) = t_modelcant-aufnr.
wa_methods-objectkey+12(4) = wa_operacion-activity.
APPEND wa_methods TO lt_methods.

* Datos a modificar
CLEAR wa_operations.
wa_operations-activity = wa_operacion-activity.
wa_operations-duration_normal = wa_modelcant-kwmeng / wa_operacion-number_of_capacities.
APPEND wa_operations TO lt_operations.

CLEAR wa_operations_up.
wa_operations_up-activity = 'X'.
wa_operations_up-duration_normal = 'X'.
APPEND wa_operations_up TO lt_operations_up.
ENDIF.
ENDLOOP.

*&---------------------------------------------------------------------*
*& M O D I F I C A R O R D E N
*&---------------------------------------------------------------------*
CALL FUNCTION 'BAPI_ALM_ORDER_MAINTAIN'
TABLES
it_methods = lt_methods
it_operation = lt_operations
it_operation_up = lt_operations_up
return = lt_return2.

READ TABLE lt_return2 INTO wa_return2 WITH KEY type = 'E'.
IF sy-subrc EQ 0.
CALL FUNCTION 'BAPI_TRANSACTION_ROLLBACK'.

RAISE err_mod.
ELSE.
CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
EXPORTING
wait = 'X'.
ENDIF.
ENDIF.
ENDAT.
ENDLOOP.

[JuanFCalle]

Gracias, este código me ha servido mucho, pero tengo unas preguntas.
Por que haces el SAVE sin un refnumber ? y antes del CHANGE ?
Para que sirve ese refnumber?
Si yo quiero crear una norma de liquidacion (settlement rule) debo incluir el CREATE en el method y despues el SAVE ?

Gracias, espero que esto no sea muy confuso.

[alvagu]

No recuerdo muy bien ya que eso lo hice hace mucho tiempo.

Pero me parece que si no le pones el SAVE no modifica nada, asi que es necesario que primero se pase el SAVE.

Nunca he chreado norma de liquidación con esta BAPI, pero supongo que es como comentas.

[jeyko]

Tengo una pregunta sobre el tema

Lo que estan haciendo ustedes es modificaciones masivas de data maestra o estan corriendo otro tipo de proceso con las Bapi´s

La pregunta la hago debido a que parecieran modificaciones masivas que se pueden hacer con LSMW, pero seria interesante saber por que es mejor con Bapi.