Получить отдельную схему через запись и чтение потока

Учебные задачи

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

Где и как запускать

Учебная база: создайте серверный общий модуль УчебныеЗадачи (флаг Сервер). Код без директив вставьте в тело процедуры ВыполнитьПример() Экспорт. Вызовите её из серверного обработчика команды учебной обработки. Не запускайте в рабочей базе.

Подготовка

  1. Создайте НОВУЮ пустую файловую учебную базу, не копию рабочего каталога. В Конфигураторе задайте корню имя Учебная85. Не добавляйте эти объекты в рабочую УТ/КА2/УНФ/БП.

  2. Справочники → Добавить: имя УчебныеТовары. Длина кода 10, тип кода Строка, автонумерация и контроль уникальности включены, длина наименования 100.

  3. Для УчебныеТовары включите иерархию групп и элементов. Добавьте реквизиты Артикул (Строка, длина 20) и Цена (Число, 12 цифр, 2 дробных, неотрицательное). Проверка заполнения для этих учебных реквизитов не устанавливается.

  4. Добавьте табличную часть Штрихкоды: Штрихкод (Строка, длина 20) и Основной (Булево). Обновите конфигурацию базы данных. Модули объектов оставьте пустыми.

  5. Создайте серверный общий модуль УчебныеЗадачи и команду учебной обработки, вызывающую ВыполнитьПример() Экспорт. Каждый фрагмент выполняйте отдельно, не склеивайте их в одну процедуру.

  6. В этой отдельной пустой конфигурации Учебная85 добавьте Задачи → УчебнаяЗадача: длина номера 9, тип Строка, автонумерация; наименование длиной 100. Добавьте реквизит Комментарий (Строка, 100), без проверки заполнения.

  7. Добавьте Бизнес-процессы → УчебныйПроцесс: длина номера 9, тип Строка, автонумерация, реквизит Комментарий (Строка, 100), без проверки заполнения. В свойстве Задача выберите УчебнаяЗадача.

  8. Карта маршрута: одна точка старта Старт → одна одиночная точка действия ПодготовитьКнигу → одна точка завершения Финиш. Соедините их стрелками; в представлении точки действия укажите Подготовить учебную книгу.

  9. Адресацию задач, групповые/условные/вложенные точки и обработчики маршрута для этой задачи не добавляйте. Модули задачи и процесса, подписки и внешние действия должны быть пустыми. Обновите конфигурацию базы данных.

  10. Все имена здесь относятся к новым учебным объектам, не к рабочей КА2/УНФ/УТ/БП. Каждый фрагмент запускайте отдельно на сервере в ВыполнитьПример() Экспорт общего модуля УчебныеЗадачи.

  11. В этих упражнениях процесс не записывается и не запускается. Исследуется копия карты маршрута в памяти; печать на физический принтер не вызывается.

Если Метаданные.БизнесПроцессы.Найти("УчебныйПроцесс") = Неопределено
    Или Метаданные.Задачи.Найти("УчебнаяЗадача") = Неопределено Тогда
    ВызватьИсключение "Сначала создайте учебные процесс, задачу и карту маршрута";
КонецЕсли;
Процесс = БизнесПроцессы.УчебныйПроцесс.СоздатьБизнесПроцесс();
Схема = Процесс.ПолучитьКартуМаршрута();
Если ТипЗнч(Схема) <> Тип("ГрафическаяСхема") Тогда
    ВызватьИсключение "Учебный процесс не вернул графическую схему";
КонецЕсли;
Схема.ПолеСлева = 15;
ПотокЗаписи = Новый ПотокВПамяти;
Попытка
    Схема.Записать(ПотокЗаписи);
    БайтыСхемы = ПотокЗаписи.ЗакрытьИПолучитьДвоичныеДанные();
Исключение
    ПотокЗаписи.Закрыть();
    ВызватьИсключение;
КонецПопытки;
ПотокЧтения = БайтыСхемы.ОткрытьПотокДляЧтения();
Копия = Новый ГрафическаяСхема;
Попытка
    Копия.Прочитать(ПотокЧтения);
Исключение
    ПотокЧтения.Закрыть();
    ВызватьИсключение;
КонецПопытки;
ПотокЧтения.Закрыть();
Сообщить(Копия.ЭлементыГрафическойСхемы.Количество() = Схема.ЭлементыГрафическойСхемы.Количество());
Сообщить(Копия.ПолеСлева = 15);
Копия.ПолеСлева = 20;
Сообщить(Схема.ПолеСлева = 15);
Сообщить(Копия.ПолеСлева = 20);
Сообщить(БайтыСхемы.Размер() > 0);

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

  1. Записать получает свой ПотокВПамяти; это собственный формат графической схемы, не PNG и не PDF.

  2. ЗакрытьИПолучитьДвоичныеДанные возвращает сериализованный результат. В случае ошибки записи поток тоже закрывается.

  3. Создаём пустую ГрафическаяСхема конструктором и заполняем её Прочитать из нового потока собственных байтов.

  4. После закрытия потока сравниваем структуру, затем меняем поле только у копии. Исходная карта процесса не записывается.

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

  1. Пять сравнений Истина: структура сохранена, поле исходника осталось 15, у копии 20, байты непустые.

  2. На диске нет файла схемы и в базе нет нового бизнес-процесса.

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

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

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

  1. Простое присваивание Копия=Схема не является таким независимым roundtrip.

  2. Сравнение количества элементов не доказывает побайтовое равенство всей схемы; здесь дополнительно проверено отдельное свойство и независимость изменения.

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

Не хотите разбираться сами?

Адаптируем это решение под вашу базу. Оценка бесплатно.

Оставить задачу

1С, 1С:Предприятие — товарные знаки ООО «1С». Сайт не является официальным представительством фирмы «1С» и не аффилирован с ней.