text area

[Former Member]

i am doing text area..

*i want to internal table for view data in textarea...

see below it..

select * from yapn_summary into table it_summ where apid = yapn-apid.

READ TABLE it_summ INDEX 1.

MOVE-CORRESPONDING it_summ to yapn_summary.

if sy-subrc = 0.

loop at it_demo into wa_demo.

incr1 = incr1 + 1.

clear wa_demo1.

wa_demo1-sumr = wa_demo-sumr.

wa_demo1-apid = yapn-apid.

wa_demo1-lines = incr1.

MODIFY it_summ from wa_demo1 index sy-tabix.

endloop.

endif..

this is error program..

how to change this program..??

please check it..

reply me soon,

thx,

s.suresh

[Former Member]

What kind of error are you getting, be more specific.

[Former Member]

i am doing custom_container for text area..

PBO:

if editor is initial.

repid = sy-repid.

• Create object for custom container

create object custom_container

exporting

container_name = 'MYCONTAINER1'

exceptions

cntl_error = 1

cntl_system_error = 2

create_error = 3

lifetime_error = 4

lifetime_dynpro_dynpro_link = 5

others = 6.

if sy-subrc <> 0.

message id sy-msgid type 'I' number sy-msgno

with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.

endif.

create object editor

exporting

wordwrap_mode = cl_gui_textedit=>wordwrap_at_fixed_position

wordwrap_position = line_length

wordwrap_to_linebreak_mode = cl_gui_textedit=>true

parent = custom_container

exceptions

error_cntl_create = 1

error_cntl_init = 2

error_cntl_link = 3

error_dp_create = 4

gui_type_not_supported = 5

others = 6.

if sy-subrc <> 0.

message id sy-msgid type 'I' number sy-msgno

with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.

endif.

endif.

call method editor->set_toolbar_mode.

• To make invisible the Status bar.

call method editor->set_statusbar_mode.

*

select sumr from yapn_summary into corresponding fields of table it_display WHERE apid = yapn-apid.

call method : editor->set_text_as_r3table exporting table = it_display.

PAI.

call method : editor->get_line_text exporting line_number = test

importing text = test1

exceptions

error_cntl_call_method = 0 .

call method : editor->get_text_as_r3table importing table = ztext_demo2

is_modified = test

exceptions

error_dp = 1

error_cntl_call_method = 2

error_dp_create = 3

potential_data_loss = 4.

it_demo[] = ztext_demo2[].

• v_apid = v_apid + 1.

select * from yapn_summary into table it_summ where apid = yapn-apid.

READ TABLE it_summ INDEX 1.

MOVE-CORRESPONDING it_summ to yapn_summary.

if sy-subrc = 0.

v_apid = yapn-apid.

loop at it_demo into wa_demo.

incr1 = incr1 + 1.

clear wa_demo1.

wa_demo1-sumr = wa_demo-sumr.

wa_demo1-apid = v_apid.

wa_demo1-lines = incr1.

modify it_summ from wa_demo1 index incr1.

endloop.

endif.

check this program..

i want first type as any char in text area then its save to internal table.(it_summ) donot save to database(yapn_summary)

reply me soon,

thx,

s.suresh.