Файл: Разработка и реализация конфигурации «Торговое предприятие» на платформе 1С: Предприятие.pdf

ВУЗ: Не указан

Категория: Курсовая работа

Дисциплина: Не указана

Добавлен: 28.06.2023

Просмотров: 64

Скачиваний: 4

ВНИМАНИЕ! Если данный файл нарушает Ваши авторские права, то обязательно сообщите нам.

//{{_КОНСТРУКТОР_ПЕЧАТИ(Печать)

Макет = Документы.РасходнаяНакладная.ПолучитьМакет("Печать");

Запрос = Новый Запрос;

Запрос.Текст =

"ВЫБРАТЬ

| РасходнаяНакладная.Дата,

| РасходнаяНакладная.Номер,

| РасходнаяНакладная.Покупатель,

| РасходнаяНакладная.Продавец,

| РасходнаяНакладная.Товары.(

| НомерСтроки,

| Товар,

| Количество,

| Цена,

| Сумма

| )

|ИЗ

| Документ.РасходнаяНакладная КАК РасходнаяНакладная

|ГДЕ

| РасходнаяНакладная.Ссылка В (&Ссылка)";

Запрос.Параметры.Вставить("Ссылка", Ссылка);

Выборка = Запрос.Выполнить().Выбрать();

ОбластьЗаголовок = Макет.ПолучитьОбласть("Заголовок");

Шапка = Макет.ПолучитьОбласть("Шапка");

ОбластьТоварыШапка = Макет.ПолучитьОбласть("ТоварыШапка");

ОбластьТовары = Макет.ПолучитьОбласть("Товары");

Подвал = Макет.ПолучитьОбласть("Подвал");

ТабДок.Очистить();

ВставлятьРазделительСтраниц = Ложь;

Пока Выборка.Следующий() Цикл

Если ВставлятьРазделительСтраниц Тогда

ТабДок.ВывестиГоризонтальныйРазделительСтраниц();

КонецЕсли;

ТабДок.Вывести(ОбластьЗаголовок);

Шапка.Параметры.Заполнить(Выборка);

ТабДок.Вывести(Шапка, Выборка.Уровень());

ТабДок.Вывести(ОбластьТоварыШапка);

ВыборкаТовары = Выборка.Товары.Выбрать();

Пока ВыборкаТовары.Следующий() Цикл

ОбластьТовары.Параметры.Заполнить(ВыборкаТовары);

ТабДок.Вывести(ОбластьТовары, ВыборкаТовары.Уровень());

КонецЦикла;

Подвал.Параметры.Заполнить(Выборка);

ТабДок.Вывести(Подвал);

ВставлятьРазделительСтраниц = Истина;

КонецЦикла;

//}}

КонецПроцедуры

Приложение 4 «Отчет «Проданные товары»

ВЫБРАТЬ

РасходнаяНакладная.Покупатель,

РасходнаяНакладная.Товары.(

Товар,

Количество

),

РасходнаяНакладная.Ссылка КАК Документ

ИЗ

Документ.РасходнаяНакладная КАК РасходнаяНакладная

Приложение 5 «Отчет «Информация о сотрудниках»

ВЫБРАТЬ

Сотрудники.Наименование КАК ФИО,

Сотрудники.Должность,

Сотрудники.Статус КАК Статус,

Сотрудники.КонтактныйТелефон,

Сотрудники.ЭлектроннаяПочта

ИЗ

Справочник.Сотрудники КАК Сотрудники