<PRE>DATA: cp_tab TYPE nls_langu_cp_tab,
l_wa TYPE nls_langu_cp_line,
cc TYPE REF TO cl_nls_struc_container.
*
DATA: BEGIN OF downtab OCCURS 100,
content(500),
END OF downtab.
DATA: BEGIN OF head OCCURS 100,
header(1),
txjcd(6),
aa(20),
end of head.
head-header = '1'.
head-txjcd = '가나다라마'.
head-aa = '아자차'.
append head.
* Non Unicode(한글 2바이트로 인식)
l_wa-langu = '3'.
l_wa-codepage = '8500'.
INSERT l_wa INTO TABLE cp_tab.
cc = cl_nls_struc_container=>create( cp_tab = cp_tab ).
TRY.
CALL METHOD cc->struc_to_cont
EXPORTING
struc = head
langu = '3'
IMPORTING
cont = downtab-content.
CATCH cx_sy_conversion_codepage .
CATCH cx_parameter_invalid_range .
ENDTRY.
APPEND downtab.
LOOP AT downtab.
WRITE : /1(100) downtab-content.
ENDLOOP.
</PRE>
l_wa TYPE nls_langu_cp_line,
cc TYPE REF TO cl_nls_struc_container.
*
DATA: BEGIN OF downtab OCCURS 100,
content(500),
END OF downtab.
DATA: BEGIN OF head OCCURS 100,
header(1),
txjcd(6),
aa(20),
end of head.
head-header = '1'.
head-txjcd = '가나다라마'.
head-aa = '아자차'.
append head.
* Non Unicode(한글 2바이트로 인식)
l_wa-langu = '3'.
l_wa-codepage = '8500'.
INSERT l_wa INTO TABLE cp_tab.
cc = cl_nls_struc_container=>create( cp_tab = cp_tab ).
TRY.
CALL METHOD cc->struc_to_cont
EXPORTING
struc = head
langu = '3'
IMPORTING
cont = downtab-content.
CATCH cx_sy_conversion_codepage .
CATCH cx_parameter_invalid_range .
ENDTRY.
APPEND downtab.
LOOP AT downtab.
WRITE : /1(100) downtab-content.
ENDLOOP.
</PRE>
댓글 8
-
bd
2007.06.29 01:17
... 잘 이해가 안가는 부분이 프로그램 설명좀 부탁 드림니다.. -
체인지
2007.11.20 11:34
좋은 자료 감사합니다 -
Norton
2008.08.21 10:20
감사합니다 ^^. -
김진
2008.11.20 17:59
감사합니다
-
COMAN
2008.12.08 16:42
,좋은 자료 감사합니다.
-
초범이
2009.02.23 11:41
저희 회사는 한글 말고 중국어,영어,인도어 각종 나라가 다 있는뎅 CODEPAGE 8500은 한글은 안깨지는뎅 중국어 간체는 깨지는것같더라구요
테이블 TCP00A(Code Page Attributes)을 보시면 아래 지원하는 CODEPAGE가 나와요 거기서 4310은 유니코드를 지원하는데 이것을 쓰면 중국어 한글 다 정상적으로 나오드라구요
사용하다보면 아직 완전하지는 않지만 도움이 되었으면 합니다.
감사합니다.
-
강철구
2009.07.01 15:13
좋은자료 감사해요..^^ -
들아쿠라
2010.06.22 13:26
고맙습니다.
번호 | 제목 | 글쓴이 | 날짜 | 조회 수 |
---|---|---|---|---|
127 | 새로운 Session을 생성하는 방법 [7] | 양키 | 2013.07.17 | 4961 |
126 | SCN에서 인기있는 Tutorial강좌들 입니다. [1] | 양키 | 2013.08.12 | 8420 |
125 | [덤프해결] CX_SY_READ_SRC_LINE_TOO_LONG | 양키 | 2013.08.16 | 7799 |
124 | Field Catalog 가져오지 못하는문제(REUSE_ALV_FIELDCATALOG_MERGE) [3] | 양키 | 2013.08.16 | 9526 |
123 | 메세지 팝업창 뛰워주는 Function [2] | 양키 | 2013.08.19 | 7905 |
122 | zebra printer 상세 사용메뉴얼입니다. | 양키 | 2013.08.26 | 3744 |
121 | 입력 필드 입력 중 이력이 지원되지 않는 문제 해결법. [1] | 장용천 | 2013.09.03 | 8598 |
120 | REM TABLE1 | 밤의화신 | 2013.09.11 | 2867 |
119 | REM TABLE2 | 밤의화신 | 2013.09.11 | 2819 |
118 | REM TABLE3 | 밤의화신 | 2013.09.11 | 2657 |
117 | REM PROCESS1 | 밤의화신 | 2013.09.11 | 5399 |
116 | REM PROCESS2 [1] | 밤의화신 | 2013.09.11 | 4497 |
115 | ABAP 교육 [13] | 밤의화신 | 2013.09.11 | 8490 |
114 | ABAP 교육 [32] | 밤의화신 | 2013.09.11 | 8493 |
113 | ABAP 교육 [12] | 밤의화신 | 2013.09.11 | 7288 |
112 | ABAP 교육 [6] | 밤의화신 | 2013.09.11 | 7273 |
111 | ABAP 교육 [6] | 밤의화신 | 2013.09.11 | 7199 |
110 | ABAP 교육 [9] | 밤의화신 | 2013.09.11 | 7386 |
109 | ABAP 교육 [13] | 밤의화신 | 2013.09.11 | 8360 |
108 | 요약파일1 [7] | 밤의화신 | 2013.09.11 | 8039 |