Не часто в abap возникает задача поместить сгенерированный программой файл в архив. Мне такое пригодилось только один раз, когда понадобилось обойти ограничение почтового сервера на пересылку файлов определенного типа.
Для работы с архивом можно использовать класс cl_abap_zip
Пример кода:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 |
DATA lv_xstring_file TYPE xstring. lv_xstring_file = 'Сюда помещаем файл в xstring'. DATA(lo_zip) = NEW cl_abap_zip( ). lo_zip->support_unicode_names = abap_true. lo_zip->add( name = 'Name.xxx' " Name (Case-Sensitive) content = lv_xstring_file ). DATA(lv_zip_archive_x) = lo_zip->save( ). "Получили архив |