1000 CHARACTER TEXT IN ALV FIELD

Question

Hi Experts,
I have a String type variable containing 1000 character text that I am passing in a field on ALV. But ALV field can display on 132 characters. So now my requirement is that when a user double clicks on that field... then a popup or a screen appears where the user can read the entire text of that field.
I have tried some FMs (like POPUP_TO_CONFIRM, POPUP_TO_INFORM, POPUP_DISPLAY_TEXT etc...), but all have length restriction.
Please suggest if there is any FM to get the entire 1000 character text on a popup....  OR if there is any other way to do this...
Thanks in advance
Regards,
Ashish Goyal

Answer 1

I am using this code provided by you, facing error : Field "OB_GUI_DIALOGBOX_CONTAINER" is unknown. It is neither in one of   the specified tables nor defined by a "DATA" statement. 
Please take a look and suggest.
Using REUSE ALV GRID to display ALV.
   TYPES: BEGIN OF tp_text_x .
TYPES: tdname      TYPE thead-tdname ,
       tdobject    TYPE thead-tdobject ,
       tdid        TYPE thead-tdid ,
       tdspras     TYPE thead-tdspras ,
       tdtxtlines  TYPE thead-tdtxtlines .
TYPES: tdline      TYPE tline-tdline ,
       it_tline    TYPE tline_tab .
TYPES: END OF tp_text_x .
CLASS cl_event_reciever DEFINITION DEFERRED.
DATA v_event_reciever TYPE REF TO cl_event_reciever.
CLASS cl_event_receiver DEFINITION .
  PRIVATE SECTION.
    METHODS: close
             FOR EVENT close OF cl_gui_dialogbox_container
             IMPORTING sender.
    METHODS: init_container .
    METHODS: display_textedit
             IMPORTING value(st_text_x) TYPE tp_text_x .
ENDCLASS .                    "cl_event_receiver DEFINITION
CLASS cl_event_receiver IMPLEMENTATION.
  METHOD close .
    CALL METHOD sender->set_visible
      EXPORTING
        visible = abap_false.
  ENDMETHOD .                    "handle_close
  METHOD init_container .
*    DATA: ob_gui_dialogbox_container TYPE REF TO cl_gui_dialogbox_container.
    IF ob_gui_dialogbox_container IS NOT INITIAL .
*    IF EDITOR_CONTAINER IS NOT INITIAL .
      me->close( EXPORTING sender =  ob_gui_dialogbox_container ) .   " EDITOR_CONTAINER ).
    ENDIF .
    CREATE OBJECT ob_gui_dialogbox_container
      EXPORTING
        parent   = cl_gui_container=>screen0
        top      = 40
        left     = 200
        lifetime = cntl_lifetime_dynpro
        width    = 600
        height   = 100.
  ENDMETHOD.                    "init_container
  METHOD display_textedit .
    me->init_container( ) .
    DATA: ob_gui_textedit TYPE REF TO cl_gui_textedit .
*    DATA: ob_gui_dialogbox_container TYPE REF TO cl_gui_dialogbox_container.
    CREATE OBJECT ob_gui_textedit
      EXPORTING
        parent = ob_gui_dialogbox_container.
    CALL METHOD ob_gui_textedit->set_readonly_mode
      EXPORTING
        readonly_mode = cl_gui_textedit=>true.
    DATA: it_tdline TYPE TABLE OF tdline .
    DATA: st_tdline LIKE LINE OF it_tdline .
    FIELD-SYMBOLS: <st_tline> LIKE LINE OF st_text_x-it_tline .
    LOOP AT st_text_x-it_tline ASSIGNING <st_tline> .
      APPEND <st_tline>-tdline TO it_tdline .
    ENDLOOP .
    CALL METHOD ob_gui_textedit->set_text_as_stream
      EXPORTING
        text = it_tdline.
  ENDMETHOD.                    "display_textedit
ENDCLASS .                    "cl_event_receiver IMPLEMENTATION
INITIALIZATION.
CREATE OBJECT v_event_reciever.
DATA: ob_gui_dialogbox_container TYPE REF TO cl_gui_dialogbox_container.
CREATE OBJECT ob_gui_dialogbox_container.
START-OF-SELECTION.
v_event_reciever->display_textedit( EXPORTING st_text_x = <st_alv_data_1>-text_1 ) .