|
espero poder ayudarte, hace poco me dejaron un programa que hacia la actualizacion, este es el codigo espero te sirva. es un programa y le cree una transaccion, asi que para ejecutarlo entraba a la transaccion creada, y ya entraba para actualizarlas.. no se si te referias a esto, yo le meti directamente la tablaz pero puedes hacerlo con parameter y asi escoges que tabla quieres, la funcion te hace todo.
**********
REPORT ZMTM002.
DATA: C_UPDATE TYPE c VALUE 'S'.
INCLUDE zmtm002_f01. "Include de Implementacion de Rutinas
START-OF-SELECTION.
PERFORM f_mantener_rechazos. "Rutina que valida el nombre de la tabla
END-OF-SELECTION.
*&---------------------------------------------------------------------*
*& Include ZMTM002_F01
*&---------------------------------------------------------------------*
FORM f_mantener_rechazos.
*-- Se llama a la funcion para visualizar el actualizador
CALL FUNCTION 'VIEW_MAINTENANCE_CALL'
EXPORTING
ACTION = C_UPDATE
* CORR_NUMBER = ' '
* GENERATE_MAINT_TOOL_IF_MISSING = ' '
SHOW_SELECTION_POPUP = 'X'
VIEW_NAME = 'tablaz'
* NO_WARNING_FOR_CLIENTINDEP = ' '
* RFC_DESTINATION_FOR_UPGRADE = ' '
* CLIENT_FOR_UPGRADE = ' '
* VARIANT_FOR_SELECTION = ' '
* COMPLEX_SELCONDS_USED = ' '
* CHECK_DDIC_MAINFLAG = ' '
* SUPPRESS_WA_POPUP = ' '
* TABLES
* DBA_SELLIST =
* EXCL_CUA_FUNCT =
EXCEPTIONS
CLIENT_REFERENCE = 1
FOREIGN_LOCK = 2
INVALID_ACTION = 3
NO_CLIENTINDEPENDENT_AUTH = 4
NO_DATABASE_FUNCTION = 5
NO_EDITOR_FUNCTION = 6
NO_SHOW_AUTH = 7
NO_TVDIR_ENTRY = 8
NO_UPD_AUTH = 9
ONLY_SHOW_ALLOWED = 10
SYSTEM_FAILURE = 11
UNKNOWN_FIELD_IN_DBA_SELLIST = 12
VIEW_NOT_FOUND = 13
MAINTENANCE_PROHIBITED = 14
OTHERS = 15
.
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
ENDFORM. "f_mantener_rechazos
|