Issue with length of text field - READ_TEXT & SAVE_TEXT

Question

Hi,
    I need to allow user to enter max 400 char in one field and that needs to be updated in the VA02 for the corresponding sales order.
    I can able to save the text max 132 chars since TLINE-TDLINE will allow max 132 chars in both READ_TEXT & SAVE_TEXT.
    So here i am looking for the solutions for the below...
1) How to design one input field to take 400 chars at one shot .... do i need to use table control ?
2) Once i get the 400 char may be i will split in to 3-4 lines and i can append 130130130... like that through those FM... if not possible can you tell me the alternative.
regards
jaya

Answer 1

You need to use class CL_TEXT_EDIT....
Kindly stolen from Rich Heilman -:)
report zrich_0001 .
data:
      dockingleft  type ref to cl_gui_docking_container,
      text_editor    type ref to cl_gui_textedit,
      repid type syrepid.
data: itext type table of tline-tdline,
      xtext type tline-tdline.
parameters: p_check.
at selection-screen output.
  repid = sy-repid.
  create object dockingleft
              exporting repid     = repid
                        dynnr     = sy-dynnr
                        side      = dockingleft->dock_at_left
                        extension = 1070.
  create object text_editor
              exporting
                   parent     = dockingleft.
  xtext = 'http:\www.sap.com'.
  append xtext to itext.
  call method text_editor->set_text_as_r3table
     exporting
           table              = itext
     exceptions
           others             = 1.
start-of-selection.
  call method text_editor->get_text_as_r3table
     importing
           table              = itext
     exceptions
           others             = 1.
  loop at itext into xtext.
    write:/ xtext.
  endloop.
You can use <b>RKD_WORD_WRAP</b> to wrap the text into an internal table -;)
Greetings,
Blag.