MUNDOSAP

Regresar   MUNDOSAP > DESARROLLO > Programación ABAP IV
Nombre de Usuario
Contraseña
Home Descargas Registrar FAQ Miembros Calendario Buscar Temas de Hoy Marcar Foros Como Leídos




 
Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Viejo 28/04/08, 19:56:05
gerbeltran gerbeltran is offline
Member
 
Fecha de Ingreso: jun 2007
Mensajes: 55
Añadir un boton a un ALV List

Buenas, alguien me puede decir si es posible añadir un botón adicional a los standar en un ALV List. De ser posible me pueden dar una mano con eso ?

Saludos y muchas gracias.
Responder Con Cita
  #2  
Viejo 28/04/08, 20:44:53
Dano Dano is offline
Junior Member
 
Fecha de Ingreso: abr 2006
Localización: Queretaro
Mensajes: 13
Hola, yo agregue botones adicionales a un ALV pero lo que hice fue sobreescribir todo el menu, en STATUS GUI en la barra de pulsadores coloque los botones del ALV además de los que yo necesitaba.

Por ejemplo:

SET PF-STATUS 'STATUS_01'.

y al llamar el GRID. debes de llamarlo:

CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
i_interface_check = ' '
i_bypassing_buffer = 'X'
i_buffer_active = ' '
i_callback_program = sy-repid
i_callback_pf_status_set = 'STATUS_01' " Menú de opciones.
i_callback_user_command = 'ALV_CALLBACK_COMMANDS'
i_callback_user_command = 'USER_COMMAND_01'
I_CALLBACK_TOP_OF_PAGE = ' '
I_CALLBACK_HTML_TOP_OF_PAGE = ' '
I_CALLBACK_HTML_END_OF_LIST = ' '
I_STRUCTURE_NAME = 'TIEKPO1'
i_background_id = 'ALV_BACKGROUND'
i_grid_title = v_titulo
I_GRID_SETTINGS =
is_layout = g_layout
it_fieldcat = g_fieldcat[]
IT_EXCLUDING =
IT_SPECIAL_GROUPS =
it_sort = g_sort[]
IT_FILTER =
IS_SEL_HIDE =
i_default = 'X'
i_save = 'X'
IS_VARIANT =
it_events = lt_events
it_event_exit = lt_event_exit
IS_PRINT =
IS_REPREP_ID =
I_SCREEN_START_COLUMN = 0
I_SCREEN_START_LINE = 0
I_SCREEN_END_COLUMN = 0
I_SCREEN_END_LINE = 0
I_HTML_HEIGHT_TOP = 0
I_HTML_HEIGHT_END = 0
IT_ALV_GRAPHICS =
IT_HYPERLINK =
IT_ADD_FIELDCAT =
IT_EXCEPT_QINFO =
IR_SALV_FULLSCREEN_ADAPTER =
IMPORTING
E_EXIT_CAUSED_BY_CALLER =
ES_EXIT_CAUSED_BY_USER =
TABLES
* t_outtab = tiME37
t_outtab = <fsTabla>
EXCEPTIONS
program_error = 1
OTHERS = 2.


El user command debera de llamarse de la misma manera que lo especificas en el ALV

form user_command_01 using ucomm like sy-ucomm
selfield type slis_selfield.

* CLEAR: lclistaitem.
read table tiEKPO1 index selfield-tabindex.
* check sy-subrc = 0.

case ucomm.

* Doble Click
WHEN '&IC1'.
CASE SELFIELD-FIELDNAME.
.
.
.


saludos
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Reglas de Mensajes
no puedes crear nuevos temas
no puedes responder temas
no puedes adjuntar archivos
no puedes editar tus mensajes

El código vB está On
Las caritas están On
Código [IMG] está On
Código HTML está Off
Saltar a Foro


Husos Horarios son GMT. La hora en este momento es 22:30:22.


www.mundosap.com 2006 - Spain
software crm, crm on demand, software call center, crm act, crm solutions, crm gratis, crm web