‎2007 Aug 06 10:13 AM
Hi,
how come this code doesn't work?is there something wrong with my code?..i put in in PAI. the pop-up should appear everytime i click the filter pushbutton.
WHEN 'ZFIL'.
SPOPLIST-VAROPTION = TEXT-019.
APPEND SPOPLIST.
SPOPLIST-VAROPTION = TEXT-020.
APPEND SPOPLIST.
SPOPLIST-VAROPTION = TEXT-021.
SPOPLIST-SELFLAG = 'X'.
CALL FUNCTION 'POPUP_TO_DECIDE_LIST'
EXPORTING
cursorline = 1
mark_flag = 'X'
MARK_MAX = 1
START_COL = 25
START_ROW = 10
textline1 = TEXT-019
textline2 = TEXT-020
textline3 = TEXT-021
titel = TEXT-018
DISPLAY_ONLY = ' '
IMPORTING
answer = l_antwort
TABLES
t_spopli = i_spopli
EXCEPTIONS
not_enough_answers = 1
too_much_answers = 2
too_much_marks = 3
OTHERS = 4.
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
thanks!
‎2007 Aug 06 10:28 AM
Just check if you are passing the correct internal table to the function module. I think the correct internal table to be passed is SPOPLIST (As per your piece of code).
Please mark points if the solution was useful.
Regards,
Manoj
‎2007 Aug 06 10:30 AM
Hi
i think you have the wrong itab:
WHEN 'ZFIL'.
SPOPLIST-VAROPTION = TEXT-019.
APPEND SPOPLIST.
SPOPLIST-VAROPTION = TEXT-020.
APPEND SPOPLIST.
SPOPLIST-VAROPTION = TEXT-021.
SPOPLIST-SELFLAG = 'X'.
CALL FUNCTION 'POPUP_TO_DECIDE_LIST'
EXPORTING
cursorline = 1
mark_flag = 'X'
MARK_MAX = 1
START_COL = 25
START_ROW = 10
textline1 = TEXT-019
textline2 = TEXT-020
textline3 = TEXT-021
titel = TEXT-018
DISPLAY_ONLY = ' '
IMPORTING
answer = l_antwort
TABLES
t_spopli = i_spopli
EXCEPTIONS
not_enough_answers = 1
too_much_answers = 2
too_much_marks = 3
OTHERS = 4.
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
Regards, Dieter
Here an example like i use it:
DATA: ANSWER(1).
*
DATA: BEGIN OF SPOPLI OCCURS 0.
INCLUDE STRUCTURE SPOPLI.
DATA: END OF SPOPLI.
*
SPOPLI-VAROPTION = 'Objektauswertung'. APPEND SPOPLI.
SPOPLI-VAROPTION = 'Ursachenauswertung'. APPEND SPOPLI.
SPOPLI-VAROPTION = 'sonst. Auswertung'. APPEND SPOPLI.
*
CALL FUNCTION 'POPUP_TO_DECIDE_LIST'
EXPORTING
TEXTLINE1 = 'Bitte treffen Sie die Auswahl'
TITEL = 'Graphische Auswertung mit MS-Excel'
IMPORTING
ANSWER = ANSWER
TABLES
T_SPOPLI = SPOPLI.
*
CASE ANSWER.
*
WHEN '1'. write: / '1'.
WHEN '2'. write: / '2'.
WHEN '3'. write: / '3'.
*
ENDCASE.
Regards, Dieter
Message was edited by:
Dieter Gröhn
‎2007 Aug 06 12:28 PM
Hi,
Use the below code:
i_spopli-VAROPTION = TEXT-019.
APPEND i_spopli.
i_spopli-VAROPTION = TEXT-020.
APPEND i_spopli.
i_spopli-VAROPTION = TEXT-021.
i_spopli-SELFLAG = 'X'.
CALL FUNCTION 'POPUP_TO_DECIDE_LIST'
EXPORTING
cursorline = 1
mark_flag = 'X'
MARK_MAX = 1
START_COL = 25
START_ROW = 10
textline1 = TEXT-019
textline2 = TEXT-020
textline3 = TEXT-021
titel = TEXT-018
DISPLAY_ONLY = ' '
IMPORTING
answer = l_antwort
TABLES
t_spopli = i_spopli
EXCEPTIONS
not_enough_answers = 1
too_much_answers = 2
too_much_marks = 3
OTHERS = 4.
regards,
Dharitree
‎2007 Aug 06 3:07 PM
Hi ,
Try this.
Replace Function module with <b>POPUP_TO_CONFIRM</b>
Regards
Srinu