Hello,
Try FM : FIELD_CHOICE
Regards,
Naimesh
hi,
Check this
POPUP_WITH_TABLE_DISPLAY_OK
REUSE_ALV_POPUP_TO_SELECT -
To show POPPU and Select
<b>Please Reward Points & Mark Helpful Answers</b>
To mark Helpful Answers ;click radio Button next to the post.
RadioButtons
<b>o</b> Helpful Answer
<b>o</b> Very helpful Answer
<b>o</b> Problem Solved.
Click any of the above button next to the post; as per the anwers
<b>To close the thread; Click Probelm solved Radio Button next to the post , which u feel is best possible answers</b>
Hi Colin,
use FM 'F4IF_INT_TABLE_VALUE_REQUEST'
in AT SELECTION-SCREEN ON VALUE-REQUEST FOR 'your parameter/select'.
At the moment i havn't an SAP-System.
Perhaps, if you need, i can give you an Example later.
Hope this helps you.
Regards, Dieter
Hi Colin,
here a short example:
TYPE-POOLS: SLIS.
DATA: FIELDCAT TYPE SLIS_T_FIELDCAT_ALV,
WA_FIELDCAT TYPE SLIS_FIELDCAT_ALV.
SELFIELD TYPE SLIS_SELFIELD.
*
PROGNAME = SY-REPID.
*
Feldkatatalog vorbereiten auf Basis der ITAB-Definitionen
CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
EXPORTING
I_PROGRAM_NAME = PROGNAME
I_INTERNAL_TABNAME = 'ITAB'
I_CLIENT_NEVER_DISPLAY = 'X'
I_INCLNAME = PROGNAME
CHANGING
CT_FIELDCAT = FIELDCAT
EXCEPTIONS
INCONSISTENT_INTERFACE = 1
PROGRAM_ERROR = 2
OTHERS = 3.
*
LOOP AT FIELDCAT INTO WA_FIELDCAT.
Für alle Spalten Key_Information ausschalten
MOVE ' ' TO WA_FIELDCAT-KEY.
Für alle Spalten nur Mittel_Text anzeigen.
MOVE 'M' TO WA_FIELDCAT-DDICTXT.
Für alle Spalten soll nicht 0 NICHT angezeigt werden.
MOVE 'X' TO WA_FIELDCAT-NO_ZERO.
Für alle Spalten Key_Information ausschalten
MOVE ' ' TO WA_FIELDCAT-KEY.
Spalte ausblenden
CASE WA_FIELDCAT-FIELDNAME.
WHEN 'MATNR.
MOVE 'X' TO WA_FIELDCAT-NO_OUT.
ENDCASE.
Spaltenüberschriften
CASE WA_FIELDCAT-FIELDNAME.
WHEN 'MAKTX'.
MOVE 'shorttext' TO WA_FIELDCAT-SELTEXT_M.
ENDCASE.
*
MODIFY FIELDCAT INDEX SY-TABIX FROM WA_FIELDCAT .
*
ENDLOOP.
*
CALL FUNCTION 'REUSE_ALV_POPUP_TO_SELECT'
EXPORTING
I_TITLE = 'Titel'
I_TABNAME = 'ITAB'
IT_FIELDCAT = FIELDCAT
IMPORTING
ES_SELFIELD = SELFIELD
TABLES
T_OUTTAB = ITAB
EXCEPTIONS
PROGRAM_ERROR = 1
OTHERS = 2.
*
it works very good. At first you have to fill the ITAB as you want.
Regards, Dieter
Hi Colin,
third answer.
Your Problmen is <b>I_STRUCTURE_NAME = 'X_FIELDCAT'</b>
Look at the Docu of I_STRUCTURE_NAME. It must be
a structur wich you use in your internal table.
Like include structure ... .
If you create your own internal table you cannot
use I_STRUCTURE_NAME!
Hope this helps you.
Regards, Dieter
Add a comment