2007 Aug 29 11:55 AM
Hi,
I need a pop up with 2 parameters. Like a parameter of a selection-screen but in a pop up. Is it possible?
thx in advance
2007 Aug 29 1:42 PM
Hi,
I need a pop up with 2 parameters. Like a parameter of a selection-screen but in a pop up. Is it possible?
thx in advance
2007 Aug 29 12:07 PM
Hi,
Its easy , you just have to use FM: POPUP_GET_VALUES.
You can put any number of parameters just like in a selection screen but in a pop up.
Regards.
2007 Aug 29 1:42 PM
2007 Aug 29 1:54 PM
im trying to use this FM but i dont understand what kind of table i have to import to Tables.
Can u copy some easy example?
Best regards.
I will reward both
-
Bharat, i cant use selection screen because i have to write this code into a FM.
Message was edited by:
Manel Casadesus
2007 Aug 29 1:56 PM
Hi,try this:
data: wa_fields like SVAL,
li_fields TYPE STANDARD TABLE OF SVAL.
move 'KONA' to wa_fields-TABNAME.
move 'KNUMA' to wa_fields-FIELDNAME.
append wa_fields to li_fields.
move 'BSEG' to wa_fields-TABNAME.
move 'BUKRS' to wa_fields-FIELDNAME.
append wa_fields to li_fields. " add more fields if required
CALL FUNCTION 'POPUP_GET_VALUES'
EXPORTING
* NO_VALUE_CHECK = ' '
popup_title = 'Test title'
* START_COLUMN = '5'
* START_ROW = '5'
* IMPORTING
* RETURNCODE =
tables
fields = li_fields
* EXCEPTIONS
* ERROR_IN_FIELDS = 1
* OTHERS = 2
.
IF sy-subrc <> 0.
loop at li_fields into wa_fields.
" use values of field VALUE
ENDLOOP.
endif.
2007 Aug 29 1:47 PM
Hi,
see this.
SELECTION-SCREEN BEGIN OF SCREEN 200.
PARAMETERS:name1(10),
num(2) type n.
SELECTION-SCREEN END OF SCREEN 200.
call SELECTION-SCREEN 200 STARTING AT 5 10 ENDING AT 60 13.
<b>reward if helpful</b>
rgds,
bharat.
2007 Aug 29 2:00 PM
Hi,
see this code.
data:itab type SVAL occurs 0 with header line.
itab-tabname = 'MARA'.
itab-fieldname = 'MATNR'.
append itab.
itab-tabname = 'LFA1'.
itab-fieldname = 'LIFNR'.
append itab.
CALL FUNCTION 'POPUP_GET_VALUES'
EXPORTING
NO_VALUE_CHECK = ' '
POPUP_TITLE = 'my title'
START_COLUMN = '5'
START_ROW = '5'
IMPORTING
RETURNCODE =
TABLES
FIELDS = itab
EXCEPTIONS
ERROR_IN_FIELDS = 1
OTHERS = 2
.
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
<b>reward if helpful</b>
rgds,
bharat.