TCP-socket сервер и клиент для платформы "1С:Предприятие"
Ruby
Switch branches/tags
Nothing to show
Fetching latest commit…
Cannot retrieve the latest commit at this time.
Permalink
Failed to load latest commit information.
lib
.gitignore
Gemfile
LICENSE.BSD
README.md
Rakefile
s41c.gemspec

README.md

S41C (Socket for 1C)

TCP-socket-сервер и клиент для платформы "1С:Предприятие"

Системные требования

  • Microsoft Windows семейства NT (только для сервера)
  • 1С:Предприятие v7 (только для сервера)
  • Ruby 1.9.3

Установка

gem install s41c

Пример использования

Сервер

Запустить сервер для 1C:Предприятия 7.7 (сетевая версия) на localhost:1421 и использовать базу "C:\Base"

require 's41c'

server = S41C::Server.new
server.db('C:\Base\\')
server.start

Или чуть сложнее: запустить сервер для 1С:Предприятия (локальная версия) на 127.0.0.1:2000, разрешать подключения только с адреса 123.45.67.8, использовать базу "C:\Base", при подключении требовать логин "username" и пароль "password", писать лог в c:\server.log и записать время остановки сервера в файл

require 's41c'

server = S41C::Server.new('127.0.0.1', 2000, 'c:\server.log')
server.white_list('123.45.67.8')
server.ole_name = 'V77L.Application'
server.db('C:\Base\\')

server.login('username', 'password')

server.at_exit do
  File.open('c:\server_stoped_at.txt', 'w') { |f| f.puts Time.now }
end

server.start

Клиент

При подключении можно указать хост и порт сервера (если не указаны, будут использоваться localhost:1421), а также данные для авторизации. После подключения на сервер передаётся руби-код, который и выполняет все, что нам нужно. Внимание! В передаваемом коде нельзя использовать комментарии и условия вида "do_somthing if some_condition", вместо это следует писать "if some_condition do_somthing;end", аналогично для unless

require 's41c'

client = S41C::Client.new('127.0.0.1', 2000)
client.login('username', 'password')

vars = {:spr_name => 'Товары', :tov_name => 'Название товара'}
response = client.request(vars) do

  spr = @ole.CreateObject("Справочник.#{@vars[:spr_name]}")

  if spr.invoke('НайтиПоНаименованию', @tov_name) == 1.0
    item = spr.invoke('ТекущийЭлемент')
    item_id = get_1c_id(item)
    expr = 'КакаяНибудьФункция(ЗначениеИзСтрокиВнутр(' + item_id + '))'
    result = @ole.EvalExpr(expr)
  end

  to_utf8(result)

end

puts response
client.disconnect

Данные, переданные методу request, внутри кода доступны либо через хеш @vars, либо непосредственно через одноименные переменные. Также доступен объект @ole, который является инстансом 1С и у него есть 3 метода

  • CreateObject - создает объект агрегатного типа данных 1С:Предприятия и возвращает ссылку на него.

  • EvalExpr - вычислияет выражение системы 1С:Предприятие и возвращает результат вычисления

  • ExecuteBatch - выполняет последовательность операторов системы 1С:Предприятие и возвращает статус выполнения (true/false)

Вызов функций и процедур созданных объектов осуществляется с помощью метода 'invoke', которому в качестве первого аргумента передаётся название функции/процедуры, а последующих - параметры.

Также достпен ряд вспомогательных функций

  • to_bin - переводит utf-строку в бинарный формат
  • to_utf8 - переводит бинарную или строку из 1С в utf-8
  • get_1c_id - обертка над 1С-функцией 'ЗначениеВСтрокуВнутр', возращает строковый идентификатор объекта.