Пытаюсь заставить работать
свою старую программу по аттачиванию файла через GOS. GOS часть работает, но файл не открывается. Проблема похоже при преобразовании файла (PDF или XML) в таблицу типа SOLI (CHAR 255), которая используется в SO_OBJECT_INSERT. B новой системе единственное отличие, что тут Unix, ну и SP/EHP уже уровнем повыше (обе системы - ECC).
В оригинале OPEN DATASET читал файл напрямую в табличку типа SOLI (иногда нужно было SO_CONVERT_CONTENTS_BIN воспользоваться), все работало. А тут почему-то на выходе примерно половина файла теряется (при просмотре XML хорошо видно, как текст "обрублен"). По совету с SDN попробовала READ DATASET в XSTRING - читается все правильно, в дебаггере XML source отлично видно, но как только начинаешь преобразовывать в CHAR формат - та же ерунда.
Программа должна читать PDF и XML файлы, пока с обоими та же проблема. Перепробовала с десяток разных ФМ и методов (пробовала и переводить сначала в RAW/SOLIX) - результат тот же или хуже.
Как приаттачить этот
monkey trucker файл?
Kод (с сокращениями):
Code:
DATA: lv_xstring TYPE xstring,
it_content LIKE STANDARD TABLE OF soli.
OPEN DATASET lv_pathname FOR INPUT IN BINARY MODE.
READ DATASET lv_pathname INTO lv_xstring.
CLOSE DATASET lv_pathname.
* Тут lv_xstring надо как-то перевести в it_content[].
CALL FUNCTION 'SO_FOLDER_ROOT_ID_GET'
EXPORTING
region = 'B'
IMPORTING
folder_id = ls_fol_id
EXCEPTIONS
OTHERS = 1.
CALL FUNCTION 'SO_OBJECT_INSERT'
EXPORTING
folder_id = ls_fol_id
object_type = 'EXT'
object_hd_change = ls_obj_data
IMPORTING
object_id = ls_obj_id
TABLES
objhead = it_objhead
objcont = it_content.
<...>
Вход
Регистрация
FAQ пользователя
Поиск
