Создание интерфейса пользователя

Создадим рабочее место менеджера, т.е. создадим интерфейс для Менеджера (организуем быстрый доступ к журналу Заказы). Переходим к окну Конфигурация*, закладка Интерфейсы и создаем новый элемент (, Ins) - Менеджер.

Нами создан Интерфейс с названием Менеджер, отредактируем его (двойной клик на элементе Менеджер).

Вначале отредактируем Меню (тем самым добавим новый пункт в пользовательское меню).

Двойной клик по <новая колонка> позволит отредактировать свойства Меню: Название -Журналы (закладка Общие). Теперь необходимо войти в папку Журналы, в которой появится <новый> элемент.

По двойному клику отредактируем его.

На закладке Общие выберем Объект: Журналы.Заказы (остальные поля заполнятся автоматически). На закладке Акселератор можно задать комбинацию горячих клавиш: Клавиша - N, и добавить к ней комбинацию Ctrl+Alt (Ctrl+N нельзя, т.к. такая комбинация уже существует). Другой способ задания быстрых клавиш: Удерживать нажатой комбинацию Ctrl+Alt+N и нажать кнопку Выбрать акселератор.

Теперь отредактируем Панель Инструментов (создадим новую кнопку вызова Журнала Заказы).

В списке панелей создадим новый элемент (т.е. создаем новую панель, а не редактируем системную).

Название: Менеджер, Положение: Справа. Новая панель создана. Теперь добавим на нее кнопки. Для этого переходим в раздел Состав панели и создаем на ней новый элемент. Выбираем Объект - Журналы.Заказы, остальные поля заполнятся автоматически.

По двойному клику в разделе Библиотека пиктограмм выбираем картинку. Закрываем окно редактирования. Интерфейс Менеджера создан и отредактирован.

Переходим в режим 1С:Предприятие и, используя созданный интерфейс, создадим еще один заказ.

Возвращаемся к редактированию документа Заказ: Необходимо произвести расчет стоимости заказа.

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

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

Для расчета необходимо создать две константы: СтоимостьЧернойКраски и СтоимостьЦветнойКраски. Эти константы должны быть периодическими.

Функция Расчет() будет иметь следующий код:

Функция Расчет()

Итого = Кол_воСтраниц * Бумага.Цена.Получить(ДатаДок); // стоимость бумаги

Если Краска = Перечисление.Краски.Черная Тогда

Итого = Итого + Константа.СтоимостьЧернойКраски.Получить(ДатаДок);

ИначеЕсли Краска = Перечисление.Краски.Полноцвет Тогда

Итого = Итого + Константа.СтоимостьЦветнойКраски.Получить(ДатаДок);

Иначе

Предупреждение("Укажите цветность!!!");

Возврат 0;

КонецЕсли;

Итого = Итого*Тираж;

Если Тираж > 1000 Тогда

Итого = Итого*0.7 //ввести константу скидки или справочник скидок (граница скидок и коэффициент)

КонецЕсли;

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

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

Итого = Итого + ДопРабота.Цена.Получить(ДатаДок)*Кол_воСтраниц*?(Сложность > 1,?(Сложность =2, 1.5, 2.1), 1);

//предусмотреть вариант разных коэф. для разных работ (добавить реквизит коэф в справочник номенклатуры)

КонецЦикла;

ИтогоФормат=Строка(Формат(Итого,"Ч15.2"))+" руб.";

Возврат ИтогоФормат;

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

!!! Перед проведением расчета пользователь должен заполнить константы (В 1С - меню Операции → Константы).

Поиск по сайту: