Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 
Read only

POP-UP

Former Member
0 Likes
798

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!

4 REPLIES 4
Read only

Former Member
0 Likes
654

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

Read only

Former Member
0 Likes
654

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

Read only

Former Member
0 Likes
654

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

Read only

Former Member
0 Likes
654

Hi ,

Try this.

Replace Function module with <b>POPUP_TO_CONFIRM</b>

Regards

Srinu