Hi
I'm trying to show a Search Help (using trabstrip) from an internal table, but when I execute the code, search help is showed twice.
SELECTION-SCREEN BEGIN OF SCREEN 100 AS SUBSCREEN.
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME.
SELECT-OPTIONS:
a0 FOR ZCTRL01-ZSTATUS,
a1 FOR ZCTRL01-ZLOTE,
a2 FOR ZCTRL01-BELNR.
SELECTION-SCREEN END OF BLOCK b1.
SELECTION-SCREEN END OF SCREEN 100.
wa_estejec-zstatus = 'E'.
wa_estejec-zdescrp = 'Error'.
APPEND wa_estejec TO ti_estejec.
wa_estejec-zstatus = 'P'.
wa_estejec-zdescrp = ' Processed'.
APPEND wa_estejec TO ti_estejec.
AT SELECTION-SCREEN on value-request for A0-low. PERFORM search_help.
AT SELECTION-SCREEN on value-request for A0-high. PERFORM search_help.
*&---------------------------------------------------------------------*
*& Selection-screen
*&---------------------------------------------------------------------*
AT SELECTION-SCREEN.
CASE sy-dynnr.
WHEN 1000.
CASE sy-ucomm.
WHEN 'PUSH1'.
mytab-dynnr = 100.
mytab-activetab = 'BUTTON1'.
MESSAGE s888(sabapdocu) WITH text-010.
sy_ucomm = 'PUSH1'.
PERFORM inicializar.
ENDCASE.
FORM SEARCH_HELP.
*&---------------------------------------------------------------------*
*& Form SEARCH_HELP
*&---------------------------------------------------------------------*
FORM SEARCH_HELP.
call function 'F4IF_INT_TABLE_VALUE_REQUEST'
EXPORTING
retfield = 'ZSTATUS'
dynprofield = 'A0'
dynpprog = sy-cprog
dynpnr = sy-dynnr
value_org = 'S'
TABLES
value_tab = ti_estejec.
ENDCASE.
Thanks in advance.
Bluesky
