RS_SET_SELSCREEN_STATUS, Cambio de StatusGUI en selection-screen

[aldape]

Puedo cambiar el estatus gui con esta funcion, pero cuando escojo una opcion del menu, siemplemente no hace nada.

AT SELECTION-SCREEN OUTPUT.
DATA itab TYPE TABLE OF sy-ucomm.

CALL FUNCTION 'RS_SET_SELSCREEN_STATUS'
EXPORTING
p_status = '100'
p_program = 'ZPAGOSACREEDORES'
TABLES
p_exclude = itab.

Tengo las funciones de EXIT, BUSCAR, entre otras... como puedo saber que opcion selecciono el usuario?

[vickxo]

Hola

Hola, la verdad no entiendo bien que intentas hacer pero si lo que quieres es vincular un status a un report, lo que yo hago es cargarlo con la sentencia

SET PF-STATUS 'ZNUEVOSTATUS'.

Le doy doble click y lo creo o lo genero por separa de una copia de un status estandar y ya con eso lo puedo visualizar en mi report.
Para cachar los eventos uso el ok code de SAP, es decir para buscar SAP define un ok code q es %SC y ya con eso automaticamente se carga la funcionalidad de buscal, para ejecutar ahi ya defino yo mi propio codigo y le pongo por ejemplo EXEC y lo obtendo con sy-ucomm...pero bueno mas o menos aclara q necesitas hacer igual y te entendi mal

[aldape]

Gracias por la respuesta, lo que quiero es agregar iconos a la barra de herramientas (por ejemplo) o menus, etc... es facil en una dynpro.. pero en una selection-screen, no se como recibir la informacion de que opcion fue la que selecciono el usuario....

[DavidXD_XD]

Hola Aldape, prueba con este código, cualquier cosa me comentas ...

REPORT ZPRUEBA_ICON.

TABLES sscrfields.

SELECTION-SCREEN BEGIN OF SCREEN 100 AS SUBSCREEN.
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-010.
PARAMETERS: p1(10) TYPE c,
p2(10) TYPE c,
p3(10) TYPE c.
SELECTION-SCREEN END OF BLOCK b1.
SELECTION-SCREEN END OF SCREEN 100.

SELECTION-SCREEN: FUNCTION KEY 1,
FUNCTION KEY 2,
FUNCTION KEY 3,
FUNCTION KEY 4,
FUNCTION KEY 5.

SELECTION-SCREEN BEGIN OF TABBED BLOCK sub FOR 10 LINES.
SELECTION-SCREEN END OF BLOCK sub.

INITIALIZATION.
sscrfields-functxt_01 = '@0D@'.
sscrfields-functxt_02 = '@0E@'.
sscrfields-functxt_03 = '@EB@'.
sscrfields-functxt_04 = '@0A@'.
sscrfields-functxt_05 = '@2K@'.
sub-prog = sy-repid.
sub-dynnr = 100.

[Rodolfo Montiel Rivera]

Bueno ya nada ma complementando la excelente aportacion de David DX con la ultima respuesta quisiera agregar que para cachar el proceso se necesita hacer en el evento AT SELECTION-SCREEN de la misma forma como se haria en el reporte.

AT SELECTION-SCREEN.

DATA: ok_code LIKE sy-ucomm.

ok_code = sy-ucomm.

CASE ok_code.

*Los FC.... van en numeracion de 1 a n depende cuantos botones crees.

WHEN 'FC01'. <----perteneceria al icono de la flecha izquierda

.
.
.

WHEN 'FC05'. <---- perteneceria al icono de la palomita

PERFORM validar.

ENDCASE.