누구 program 소스 코드로 개발된 것 없으시나요.
Unicode 시스템인지 여부 점검 과 한글 1byte 인식하고 있는 자리수 카운트를 2byte로 인식하여
카운트하는 프로그램이 있는지?
자료 좀?
* e-abap님에 의해서 게시물 이동되었습니다 (2007-05-18 16:25)
번호 | 제목 | 글쓴이 | 날짜 | 조회 수 |
---|---|---|---|---|
공지 | SAPJoy 오픈 채팅방 주소 [3] | sapjoy | 2024.02.13 | 270 |
90 | erp.sarang.net 이 열리지 않네요. [2] | 나그네.. | 2007.02.13 | 10019 |
89 | erp.sarang.net 이 열리지 않네요. [2] | 나그네.. | 2007.02.13 | 10011 |
88 | 슬플땐 살짝 웃어보세요 | sapjoy | 2007.02.13 | 7393 |
87 | 슬플땐 살짝 웃어보세요 | sapjoy | 2007.02.13 | 7384 |
86 | 살면서 해야할 말 | eabap | 2007.02.12 | 9428 |
85 | 살면서 해야할 말 | eabap | 2007.02.12 | 9421 |
84 | sap ABAP 에서 자바로 넘어갈 것인가? [1] | sapjoy | 2007.02.11 | 8020 |
83 | sap ABAP 에서 자바로 넘어갈 것인가? [1] | sapjoy | 2007.02.11 | 7892 |
82 | 멘사 아이큐 테스트 입니다~ | 서성길 | 2007.02.09 | 8640 |
81 | 멘사 아이큐 테스트 입니다~ | 서성길 | 2007.02.09 | 8611 |
80 | 힘이 되는글 | eabap | 2007.02.08 | 10593 |
79 | 힘이 되는글 | eabap | 2007.02.08 | 10585 |
78 | 낮아지는 마음 [1] | sapjoy | 2007.02.06 | 7449 |
77 | 낮아지는 마음 [1] | sapjoy | 2007.02.06 | 7451 |
76 | 소풍가기 전날 [2] | sapjoy | 2007.02.05 | 8957 |
75 | 소풍가기 전날 [2] | sapjoy | 2007.02.05 | 8951 |
74 | who are you? | sapjoy | 2007.02.02 | 8318 |
73 | who are you? | sapjoy | 2007.02.02 | 8316 |
72 | 대화의 요령 | sapjoy | 2007.02.01 | 7433 |
71 | 대화의 요령 | sapjoy | 2007.02.01 | 7425 |
도움이 되실지 모르겠지만 아래 코드 추가합니다. 즐거운 하루 되세요.
DATA: I TYPE I,
J TYPE I.
DATA: STR(100) TYPE C VALUE 'A홍길동B'.
DATA: LV_LENGTH TYPE I.
DATA:
BUFFER1 TYPE XSTRING, "KSC5601 HEXA 값
CONV TYPE REF TO CL_ABAP_CONV_OUT_CE.
I = STRLEN( STR ).
TRY.
CONV = CL_ABAP_CONV_OUT_CE=>CREATE(
ENCODING = '8500'
ENDIAN = 'L' ). " LITTEL ENDIAN 'L', BIG ENDIAN 'B'
CONV->CONVERT( EXPORTING DATA = STR
IMPORTING BUFFER = BUFFER1 ).
DO I TIMES.
IF BUFFER1+J(1) BETWEEN '00' AND '7F'. "ASC코드 인지판별 즉 1바이트문자인지 판별
LV_LENGTH = LV_LENGTH + 1.
J = J + 1.
ELSE. "ASC코드가 아니면 2BYTE문자열
LV_LENGTH = LV_LENGTH + 2.
J = J + 2.
ENDIF.
ENDDO.
CATCH CX_ROOT.
ENDTRY.
WRITE:/ LV_LENGTH.