Преобразование 16-ричного значения в кодировку cp1251

divan

Здравствуйте коллеги!
Пытаюсь преобразовать русские символы в 16-ричную кодировку.

Code:

FIELD-SYMBOLS <fs>.

      ch = 'Н'.
      ASSIGN ch to <fs> TYPE 'X'.

В итоге для буквы 'Н' после преобразования я получаю код в кодовой странице IS08859-5 - BD
Мне же необходимо преобразовать в кодовую страницу cp1251 чтобы получилось значение - CD.
Как я могу это сделать?

Besa

divan написал:

Здравствуйте коллеги!
Пытаюсь преобразовать русские символы в 16-ричную кодировку.

Code:

FIELD-SYMBOLS <fs>.

      ch = 'Н'.
      ASSIGN ch to <fs> TYPE 'X'.

В итоге для буквы 'Н' после преобразования я получаю код в кодовой странице IS08859-5 - BD
Мне же необходимо преобразовать в кодовую страницу cp1251 чтобы получилось значение - CD.
Как я могу это сделать?

Таблица кодировок TCP00A.

Code:

DATA: ch TYPE string.
DATA: xmldata TYPE xstring.
ch = 'Н'.
CALL FUNCTION 'SCMS_STRING_TO_XSTRING'
  EXPORTING
    text     = ch
    encoding = '1504'
  IMPORTING
    buffer   = xmldata
  EXCEPTIONS
    failed   = 1
    OTHERS   = 2.
WRITE xmldata.

divan

Besa! Спасибо большое!!! Выручил!

Правила форума

Преобразование 16-ричного значения в кодировку cp1251

Кто сейчас на конференции