CLOB->LONGCHAR

Обсуждение вопросов по разработке программ в среде продуктов копорации "Progress Software"
Mandor
Старожил
Сообщения: 20
Зарегистрирован: 12 фев 2007, 10:20
Откуда: Алмата

CLOB->LONGCHAR

Сообщение Mandor » 04 ноя 2010, 11:14

Обнаружил несколько странное поведение прогресса при присвоении LONGCHAR.
В нижеприведенном примере первый MESSAGE корректно отображает содержимое файла. А вот второй показывает пустую строку. (По факту она кстати не совсем пустая - если вызвать SAX-PARSE(mB) то парсер XML файл читает, только с русскими символами творит черти что).
Есть идеи отчего так получается?

DEFINE VARIABLE mB AS LONGCHAR NO-UNDO.

DEFINE TEMP-TABLE ttTest NO-UNDO
FIELD Bug AS CLOB.

FIX-CODEPAGE(mB) = "UTF-8".
COPY-LOB FILE "ack2.xml" TO mB CONVERT SOURCE CODEPAGE "UTF-16LE" TARGET CODEPAGE "UTF-8".
CREATE ttTest.
MESSAGE STRING(mB)
VIEW-AS ALERT-BOX INFO BUTTONS OK.
ttTest.Bug = mB.
MESSAGE STRING(mB)
VIEW-AS ALERT-BOX INFO BUTTONS OK.