Фильтровать
Реклама
Наши партнеры
Вы здесь: Главная 
Аптекам Программистам Как получить из 1С доступ к справочнику наименований в ИСС Мед-Заказ
Аптекам Программистам Как получить из 1С доступ к справочнику наименований в ИСС Мед-Заказ
Для загрузки внутреннего справочника ИСС Мед-Заказ в 1С Вы можете воспользоваться следующим способом.
- Установите серверную версию FireBird на компьютер с базой программы Мед-Заказ. Как это сделать описано тут.
- Найдите в папке с программой файл gds32.dll и удлаите его. Если такого файла нет, то искать в других местах не нужно.
- На компьютер с программой 1С установите ODBC драйвер. Скачать драйвер можно отсюда http://www.firebirdsql.org/en/odbc-driver/ Загружайте драйвер согласно Вашей версии Windows, т.е. 32-х, либо 64-х разрядную версию.
- Согласно Вашему мировоззрению и логике Вашей программы 1С написать загрузку справочников из программы Мед-Заказ. Код для внешней обработки приведен ниже.
Подключение к базе ИСС Мед-Заказ.
ИмяБД = "C:\MedZakaz\medzakaz.fdb"; //Указывается пусть к базе. В сети указывается в слеюущем формате
// <Имя компьютера>:<Путь к базе на локальном компьютере>
// Например: Server:C:\MedZakaz\MedZakaz.FDB
ПользовательБД = "SYSDBA";
ПарольПользователяБД = "masterkey";
БД=CreateObject("ADODB.Connection");
БД.ConnectionString =
"DRIVER=Firebird/InterBase(r) driver;" +
"PWD=" + ПарольПользователяБД + ";" +
"UID=" + ПользовательБД + ";" +
"DBNAME=" + ИмяБД;
Попытка
БД.Open();
Исключение
Сообщить(ОписаниеОшибки());
Предупреждение("Не удалось подключиться к IB ...")
КонецПопытки;
Вывод справочника наименований из базы данных.
Запрос=СоздатьОбъект("ADODB.Recordset");
Запрос.ActiveConnection = БД;
Запрос.Source = "select rn.code, rn.trade_name || ' ' || rn.full_form_name, rn.fabr_name from tbl_reestr_names rn";
Запрос.Open();
Пока Запрос.Eof()=0 Цикл
Сообщить("Код - " + Запрос.Fields(0).Value);
Сообщить("Торговое наименование - " + Запрос.Fields(1).Value);
Сообщить("Производитель - " + Запрос.Fields(2).Value);
Запрос.MoveNext();
КонецЦикла;
Запрос.Close();
48051
| Нажмите на рисунок для загрузки: | |
 |
Программы Med-Zakaz |
 |
Сервер FireBird 2.5 |
 |
Драйвер ODBC Firebird |
