24.2. Добавление флага ФлСкидка.

• Выполнить пункт Вставить в главном меню, выбрать строку Флажок.

• Выбрать место для вставки флажка, настроить свойства флажка: Идентификатор – ФлСкидки, синоним – «Скидка на услуги», формула на вкладке Дополнительно – УстановитьПроцентСумма().

24.3. Добавление кнопки.

• Выполнить пункт Вставить в главном меню, выбрать строку Кнопка. Щелкнуть в рабочем поле в том месте, где будет расположена кнопка.

• Настроить свойства кнопки:

Идентификатор – Распределить:

Синоним – Распределить расходы;

Формула на вкладке Дополнительно – РаспределитьРасходы().

Окончательная форма подвала документа показана на рисунке 3.7.

Рисунок 3.7. Окончательная форма подвала документа

24.4. Редактирование модуля формы.

Порядок работы:

• Добавить функцию УстановитьПроцентСумма() в которой производится соответствие между ФлСкидки и реквизитом ПроцентСумма и возвращается значение переменной ПроцентСумма =1, если скидка установлена, или = 0, если скидки нет.

Все функции пишутся перед процедурами.

Перем Процентсумма;

Функция УстановитьПроцентСумма()

ПроцентСумма=ФлСкидки;

КонецФункции

• Добавить процедуру РаспределитьРасходы() для того, чтобы работала кнопка распределения надбавок на все строки документа.

Алгоритм работы процедуры следующий: подсчитывается общая сумма дополнительных расходов, которую необходимо распределить на весь товар, показанный в документе. Если фирме предоставляется скидка, то из общей суммы дополнительных расходов скидка вычитается. Новая сумма расходов распределяется по всем строкам документа. И производится пересчет итоговых сумм.

Процедура РаспределитьРасходы()

УстановитьПроцентСумма();

ОбСумРасх=Тамож+Услуг+Трансп;

СуммаСкидок=0;

ВыбратьСтроки();

Кол=КоличествоСтрок()

Если ПроцентСумма=1 тогда

СуммаСкидок=ОбСумРасх-ОбСумРасх*Скид/100;

иначе

суммаСкидок=ОбСумРасх;

КонецЕсли;

Прибавка=Формат(СуммаСкидок/кол, "ч.5.2");

Пока получитьСтроку()=1 цикл

Было=Сумма;

Сумма=Было+Прибавка;

СуммаНДС=Сумма*18/100;

всегоСНДС=Сумма+СуммаНДС;

УстановитьАтрибут("сумма",Сумма);

УстановитьАтрибут("СуммаНДС",СуммаНДС);

УстановитьАтрибут("ВсегоСНДС",ВсегоСНДС);

ИтогоСумма=итог("Сумма");

ИтогоНДС=итог( "СуммаНДС");

Всего=итог("ВсегоСНДС");

КонецЦикла;

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

• Загрузить пользовательский режим 1С: предприятие, вызвать документ и проверить все варианты распределения расходов: со скидкой и без скидки.

4. Использование закладок и слоев в документе

Закладки используются для группировки большого числа реквизитов по определенному критерию и размещения их на отдельных закладках. Закладки в форме реализуются с помощью слоев. Форма может состоять из нескольких слоев. Каждый слой может быть показан или скрыт в любой комбинации с другими слоями.

Пример 25. Для формы документа ПоступлениеТМЦ создать две закладки. На первой закладке отображается сам документ без подвала, на второй закладке отображаются дополнительные расходы (подвал исходного документа).

Порядок работы:

• Удалить из подвала все реквизиты кроме итоговой строки. Удалить кнопку «Распределить расходы».

Создать два слоя: Основный и Слой1. Открыть экранную форму. На панели инструментов выбрать инструмент Слои. . В списке слоев отображается слой Основной.

• Щелкнуть по кнопке Новый слой (первая левая кнопка на панели инструментов). В поле Идентификатор ввести имя слоя «Слой1». Убедиться в том, что он видимый и активный. Нажать кнопку ОК.

• В списке слоев дважды щелкнуть по созданному слою, закрыть окно Слои. На экране отображается незаполненная форма

• Произвести вставку реквизитов дополнительных услуг, выполнив пункт меню Вставка/Реквизиты. Выделить маркером реквизиты, которые вставляются, нажать кнопку Вставить. На слое 1 будут отображаться реквизиты подвала исходной формы (рис. 3.7.).

• Сделайте активным слой «Основной». На этом слое отображается шапка и табличная часть исходного документа.

Задание для самостоятельной работы. Вставить кнопку флага, реквизит диалога и кнопку «Распределение расходов», настроить их свойства, так как описывалось в пункте 3 данной лабораторной работы.

Результат настройки формы показан на рисунках 3.7. и 3.7а.

Рисунок 3.7. Образец настройки первого слоя

Рисунок 3.7.а. Образец настройки основного слоя.

• Открыть модуль документа и вставить стандартную процедуру

ПриВыбореЗакладки().

Текст процедуры:

Процедура ПриВыбореЗакладки(НомерЗакладки, ИмяЗакладки)

Если НомерЗакладки=1 тогда

Форма.ИспользоватьСлой("Слой1",0);

Форма.ИспользоватьСлой("Основной",1);

Иначе

Форма.ИспользоватьСлой("Основной",0);

форма.ИспользоватьСлой("Слой1",1);

КонецЕсли;

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

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

Форма.ИспользоватьЗакладки(1);

Форма.Закладки.ДобавитьЗначение(1,"Главная");

Форма.Закладки.ДобавитьЗначение(2,"Надбавки");

Форма.Использоватьслой(«Основной»,2);