Лабораторная работа: Проектирование информационной системы складского учета с использованием платформы 1С Предприяти

Для имени поля установить имя ЦенаПоступления, Данные – выбрать из списка «Элементы формы – текущие данные – ЦенаПоступления» (смотри рисунок 7).

Рисунок 7 – Добавление поля ввода в справочник «Товары»

Далее необходимо перейти на вкладку «Модуль» и внести изменения в существующий листинг в соответствии с листингом, приведенным ниже.

Процедура Печать(Элемент)

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

// Данный фрагмент построен конструктором.

// При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!

ТабДок = Новый ТабличныйДокумент;

Макет = Справочники.Товары.ПолучитьМакет("Печать");

// Заголовок

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

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

// Шапка

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

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

Если ((ЭлементыФормы.ЦенаПоступления.Значение)>0) Тогда

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

Запрос.Текст = "ВЫБРАТЬ Наименование,ЦенаПоступления,ЦенаПродажи,ЕдиницаИзмерения ИЗ Справочник.Товары ГДЕ ЦенаПоступления < &Значение";

Запрос.УстановитьПараметр("Значение", ЭлементыФормы.ЦенаПоступления.Значение);

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

Иначе

Выборка=Справочники.Товары.Выбрать();

КонецЕсли;

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

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

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

ТабДок.Вывести(Элемент);

КонецЦикла;

К-во Просмотров: 1465
Бесплатно скачать Лабораторная работа: Проектирование информационной системы складского учета с использованием платформы 1С Предприяти