• Martes 12 de Noviembre de 2024, 21:00

Autor Tema:  Alv Grid  (Leído 4273 veces)

maiglesi

  • Nuevo Miembro
  • *
  • Mensajes: 1
    • Ver Perfil
Alv Grid
« en: Miércoles 9 de Mayo de 2007, 13:40 »
0
Hola:

         Tengo que crear un ALV GRID que cuando se pinche en una de las filas, esta muestre un formulario con unos datos editables. Ya tengo el ALV pero no encuentro la forma de que interactue al pinchar sobre la fila.

    ¿Alguien podría ayudarme?

gracias y un saludo

Blag

  • Moderador
  • ******
  • Mensajes: 697
    • Ver Perfil
    • http://atejada.blogspot.com
Re: Alv Grid
« Respuesta #1 en: Sábado 19 de Mayo de 2007, 21:54 »
0
Es un ALV normal o Orientado a Objetos???

ALV Normal

Código: Text
  1.  
  2. DATA: G_USER_COMMAND TYPE SLIS_FORMNAME VALUE 'USER_COMMAND';
  3.  
  4. CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
  5.        EXPORTING
  6.             I_BUFFER_ACTIVE         = ' '
  7.             I_CALLBACK_PROGRAM      = G_PROGRAM
  8.             I_CALLBACK_USER_COMMAND = G_USER_COMMAND
  9.             IS_LAYOUT               = GS_LAYOUT
  10.             I_SAVE = 'A'
  11.             I_GRID_TITLE            = G_TITULO
  12.             IT_FIELDCAT             = I_FIELDCAT
  13.             IT_SORT                 = GS_SORT[]
  14.        TABLES
  15.             T_OUTTAB                = T_DETALLADO_COLLECT
  16.        EXCEPTIONS
  17.             PROGRAM_ERROR           = 1
  18.             OTHERS                  = 2.
  19.  
  20. FORM INIT_LAYOUT.
  21.  
  22.   GS_LAYOUT-ZEBRA = 'X'.
  23.   GS_LAYOUT-F2CODE = 'VER_OPBEL'.
  24.   GS_LAYOUT-DETAIL_POPUP = 'X'.
  25.  
  26. ENDFORM.
  27.  
  28. *---------------------------------------------------------------------*
  29. *       FORM USER_COMMAND                                             *
  30. *---------------------------------------------------------------------*
  31. *       Comando de Función para el ALV.
  32. *---------------------------------------------------------------------*
  33.  
  34. FORM USER_COMMAND USING R_UCOMM LIKE SY-UCOMM
  35.                         RS_SELFIELD TYPE SLIS_SELFIELD.
  36.  
  37.   CHECK NOT RS_SELFIELD-TABNAME IS INITIAL.
  38.  
  39.   CASE R_UCOMM.
  40.  
  41.     WHEN 'VER_OPBEL'.
  42.  
  43.       READ TABLE T_DETALLADO INDEX RS_SELFIELD-TABINDEX.
  44.  
  45.       SET PARAMETER ID '80B' FIELD T_DETALLADO-OPBEL.
  46.       CALL TRANSACTION 'FPE3' AND SKIP FIRST SCREEN.
  47.  
  48.   ENDCASE.
  49.  
  50. ENDFORM.
  51.  
  52.  

ALV OO

Necesitas declarar el evento Double Clic...Ahorita no lo tengo, puesto que lo hecho solo para ALV Tree  B)

Saludos,

Blag  :smartass: