Открыть запись своего PDF, преобразовать в серый и закрыть

Создаём собственный файл, отдельно открываем неинициализированный ЗаписьPDF и сохраняем преобразование закрытием записи.

Подготовка

1. Работайте только в отдельной своей конфигурации УчебнаяКонфигурацияСинтаксиса, 8.5.1.1343. Исходная таблица Книга / 3 / 250 / 750 создаётся полностью в коде.

2. Для синхронных уроков вставьте полный модуль в серверный общий модуль УчебныеФайлыPDF и вызовите ВыполнитьПример() своей серверной командой. Новый временный файл будет на серверной машине, не обязательно на вашем ПК.

3. Для асинхронного и callback-урока вставьте полный код в модуль управляемой формы внешней обработки. Создайте команду Выполнить, обработчик Выполнить, кнопку. Используйте толстый клиент Windows; файл создаётся на клиентской машине.

4. Код сначала получает новое временное имя, проверяет отсутствие файла и выводит точный путь. Только после этого записывает собственные PDF-байты. Рабочий или выбранный пользователем PDF нигде не запрашивается.

5. ЗаписьPDF изменяет именно созданный этим запуском файл. Чтение результата начинается после закрытия записи. Файл оставляется пользователю для просмотра и ручного удаления; автоматического удаления нет.

6. Удаление вложений допустимо начиная с PDF 1.5. Пример проверяет первые восемь символов собственного файла перед этой операцией. Для PDF/A-1 или PDF/A-2 произвольные CSV-вложения не подходят.

7. До завершения асинхронной цепочки форму не закрывайте и второй запуск не выполняйте. При ошибке начала шага успех не объявляется. Ни создание пособия, ни его Python-тесты этот код в 1С не выполняют.

Функция СоздатьСобственныеБайтыPDF()
    Таблица = Новый ТабличныйДокумент;
    Таблица.КодЯзыка = "ru";
    Таблица.Область(1, 1).Текст = "СОБСТВЕННЫЙ УЧЕБНЫЙ ОБРАЗЕЦ";
    Таблица.Область(2, 1).Текст = "Книга";
    Таблица.Область(2, 2).Текст = "3";
    Таблица.Область(2, 3).Текст = "250";
    Таблица.Область(2, 4).Текст = "750";
    Таблица.Область(1, 1, 2, 4).ЦветФона = Новый Цвет(255, 255, 210);
    Таблица.Область(, 1, , 1).ШиринаКолонки = 45;
    Поток = Новый ПотокВПамяти;
    Попытка
        Таблица.Записать(Поток, ТипФайлаТабличногоДокумента.PDF);
        Данные = Поток.ЗакрытьИПолучитьДвоичныеДанные();
    Исключение
        Поток.Закрыть();
        ВызватьИсключение;
    КонецПопытки;
    Возврат Данные;
КонецФункции

Функция СоздатьСвойФайлPDF(Данные)
    Имя = ПолучитьИмяВременногоФайла("pdf");
    Проверка = Новый Файл(Имя);
    Если Проверка.Существует() Тогда
        ВызватьИсключение "Новое имя уже занято: перезапись запрещена";
    КонецЕсли;
    Сообщить("Создаётся только собственный PDF: " + Имя);
    Данные.Записать(Имя);
    Возврат Имя;
КонецФункции

Процедура ВыполнитьПример() Экспорт
    Имя = СоздатьСвойФайлPDF(СоздатьСобственныеБайтыPDF());
    Запись = Новый ЗаписьPDF;
    Попытка
        Запись.Открыть(Имя);
        Запись.ПреобразоватьВОттенкиСерого();
        Запись.Закрыть();
    Исключение
        ОшибкаОперации = ОписаниеОшибки();
        Попытка
            Запись.Закрыть();
        Исключение
            ОшибкаОперации = ОшибкаОперации + Символы.ПС + "Ошибка закрытия: " + ОписаниеОшибки();
        КонецПопытки;
        ВызватьИсключение ОшибкаОперации;
    КонецПопытки;
    Документ = Новый ДокументPDF;
    Документ.Прочитать(Имя);
    Сообщить(Документ.КоличествоСтраниц() > 0);
    Сообщить(Документ.Вложения.Количество() = 0);
    Сообщить("Собственная серая копия оставлена для ручного просмотра: " + Имя);
КонецПроцедуры

Разбор по шагам

1. Получить новое временное имя и проверить отсутствие существующего файла до записи собственных PDF-байтов.

2. Создать пустой ЗаписьPDF и вызвать Открыть с точным именем только что созданного файла.

3. Выполнить преобразование и явно закрыть запись. На ошибке попытаться закрыть её и сохранить обе причины ошибки.

4. Только после закрытия прочитать файл через ДокументPDF. Визуально проверить серую подложку по выведенному пути.

Как проверить результат

1. Две структурные проверки дают Истина: файл читается, есть страницы, нет вложений.

2. В своём файле вручную проверить строку книги и серую подложку. Исходный рабочий документ не использовался.

Ожидаемый результат

Настоящий жизненный цикл отдельного PDF-писателя на своём файле с диагностикой закрытия.

На что обратить внимание

1. ЗаписьPDF не создаёт произвольный новый документ из пустоты: сначала собственная таблица экспортируется в PDF.

2. Закрытие завершает работу записи. Не читайте результат одновременно с открытым писателем.

3. Путь временного файла может быть серверным. Файл оставлен для ручного удаления; весь временный каталог удалять нельзя.

Пример не запускался в вашей базе. Перед применением проверьте его в указанном учебном контексте.