POP UP using Function Module 'POPUP_WITH_TABLE_DISPLAY_OK'

 It will display the message in multiple lines.

REPORT ZTEST_POPUP.

 TYPES:BEGIN OF ty_final,
      lv_text1 TYPE char300,
  END OF ty_final.

  data:lt_text TYPE TABLE OF ty_final,
        ls_text TYPE ty_final.

PARAMETERS:TYPE i,
 B TYPE i.
DATA:TYPE i.

A + B. 

APPEND ls_text to lt_text.
clear:ls_text.

CONCATENATE 'Date:' sy-datum INTO ls_text-lv_text1.
APPEND ls_text to lt_text.
clear:ls_text.
 

CALL FUNCTION 'POPUP_WITH_TABLE_DISPLAY_OK'
  EXPORTING
    endpos_col         60
    endpos_row         15
    startpos_col       5
    startpos_row       5
    titletext          'Warning'
* IMPORTING
*   CHOISE             =
  TABLES
    valuetab           lt_text" it_final
 EXCEPTIONS
   BREAK_OFF          1
   OTHERS             2
          .
IF sy-ucomm 'RW'"OR SY-UCOMM = 'BACK'.
RETURN.
ENDIF.
WRITE:c.
 

 

Output:

 

 

If 'No' return to selection screen. if 'Yes' print value of 'C'.






Comments

Popular posts from this blog

Passing Dynamic Variables to SO10 TEXT

Implicit Enhancement with Example

TMG Events