Мастер-Центр оплат.Установка
Для установки программы необходимо просто прописать библиотеку pc2mt.dll как COM-сервер в системе. 1. Создайте удобную для Вас папку, например: C:\Program Files\Megatec\pc2mt\ 2. Скопируйте туда библиотеку pc2mt.dll 3. В командной строке выполните команду: regsvr32 "C:\Program Files\Megatec\pc2mt\pc2mt.dll" Для того, чтобы сделать эту операцию, Вы должны обладать соответствующими правами в системе. После того, как программа пропишется в системе, Вы можете ее вызывать из 1С.
Вызов pc2mt происходит следующим образом:
Перем mProgId; Перем глМастерТурКомпонента; mProgId = "pc2mt.1"; Попытка ПодключитьВнешнююКомпоненту(mProgId); глМастерТурКомпонента=Новый("AddIn.pc2mt"); Исключение Предупреждение("Не удалось создать объект глМастерТурКомпонента" + ОписаниеОшибки()); КонецПопытки;
На разных этапах подключения и работы pc2mt выдает разнообразные сообщения в строку состояния 1С.
Вызов pc2mt в 1С 7-й версии производится следующим образом:
Перем mProgId; Перем глМастерТурКомпонента; mProgId = "pc2mt.1"; Попытка ПодключитьВнешнююКомпоненту(mProgId); глМастерТурКомпонента=CreateObject("AddIn.pc2mt"); Исключение Предупреждение("Не удалось создать объект глМастерТурКомпонента" + ОписаниеОшибки()); КонецПопытки;
После этого используя переменную глМастерТурКомпонента можно вызывать соответствующие функции, например
найдем путевку по коду:
ТЗ=Новый "ТаблицаЗначений"; (ТЗ=СоздатьОбъект("ТаблицаЗначений");)
ТЗ=глМастерТурКомпонента.ВыбратьПутевкиЗаПериод(ДатаНачала,ДатаКонца,1,СтрокаКодПутевки);
Но прежде чем вызывать разнообразные функции, Вы должны установить подключение к базе данных Мастер-Тур. Это делается с помощью функции Подключиться РезультатПодключения=глМастерТурКомпонента.Подключиться(Сервер,БазаДанных,Логин,Пароль,"00",СтрокаDBGUID);