Archivo

Posts Tagged ‘comentario’

COMMENT en pantalla selección

Caso: se busca mostrar la descripción de un campo en la pantalla de selección.

REPORT zprueba_descripcion.
TABLES kna1.

DATA: gv_kunnr TYPE kna1-kunnr.

SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME.
SELECTION-SCREEN BEGIN OF LINE.
SELECT-OPTIONS: s_kunnr FOR kna1-kunnr NO-EXTENSION NO INTERVALS.
SELECTION-SCREEN COMMENT 48(35) gv_name1.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK b1.

AT SELECTION-SCREEN ON s_kunnr.
CLEAR gv_name1.

SELECT SINGLE kunnr name1
INTO (gv_kunnr, gv_name1)
FROM kna1
WHERE kunnr IN s_kunnr.

IF sy-subrc NE 0.
MESSAGE s899(mm) WITH ‘Cliente inexistente’ DISPLAY LIKE ‘E’.
ENDIF.