Файл: Разработка конфигурации «Управление документооборотом» в среде 1С:Предприятие 8.3..pdf
Добавлен: 03.07.2023
Просмотров: 307
Скачиваний: 8
СОДЕРЖАНИЕ
1.1. Выбор комплекса задач автоматизации
1.2. Характеристика документооборота, возникающего при решении задачи
1.3. Обоснование проектных решений по информационному обеспечению
2.2. Характеристика разработанных экранных форм документов в среде 1С:Предприятие
2.2.2 Описание разработанных форм отчетов, необходимых для отражения результатов решения задачи
2.3. Описание реализации периодических расчетов в среде 1С:Предприятие
2.4. Описание созданной / откорректированной карты маршрута бизнес процесса в среде 1С:Предприятие
2.5 Описание разработанных подсистем в среде 1С:Предприятие
2.7. Контрольный пример реализации проекта в среде 1С:Предприятие и его описание
Пока Выборка.Следующий() Цикл
Если ВставлятьРазделительСтраниц Тогда
ТабДок.ВывестиГоризонтальныйРазделительСтраниц();
КонецЕсли;
ТабДок.Вывести(ОбластьЗаголовок);
Шапка.Параметры.Заполнить(Выборка);
ТабДок.Вывести(Шапка, Выборка.Уровень());
ВставлятьРазделительСтраниц = Истина;
КонецЦикла;
//}}
КонецПроцедуры
Процедура Печать(ТабДок, Ссылка) Экспорт
//{{_КОНСТРУКТОР_ПЕЧАТИ(Печать)
Макет = БизнесПроцессы.Б_П_ВХОД.ПолучитьМакет("Печать");
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| Б_П_ВХОД.ВедущаяЗадача,
| Б_П_ВХОД.Вхоядщий,
| Б_П_ВХОД.Дата,
| Б_П_ВХОД.Завершен,
| Б_П_ВХОД.Номер,
| Б_П_ВХОД.Стартован
|ИЗ
| БизнесПроцесс.Б_П_ВХОД КАК Б_П_ВХОД
|ГДЕ
| Б_П_ВХОД.Ссылка В (&Ссылка)";
Запрос.Параметры.Вставить("Ссылка", Ссылка);
Выборка = Запрос.Выполнить().Выбрать();
ОбластьЗаголовок = Макет.ПолучитьОбласть("Заголовок");
Шапка = Макет.ПолучитьОбласть("Шапка");
ТабДок.Очистить();
ВставлятьРазделительСтраниц = Ложь;
Пока Выборка.Следующий() Цикл
Если ВставлятьРазделительСтраниц Тогда
ТабДок.ВывестиГоризонтальныйРазделительСтраниц();
КонецЕсли;
ТабДок.Вывести(ОбластьЗаголовок);
Шапка.Параметры.Заполнить(Выборка);
ТабДок.Вывести(Шапка, Выборка.Уровень());
ВставлятьРазделительСтраниц = Истина;
КонецЦикла;
КонецПроцедуры
Процедура Печать(ТабДок, Ссылка) Экспорт
//{{_КОНСТРУКТОР_ПЕЧАТИ(Печать)
Макет = Документы.Назначение_исполнителя.ПолучитьМакет("Печать");
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| Назначение_исполнителя.Дата,
| Назначение_исполнителя.Дата_назначения,
| Назначение_исполнителя.Номер,
| Назначение_исполнителя.Сотрудник,
| Назначение_исполнителя.Статус,
| Назначение_исполнителя.Документы_назначения.(
| НомерСтроки,
| Документ,
| Дата_контроля
| )
|ИЗ
| Документ.Назначение_исполнителя КАК Назначение_исполнителя
|ГДЕ
| Назначение_исполнителя.Ссылка В (&Ссылка)";
Запрос.Параметры.Вставить("Ссылка", Ссылка);
Выборка = Запрос.Выполнить().Выбрать();
ОбластьЗаголовок = Макет.ПолучитьОбласть("Заголовок");
Шапка = Макет.ПолучитьОбласть("Шапка");
ОбластьДокументы_назначенияШапка = Макет.ПолучитьОбласть("Документы_назначенияШапка");
ОбластьДокументы_назначения = Макет.ПолучитьОбласть("Документы_назначения");
Подвал = Макет.ПолучитьОбласть("Подвал");
ТабДок.Очистить();
ВставлятьРазделительСтраниц = Ложь;