Мастер-Центр оплат.Примеры — различия между версиями
| [досмотренная версия] | [досмотренная версия] |
Borzenkov (обсуждение | вклад) |
Borzenkov (обсуждение | вклад) |
||
| Строка 1: | Строка 1: | ||
Пример из тестовой обработки:<br> | Пример из тестовой обработки:<br> | ||
| − | 1. '''Производится загрузка Центра оплат''': | + | 1. '''Производится загрузка Центра оплат, подключение к базе МТ и заполнения нескольких вспомогательных таблиц значений:''': |
Перем глМастерТурКомпонента Экспорт;<br> | Перем глМастерТурКомпонента Экспорт;<br> | ||
| Строка 23: | Строка 23: | ||
Сообщить(ОписаниеОшибки());<br> | Сообщить(ОписаниеОшибки());<br> | ||
КонецПопытки;<br> | КонецПопытки;<br> | ||
| − | ВозврЗн=глМастерТурКомпонента.Подключиться(СокрЛП(Сервер),СокрЛП(DBName),СокрЛП(Логин),СокрЛП(Пароль),"100",СокрЛП(ВиртульныйGUIDБазыДанных));<br> | + | ВозврЗн=глМастерТурКомпонента.[[Подключиться]](СокрЛП(Сервер),СокрЛП(DBName),СокрЛП(Логин),СокрЛП(Пароль),"100",СокрЛП(ВиртульныйGUIDБазыДанных));<br> |
Пароль="";<br> | Пароль="";<br> | ||
Если ВозврЗн=1 Тогда<br> | Если ВозврЗн=1 Тогда<br> | ||
ТЗ = Новый ТаблицаЗначений;<br> | ТЗ = Новый ТаблицаЗначений;<br> | ||
| − | ТЗ=глМастерТурКомпонента.Т8_ПолучитьСписокВалют(0,"");<br> | + | ТЗ=глМастерТурКомпонента.[[Т8_ПолучитьСписокВалют]](0,"");<br> |
ЭлементыФормы.ТП_СписокВалют.Значение=ТЗ;<br> | ЭлементыФормы.ТП_СписокВалют.Значение=ТЗ;<br> | ||
ТЗ = Новый ТаблицаЗначений;<br> | ТЗ = Новый ТаблицаЗначений;<br> | ||
| − | ТЗ=глМастерТурКомпонента.Т8_ПолучитьСписокТиповСвойствПартнеров(0,);<br> | + | ТЗ=глМастерТурКомпонента.[[Т8_ПолучитьСписокТиповСвойствПартнеров]](0,);<br> |
ЭлементыФормы.ТП_ТипыСвойствПартнеровСчета.Значение=ТЗ;<br> | ЭлементыФормы.ТП_ТипыСвойствПартнеровСчета.Значение=ТЗ;<br> | ||
ТЗ = Новый ТаблицаЗначений;<br> | ТЗ = Новый ТаблицаЗначений;<br> | ||
| − | ТЗ=глМастерТурКомпонента.Т8_ПолучитьСписокТиповСостоянийПутевок();<br> | + | ТЗ=глМастерТурКомпонента.[[Т8_ПолучитьСписокТиповСостоянийПутевок]]();<br> |
ЭлементыФормы.ТП_ТипыСостоянийПутевокСчета.Значение=ТЗ;<br> | ЭлементыФормы.ТП_ТипыСостоянийПутевокСчета.Значение=ТЗ;<br> | ||
ТЗ = Новый ТаблицаЗначений;<br> | ТЗ = Новый ТаблицаЗначений;<br> | ||
| − | ТЗ=глМастерТурКомпонента.Т8_ПолучитьСписокТиповСвойствПартнеров(0,);<br> | + | ТЗ=глМастерТурКомпонента.[[Т8_ПолучитьСписокТиповСвойствПартнеров]](0,);<br> |
ЭлементыФормы.ТП_ТипыСвойствПартнеровПартнеры.Значение=ТЗ;<br> | ЭлементыФормы.ТП_ТипыСвойствПартнеровПартнеры.Значение=ТЗ;<br> | ||
КонецЕсли;<br> | КонецЕсли;<br> | ||
КонецПроцедуры<br> | КонецПроцедуры<br> | ||
| − | 2. | + | 2. '''Сразу после подключения производится вызов списка валют из базы МТ''':<br> |
| − | + | ТЗ = Новый ТаблицаЗначений;<br> | |
| − | + | ТЗ=глМастерТурКомпонента.[[Т8_ПолучитьСписокВалют]](0,"");<br> | |
| − | + | ЭлементыФормы.ТП_СписокВалют.Значение=ТЗ;<br> | |
3. На конкретную дату вызывается курс выбранной валюты из базы МТ.<br> | 3. На конкретную дату вызывается курс выбранной валюты из базы МТ.<br> | ||
Версия 13:32, 6 ноября 2013
Пример из тестовой обработки:
1. Производится загрузка Центра оплат, подключение к базе МТ и заполнения нескольких вспомогательных таблиц значений::
Перем глМастерТурКомпонента Экспорт;
Функция глУстановитьКомпонентуМастерТур()
Перем mProgId;
Перем МастерТур;
mProgId = "pc2mt.1";
Попытка
ПодключитьВнешнююКомпоненту(mProgId);
МастерТур=Новый("AddIn.pc2mt");
Исключение
Предупреждение("Не удалось создать объект МастерТур " + ОписаниеОшибки());
КонецПопытки;
Возврат МастерТур;
КонецФункции
Процедура КН_ПодключитьсяНажатие(Элемент)
Попытка
глМастерТурКомпонента = глУстановитьКомпонентуМастерТур();
Исключение
Сообщить(ОписаниеОшибки());
КонецПопытки;
ВозврЗн=глМастерТурКомпонента.Подключиться(СокрЛП(Сервер),СокрЛП(DBName),СокрЛП(Логин),СокрЛП(Пароль),"100",СокрЛП(ВиртульныйGUIDБазыДанных));
Пароль="";
Если ВозврЗн=1 Тогда
ТЗ = Новый ТаблицаЗначений;
ТЗ=глМастерТурКомпонента.Т8_ПолучитьСписокВалют(0,"");
ЭлементыФормы.ТП_СписокВалют.Значение=ТЗ;
ТЗ = Новый ТаблицаЗначений;
ТЗ=глМастерТурКомпонента.Т8_ПолучитьСписокТиповСвойствПартнеров(0,);
ЭлементыФормы.ТП_ТипыСвойствПартнеровСчета.Значение=ТЗ;
ТЗ = Новый ТаблицаЗначений;
ТЗ=глМастерТурКомпонента.Т8_ПолучитьСписокТиповСостоянийПутевок();
ЭлементыФормы.ТП_ТипыСостоянийПутевокСчета.Значение=ТЗ;
ТЗ = Новый ТаблицаЗначений;
ТЗ=глМастерТурКомпонента.Т8_ПолучитьСписокТиповСвойствПартнеров(0,);
ЭлементыФормы.ТП_ТипыСвойствПартнеровПартнеры.Значение=ТЗ;
КонецЕсли;
КонецПроцедуры
2. Сразу после подключения производится вызов списка валют из базы МТ:
ТЗ = Новый ТаблицаЗначений;
ТЗ=глМастерТурКомпонента.Т8_ПолучитьСписокВалют(0,"");
ЭлементыФормы.ТП_СписокВалют.Значение=ТЗ;
3. На конкретную дату вызывается курс выбранной валюты из базы МТ.
4. Производится отбор путевок:
ТЗ = Новый ТаблицаЗначений;
ТЗ=глМастерТурКомпонента.Т8_ВыбратьПутевкиЗаПериод(ДатаНачала,ДатаКонца,СДО0,ПолеДопОтбора);
ЭлементыФормы.ТП_Договоры.Значение=ТЗ;
