안녕하세요
제가 참조하시라고 예전에 개발한 프로그램 하나 몽창 올립니다.
스크린에 Longtext 2개가 있을 거구요..
잘 참조하시면 해결하실 수 있을 거예요.
뭐..궁금한게 있으면 문의하시고..
html 파일이라 한글이 깨질텐데
보기->인코딩->한국어 선택하면 제대로 나올겁니다.
그리고 LongText를 이용하실려면 Text Object를 만드셔야 하는데
T-Code : SE75
에서 아마 Z으로 시작되는 것이 있을 겁니다. 그거 보시고 하나 만드신 후
첨부 소스를 보세요
첨부 소스는 ZSDR0060으로 Text Object를 만들어 놓은 거거든요.
그럼..퐈이팅.
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>아직 아밥에 대해 업무능력이 부족한데
>
>과도하게 어려운 문제를 맡아버렸네요 ㅠ.ㅠ
>
>특정단어님 버미님 도움으로 longtext를 적용시켰습니다.
>
>문제는 역시나 저장기능의 적용이 안되네요
>
>버미님 의견대로 저장을 누르면 '저장이 완료되었습니다' 라는 문구가 뜨고 확인누른 후 V버튼을 눌러
>
>본화면으로 돌아가는 내용입니다.
>
>아래서 save_data 부분의 name, object, id 이 세부분의 정의를 정확히 모르겠네요
>
>롱텍스트가 두개입니다.
>
>alv 필드중 wr과 etc라는 필드에 롱텍스트를 각각 적용하려고합니다.
>
>
> >
>MODULE STATUS_0300 OUTPUT.
SET PF-STATUS 'STATUS0300'.
SET TITLEBAR 'TITLEBAR300'.
check text_container is initial.
create object text_container
exporting
container_name = 'TEXT_CONTAINER'.
create object ETC_container
exporting
container_name = 'ETC_CONTAINER'.
create object text_editor
exporting
parent = text_container.
create object text_editor
exporting
parent = ETC_container.
>ENDMODULE.
>
>-------------------------------------------------------------------------
>
> >
>FORM SAVE_DATA .
data: begin of header.
include structure thead.
data: end of header.
data: begin of lines occurs 0.
include structure tline.
data: end of lines.
data: textlines type table of tline-tdline,
wa_text type tline-tdline.
call method text_editor->get_text_as_r3table
importing
table = textlines
exceptions
others = 1.
clear header.
header-tdname = '999999' . "Name
header-tdobject = 'ZPT_DET'. "Object
header-tdid = 'Z001'. "Id
header-tdspras = sy-langu.
clear lines. refresh lines.
loop at textlines into wa_text.
lines-tdline = wa_text.
append lines .
endloop.
call function 'SAVE_TEXT'
exporting
client = sy-mandt
header = header
tables
lines = lines
exceptions
id = 1
language = 2
name = 3
object = 4
others = 5.
ENDFORM. " SAVE_DATA
항상 도움주셔서 감사합니다.