도움이 되실지 모르겠지만 아래 코드 추가합니다. 즐거운 하루 되세요.

 

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.

포인트의 안습 ㅡㅡ;