Базовый курс. Занятие №1
05.10.2015
комментариев 11
Приступайте к первому занятию базового курса.
комментариев 11 на “Базовый курс. Занятие №1”
Важно!
Для новых покупателей Базового курса - с чего начать
...........................................................
...........................................................
Все контакты Саппорта Spec8.ru
...........................................................
...........................................................
Как задавать вопросы по материалам курса и ДЗ
...........................................................
...........................................................
Что такое Мастер-группа
...........................................................
...........................................................
Годовой абонемент на Мастер-группы
ДЗ № 1 Блок 0.
Процедура БулевыОперации(Команда)
Операнд1 = Истина;
Операнд2 = Ложь;
// сымитировать программно операцию обратную (XOR)
Результат = НЕ (Операнд2 ИЛИ Операнд2); //Истина
Результат = НЕ (Операнд2 ИЛИ Операнд1); //Ложь
Результат = НЕ (Операнд1 ИЛИ Операнд2); //Ложь
Результат = НЕ (Операнд1 ИЛИ Операнд1); //Ложь
КонецПроцедуры
&НаСервере
Функция РазрешенаПродажа(ВидКлиента,СортТовара)
Если ВидКлиента = "VIP" И СортТовара = "Высший" Тогда
Результат = Истина;
ИначеЕсли ВидКлиента <> "VIP" И СортТовара <> "Высший" Тогда
Результат = Истина;
Иначе
Результат = Ложь;
КонецЕсли;
Возврат Строка(Результат);
КонецФункции // РазрешенаПродажа(ВидКлиента,СортТовара)()
&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
Сообщить(РазрешенаПродажа("Постоянный", "Высший"));
Сообщить(РазрешенаПродажа("Непостоянный", "Брак"));
Сообщить(РазрешенаПродажа("VIP", "Брак"));
Сообщить(РазрешенаПродажа("VIP", "Высший"));
КонецПроцедуры
Функция РазрешенаПродажа(ВидКлиента, СортТовара)
Если ВидКлиента="VIP" Тогда
Если СортТовара="Высший" Тогда
Возврат Истина;
Иначе
Возврат Ложь;
КонецЕсли;
Иначе
Если СортТовара="Высший" Тогда
Возврат Ложь;
Иначе
Возврат Истина;
КонецЕсли;
КонецЕсли;
КонецФункции
#Область ДЗ_1
&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
// Вставить содержимое обработчика.
Сообщить(Строка(РазрешенаПродажа("Постоянный", "Высший")) + " = Ложь");
Сообщить(Строка(РазрешенаПродажа("Непостоянный", "Брак")) + " = Истина");
Сообщить(Строка(РазрешенаПродажа("VIP", "Брак")) + " = Ложь");
Сообщить(Строка(РазрешенаПродажа("VIP", "Высший")) + " = Истина");
КонецПроцедуры
# КонецОбласти
ДЗ №1
Создал внешнюю обработку, в модуль формы добавил процедуру обработчика события и функцию:
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
Сообщить(РазрешенаПродажа("Постоянный", "Высший"));
Сообщить(РазрешенаПродажа("Непостоянный", "Брак"));
Сообщить(РазрешенаПродажа("VIP", "Брак"));
Сообщить(РазрешенаПродажа("VIP", "Высший"));
Сообщить(РазрешенаПродажа("Старый знакомый", "Первый сорт"));
КонецПроцедуры
&НаСервере
Функция РазрешенаПродажа(ВидКлиента, СортТовара)
ВозвращаемоеЗначение = (ВидКлиента = "VIP" И СортТовара = "Высший") ИЛИ
(ВидКлиента <> "VIP" И СортТовара <> "Высший") ИЛИ
(ВидКлиента = "Старый знакомый" И СортТовара = "Первый сорт");
Возврат ВозвращаемоеЗначение;
КонецФункции // РазрешенаПродажа()
Создал внешнюю обработку и в модуле формы написал код:
&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
Сообщить(РазрешенаПродажа(“Постоянный”, “Высший”));
Сообщить(РазрешенаПродажа(“Непостоянный”, “Брак”));
Сообщить(РазрешенаПродажа(“VIP”, “Брак”));
Сообщить(РазрешенаПродажа(“VIP”, “Высший”));
КонецПроцедуры
&НаСервере
Функция РазрешенаПродажа(ВидКлиента, СортТовара)
Если ВидКлиента = “VIP” И СортТовара = “Высший” Тогда
Возврат Истина;
ИначеЕсли ВидКлиента “VIP” И СортТовара “Высший” Тогда
Возврат Истина;
Иначе
Возврат Ложь;
КонецЕсли;
КонецФункции
Если (НЕ Клиенты = "VIP" и НЕ Сорт = "Высший") или
( Клиенты = "Старый знакомвй" и Сорт = "Первый сорт") или
(Клиенты = "VIP" и Сорт = "Высший" )
Тогда Продажа = Истина;
Возврат Строка(Продажа);
иначе Продажа = Ложь;
Возврат Строка(Продажа);
КонецЕсли;
КонецФункции // ()
&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
Сообщить(РазрешенаПродажа("Постоянный", "Высший"));
Сообщить(РазрешенаПродажа("Непостоянный", "Брак"));
Сообщить(РазрешенаПродажа("VIP", "Брак"));
Сообщить(РазрешенаПродажа("VIP", "Высший"));
КонецПроцедуры
Функция РазрешенаПродажа(ВидКлиента, СортТовара)
Если (ВидКлиента=”VIP” И СортТовара=”Высший”)
ИЛИ (ВидКлиента”VIP” И СортТовара”Высший”) Тогда
Возврат Истина;
Иначе
Возврат Ложь;
КонецЕсли;
КонецФункции // РазрешенаПродажа()
&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
Сообщить(РазрешенаПродажа(“Постоянный”, “Высший”));
Сообщить(РазрешенаПродажа(“Непостоянный”, “Брак”));
Сообщить(РазрешенаПродажа(“VIP”, “Брак”));
Сообщить(РазрешенаПродажа(“VIP”, “Высший”));
КонецПроцедуры
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
Сообщить(РазрешенаПродажа("Постоянный", "Высший"));
Сообщить(РазрешенаПродажа("Непостоянный", "Брак"));
Сообщить(РазрешенаПродажа("VIP", "Брак"));
Сообщить(РазрешенаПродажа("VIP", "Высший"));
КонецПроцедуры
&НаСервере
Функция РазрешенаПродажа(ВидКлиента, СортТовара)
Если (ВидКлиента = "VIP" и СортТовара = "Высший") или (Не ВидКлиента = "VIP" и Не СортТовара = "Высший") Тогда
Возврат Истина;
Иначе
Возврат Ложь;
КонецЕсли;
КонецФункции
<span style="color: red;">Процедура</span> ПриСозданииНаСервере<span style="color: red;">(</span>Отказ<span style="color: red;">,</span> СтандартнаяОбработка<span style="color: red;">)</span>
Сообщить<span style="color: red;">(</span>РазрешенаПродажа<span style="color: red;">(</span><span style="color: black;">"Постоянный"</span><span style="color: red;">,</span> <span style="color: black;">"Высший"</span><span style="color: red;">)</span><span style="color: red;">)</span><span style="color: red;">;</span>
Сообщить<span style="color: red;">(</span>РазрешенаПродажа<span style="color: red;">(</span><span style="color: black;">"Непостоянный"</span><span style="color: red;">,</span> <span style="color: black;">"Брак"</span><span style="color: red;">)</span><span style="color: red;">)</span><span style="color: red;">;</span>
Сообщить<span style="color: red;">(</span>РазрешенаПродажа<span style="color: red;">(</span><span style="color: black;">"VIP"</span><span style="color: red;">,</span> <span style="color: black;">"Брак"</span><span style="color: red;">)</span><span style="color: red;">)</span><span style="color: red;">;</span>
Сообщить<span style="color: red;">(</span>РазрешенаПродажа<span style="color: red;">(</span><span style="color: black;">"VIP"</span><span style="color: red;">,</span> <span style="color: black;">"Высший"</span><span style="color: red;">)</span><span style="color: red;">)</span><span style="color: red;">;</span>
<span style="color: red;">КонецПроцедуры</span>
<span style="color: brown;">&НаСервере</span>
<span style="color: red;">Функция</span> РазрешенаПродажа<span style="color: red;">(</span>ВидКлиента<span style="color: red;">,</span> СортТовара<span style="color: red;">)</span>
<span style="color: red;">Если</span> <span style="color: red;">(</span>ВидКлиента <span style="color: red;">=</span> <span style="color: black;">"VIP"</span> <span style="color: red;">и</span> СортТовара <span style="color: red;">=</span> <span style="color: black;">"Высший"</span><span style="color: red;">)</span> <span style="color: red;">или</span> <span style="color: red;">(</span><span style="color: red;">Не</span> ВидКлиента <span style="color: red;">=</span> <span style="color: black;">"VIP"</span> <span style="color: red;">и</span> <span style="color: red;">Не</span> СортТовара <span style="color: red;">=</span> <span style="color: black;">"Высший"</span><span style="color: red;">)</span> <span style="color: red;">Тогда</span>
<span style="color: red;">Возврат</span> <span style="color: red;">Истина</span><span style="color: red;">;</span>
<span style="color: red;">Иначе</span>
<span style="color: red;">Возврат</span> <span style="color: red;">Ложь</span><span style="color: red;">;</span>
<span style="color: red;">КонецЕсли</span><span style="color: red;">;</span>
<span style="color: red;">КонецФункции</span>
</pre>
(ВидКлиента<>"VIP" и СортТовара<>"Высший"), Истина, Ложь);
Код обработки
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
Сообщить(РазрешенаПродажа("Постоянный", "Высший"));
Сообщить(РазрешенаПродажа("Непостоянный", "Брак"));
Сообщить(РазрешенаПродажа("VIP", "Брак"));
Сообщить(РазрешенаПродажа("VIP", "Высший"));
КонецПроцедуры
&НаСервереБезКонтекста
Функция РазрешенаПродажа(ВидКлиента, СортТовара)
Если (ВидКлиента = "VIP" И СортТовара = "Высший") ИЛИ (НЕ ВидКлиента = "VIP" И НЕ СортТовара = "Высший") Тогда
Возврат Истина;
Иначе
Возврат Ложь;
КонецЕсли;
КонецФункции
Задание №1 Блок 0
1) Скачал и установит учебную версию платформы 1С.
2) Создал пустую информационную базу.
3) Создал внешнюю обработку.
4) Обработка содержкит следующий код
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
Сообщить(РазрешенаПродажа("Постоянный", "Высший"));
Сообщить(РазрешенаПродажа("Непостоянный", "Брак"));
Сообщить(РазрешенаПродажа("VIP", "Брак"));
Сообщить(РазрешенаПродажа("VIP", "Высший"));
КонецПроцедуры
&НаСервере
Функция РазрешенаПродажа(ВидКлиента,СортТовара)
Если ИсключающееИЛИ(ЭтоВипКлиент(ВидКлиента), НЕ ЭтоВысшийСорт(СортТовара)) Тогда
Возврат Истина;
Иначе
Возврат Ложь;
КонецЕсли;
КонецФункции
&НаСервере
Функция ЭтоВипКлиент(ВидКлиента)
Возврат ВидКлиента = "VIP" ;
КонецФункции
&НаСервере
Функция ЭтоВысшийСорт(СортТовара)
Возврат СортТовара = "Высший" ;
КонецФункции
&НаСервере
Функция ИсключающееИЛИ(Значение1,Значение2)
Возврат НЕ Значение1 = Значение2
КонецФункции