CONNECT TO PLANT — различия между версиями

Материал из Фабиус wiki
Перейти к: навигация, поиск
м
м
 
(не показаны 4 промежуточные версии этого же участника)
Строка 1: Строка 1:
 
[[CONNECT_TO_PLANT]] - это функция из справочника [[R266]]
 
[[CONNECT_TO_PLANT]] - это функция из справочника [[R266]]
 
  Создать подключение ( connection ) к удаленному заводу
 
  Создать подключение ( connection ) к удаленному заводу
−
[[CONNECT_TO_PLANT]]
+
[[CONNECT_TO_PLANT]]( r466_kod,  sql,  tmp_path,  name,  IsRefl:=.f. - запрос к Reflis )
  
 
r466_kod - код завода
 
r466_kod - код завода
Строка 10: Строка 10:
  
 
name - имя лога
 
name - имя лога
 +
= Смотрите также =
 +
[[Полезные функции]]
  
−
= Полный текст функции =
+
[[CreateConnection]]
  
−
parameters r466_kod, sql, tmp_path, name, IsRefl:=.f.
+
[[Функции Delphi]]
−
+
−
local path
+
−
+
−
path := SeekRef( 'R466', r466_kod, 'PATH_TO', 1 )
+
−
+
−
if r466_kod = 10
+
−
  if IsRefl
+
−
      path := Nice_Path( path ) + 'Reflis\DICT.ADD'
+
−
  else
+
−
      path := Nice_Path( path ) + 'Opdata\DICT.ADD'
+
−
  endif
+
−
else
+
−
  if IsRefl
+
−
      path := Nice_Path( path ) + 'Fabius\Reflis\DICT.ADD'
+
−
  else
+
−
      path := Nice_Path( path ) + 'Fabius\Opdata\DICT.ADD'
+
−
  endif
+
−
endif
+
−
+
−
try
+
−
  result := [[CreateConnection]]( path, 'adssys', '' )
+
−
except
+
−
//  WriteLineToTxtFile( tmp_path, name, RealName( 'R466', r466_kod, true ) + ' - не удалось подключиться' )
+
−
end
+
  
−
= Смотрите также =
+
[[FreeAndNil]]
  
−
[[Функции Delphi]]
+
[[R466]]
−
 
+
−
[[Полезные функции]]
+

Текущая версия на 09:05, 23 октября 2019

CONNECT_TO_PLANT - это функция из справочника R266 

Создать подключение ( connection ) к удаленному заводу

CONNECT_TO_PLANT( r466_kod, sql, tmp_path, name, IsRefl:=.f. - запрос к Reflis )

r466_kod - код завода

sql - запрос sql

tmp_path - путь к логу

name - имя лога

Смотрите также

Полезные функции

CreateConnection

Функции Delphi

FreeAndNil

R466

Источник — «https://wiki.sftserv.ru/index.php?title=CONNECT_TO_PLANT&oldid=36319»