Студопедия
Случайная страница | ТОМ-1 | ТОМ-2 | ТОМ-3
АрхитектураБиологияГеографияДругоеИностранные языки
ИнформатикаИсторияКультураЛитератураМатематика
МедицинаМеханикаОбразованиеОхрана трудаПедагогика
ПолитикаПравоПрограммированиеПсихологияРелигия
СоциологияСпортСтроительствоФизикаФилософия
ФинансыХимияЭкологияЭкономикаЭлектроника

Уровень сложности: Любитель.

Читайте также:
  1. I Уровень. Достижение экономической прибыли
  2. II Уровень. Увеличение рыночной доли
  3. III Уровень. Рост стоимости/ценности компании
  4. Quot;Звезда Смерти", административный уровень, каюта гранд-моффа Таркина
  5. Quot;Звезда Смерти", административный уровень, отдел архитектуры
  6. Quot;Звезда Смерти", административный уровень, отдел архитектуры
  7. Quot;Звезда Смерти", административный уровень, спортзал

 

Сделать уровень «Новичок».

Добавлен справочник «Мэйл», длина кода 50 символов, длина кода 5.

Добавлен документ «Переадресация Письма»

 

Реквизиты:

Название Тип Длина Комментарий
Организация СправочникСсылка.Организации   Индексировать
Ответственный СправочникСсылка.Пользователи    
Емэил Отправитель Строка    
Емэил Получатель СправочникСсылка.Пользователи    

 

Добавлена табличная часть «Фалы»

 

Реквизиты:

Название Тип Длина Комментарий
Наименование Строка   Индексировать
Текст Строка Не ограничено  

 

Добавлена форма документа, имеет вид:

 

Добавлен макет печати, который нельзя редактировать привязанный к кнопке «Печать».

В макете изменен заголовок на «Переадресованные письма», изменен цвет шапки на розовый.

 

Добавлен код.

Процедура ЕмэилОтправитель1ПриИзменении(Элемент)

ТекТекст = ЕмэилОтправитель;

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

Запрос.Текст = "ВЫБРАТЬ

| Мэйл.Наименование,

| Мэйл.Ссылка

|ИЗ

| Справочник.Мэйл КАК Мэйл

|ГДЕ

| Мэйл.Наименование В(&Наименование)";

 

Запрос.УстановитьПараметр("Наименование",ТекТекст);

Результат = Запрос.Выполнить();

Выборка = Результат.Выбрать();

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

сообщить(Выборка.Наименование);

КонецЦикла;

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

 

 

В общем модуле добавляем модуль «Расчет суммы», код которого приведен ниже:

Добавлен код.

функция РассчитатДополнительнуюСумму(количество, цена) Экспорт

если НЕ (ПустаяСтрока(количество)) и НЕ (ПустаяСтрока(цена)) Тогда

сумма = количество * цена;

КонецЕсли;

Возврат сумма;

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

 

Добавлен новый реквизит «Дополнительная сумма» в документе «Заказ поставщику», в табличной части «Товары»

 

Реквизиты:

Название Тип Длина Точность
Дополнительная сумма Число    

 

Новый реквизит «Дополнительная сумма» добавлена на форму документа.

Оформление: ЦветТекстаПоля = (Оранжевый цвет)

 

В Процедуру «ТоварыКоличествоПриИзменении(Элемент)»:

Добавлен код.

Стр = ЭлементыФормы.Товары.ТекущиеДанные;

Количество = Стр.Количество;

Цена = Стр.Цена;

Стр.ДополнительнаяСумма = РасчетСуммы.РассчитатДополнительнуюСумму(Количество,Цена);

 

 

В Процедуру «ТоварыЦенаПриИзменении(Элемент)»:

Добавлен код.

Стр = ЭлементыФормы.Товары.ТекущиеДанные;

Количество = Стр.Количество;

Цена = Стр.Цена;

Стр.ДополнительнаяСумма = РасчетСуммы.РассчитатДополнительнуюСумму(Количество,Цена);

 

 

 


Дата добавления: 2015-11-04; просмотров: 49 | Нарушение авторских прав


<== предыдущая страница | следующая страница ==>
Уровень сложности: Новичок.| Короткі відомості з історії дослідження

mybiblioteka.su - 2015-2024 год. (0.007 сек.)