:: Вопросы по 1С
Сопряжение 1с83 с весами тензо-м
Аспид
Автор

Сообщений: 3475
Откуда: Москва
Дата регистрации: 01.04.2005
Создается отчасти новое производство, предприятие.
Есть желание там все переделать. (от сделанного мною раньше)
В частности уцепиться за 1С как основу.
Но вот сразу посыпались мелкие вопросы.
Как 1С соединить с весовым терминалом тв-003/05
Еще мы номера авто считываем. Как бы их загнать в 1с
Предпологаю закидывание тапками, за невнятность вопроса.
Но если подробно, ну очень много писать, а так... готов ответить на любые вопросы.

Ну и очевидно, могу сам нужные длл написать. Вот только стоит ли)))
Ratings: 0 negative/0 positive
Re: Сопряжение 1с83 с весами тензо-м
PaulWist

Сообщений: 14625
Дата регистрации: 01.04.2004
Насколько я помню, ТензоМ писал в формат парадокса, ... вынимаются данные через ОДБС, проблем не было (возможно сейчас кладут в бесплатные СУБД)


------------------
Есть многое на свете, друг Горацио...
Что и не снилось нашим мудрецам.
(В.Шекспир Гамлет)
Ratings: 0 negative/0 positive
Re: Сопряжение 1с83 с весами тензо-м
pasha_usue

Сообщений: 3650
Откуда: Е-бург
Дата регистрации: 06.10.2006
У Тензо-М есть внешняя компонента для 1с. Пока не ковырял, она naive или com. В любом случае, можно решить на уровне одной формы.

Сложнее будет вписаться в парадигму внешнего оборудования. Там будет пару десятков мелких точечных изменений. Зато выхлоп того стоит.
Ratings: 0 negative/0 positive
Re: Сопряжение 1с83 с весами тензо-м
Аспид
Автор

Сообщений: 3475
Откуда: Москва
Дата регистрации: 01.04.2005
PaulWist
Насколько я помню, ТензоМ писал в формат парадокса, ... вынимаются данные через ОДБС, проблем не было (возможно сейчас кладут в бесплатные СУБД)
У них просто связь через RS, и несколько версий протоколлов.
(все легко разруливается на низком уровне)
Ratings: 0 negative/0 positive
Re: Сопряжение 1с83 с весами тензо-м
Аспид
Автор

Сообщений: 3475
Откуда: Москва
Дата регистрации: 01.04.2005
pasha_usue
У Тензо-М есть внешняя компонента для 1с. Пока не ковырял, она naive или com. В любом случае, можно решить на уровне одной формы.
Сложнее будет вписаться в парадигму внешнего оборудования. Там будет пару десятков мелких точечных изменений. Зато выхлоп того стоит.

Вот пока этого и не накопал."внешняя компонента для 1с"
Слова - "Сложнее будет вписаться в парадигму внешнего оборудования. " не понял
Ratings: 0 negative/0 positive
Re: Сопряжение 1с83 с весами тензо-м
Аспид
Автор

Сообщений: 3475
Откуда: Москва
Дата регистрации: 01.04.2005
Ну и в догонку. У на система определения гос.№ "Ураган"
Легко прикрутим своими силами. Но опять же, может что то есть?
В общем то, как работать с ней знаем. (опыт лет 15)
Но может кто то автоураган прикручивал к 1С?
Ratings: 0 negative/0 positive
Re: Сопряжение 1с83 с весами тензо-м
pasha_usue

Сообщений: 3650
Откуда: Е-бург
Дата регистрации: 06.10.2006
Короче. Сами они к весам тупо цепляются по компорту.

Здесь у них программа на 1С, и Dll-ка для этого дела. Протокол работы с весами, думаю, тупой как веник-пряник.
www.tenso-m.ru

А вот их протокол:
www.tenso-m.ru



Исправлено 2 раз(а). Последнее : pasha_usue, 04.12.20 11:40
Ratings: 0 negative/0 positive
Re: Сопряжение 1с83 с весами тензо-м
pasha_usue

Сообщений: 3650
Откуда: Е-бург
Дата регистрации: 06.10.2006
Блин. Им, кажись, за объем кода платят:
Счетчик = 0;
Если Камеры[0][0] = 1 Тогда
ЭтаФорма.Элементы.Камера1Картинка.Видимость = Истина;
ПутьКамеры1Картинка = ОбщиеНаСервере.ПолучитьКамеру(Камеры, 1);
КонецЕсли;
Если Камеры[0][0] = 2 Тогда
ЭтаФорма.Элементы.Камера1Картинка.Видимость = Истина;
ЭтаФорма.Элементы.Камера2Картинка.Видимость = Истина;
ПутьКамеры1Картинка = ОбщиеНаСервере.ПолучитьКамеру(Камеры, 1);
ПутьКамеры2Картинка = ОбщиеНаСервере.ПолучитьКамеру(Камеры, 2);
КонецЕсли;
Если Камеры[0][0] = 3 Тогда
ЭтаФорма.Элементы.Камера1Картинка.Видимость = Истина;
ЭтаФорма.Элементы.Камера2Картинка.Видимость = Истина;
ЭтаФорма.Элементы.Камера3Картинка.Видимость = Истина;
ПутьКамеры1Картинка = ОбщиеНаСервере.ПолучитьКамеру(Камеры, 1);
ПутьКамеры2Картинка = ОбщиеНаСервере.ПолучитьКамеру(Камеры, 2);
ПутьКамеры3Картинка = ОбщиеНаСервере.ПолучитьКамеру(Камеры, 3);
КонецЕсли;
Если Камеры[0][0] = 4 Тогда
ЭтаФорма.Элементы.Камера1Картинка.Видимость = Истина;
ЭтаФорма.Элементы.Камера2Картинка.Видимость = Истина;
ЭтаФорма.Элементы.Камера3Картинка.Видимость = Истина;
ЭтаФорма.Элементы.Камера4Картинка.Видимость = Истина;
ПутьКамеры1Картинка = ОбщиеНаСервере.ПолучитьКамеру(Камеры, 1);
ПутьКамеры2Картинка = ОбщиеНаСервере.ПолучитьКамеру(Камеры, 2);
ПутьКамеры3Картинка = ОбщиеНаСервере.ПолучитьКамеру(Камеры, 3);
ПутьКамеры4Картинка = ОбщиеНаСервере.ПолучитьКамеру(Камеры, 4);
КонецЕсли;
Если Камеры[0][0] = 5 Тогда
ЭтаФорма.Элементы.Камера1Картинка.Видимость = Истина;
ЭтаФорма.Элементы.Камера2Картинка.Видимость = Истина;
ЭтаФорма.Элементы.Камера3Картинка.Видимость = Истина;
ЭтаФорма.Элементы.Камера4Картинка.Видимость = Истина;
ЭтаФорма.Элементы.Камера5Картинка.Видимость = Истина;
ПутьКамеры1Картинка = ОбщиеНаСервере.ПолучитьКамеру(Камеры, 1);
ПутьКамеры2Картинка = ОбщиеНаСервере.ПолучитьКамеру(Камеры, 2);
ПутьКамеры3Картинка = ОбщиеНаСервере.ПолучитьКамеру(Камеры, 3);
ПутьКамеры4Картинка = ОбщиеНаСервере.ПолучитьКамеру(Камеры, 4);
ПутьКамеры5Картинка = ОбщиеНаСервере.ПолучитьКамеру(Камеры, 5);
КонецЕсли;
Ratings: 0 negative/0 positive
Re: Сопряжение 1с83 с весами тензо-м
medstrax
Забанен

Сообщений: 5964
Дата регистрации: 23.03.2007
pasha_usue
Блин. Им, кажись, за объем кода платят:
Можно ведь подумать о хорошем и предположить, что здесь имеет место оптимизация по скорости.
Реально, оптимизируя исходный код, ты точно не выиграешь в данном случае по скорости у линейных ифов. А учитывая, что это все внутри цикла, скорость може ролять.

Компиляторы зачастую так делают - разворачивают циклы в линейный код, ибо быстрей.

Хотя сомнительно, что в данном случае это применимо))
Ratings: 0 negative/0 positive
Re: Сопряжение 1с83 с весами тензо-м
pasha_usue

Сообщений: 3650
Откуда: Е-бург
Дата регистрации: 06.10.2006
medstrax
pasha_usue
Блин. Им, кажись, за объем кода платят:
Можно ведь подумать о хорошем и предположить, что здесь имеет место оптимизация по скорости.
Реально, оптимизируя исходный код, ты точно не выиграешь в данном случае по скорости у линейных ифов. А учитывая, что это все внутри цикла, скорость може ролять.

Компиляторы зачастую так делают - разворачивают циклы в линейный код, ибо быстрей.

Хотя сомнительно, что в данном случае это применимо))
Код можно оставить на if-ах. Но если вместо "Камеры[0][0] = 1" использовать "Камеры[0][0] >= 1", то код сократится в 2 раза.
Ratings: 0 negative/0 positive
Re: Сопряжение 1с83 с весами тензо-м
medstrax
Забанен

Сообщений: 5964
Дата регистрации: 23.03.2007
Да тут и больше можно сократить. Но только размер сорцов и потребление памяти, но перфоманс это не повлияет.
Ratings: 0 negative/0 positive
Re: Сопряжение 1с83 с весами тензо-м
PaulWist

Сообщений: 14625
Дата регистрации: 01.04.2004
Аспид
PaulWist
Насколько я помню, ТензоМ писал в формат парадокса, ... вынимаются данные через ОДБС, проблем не было (возможно сейчас кладут в бесплатные СУБД)
У них просто связь через RS, и несколько версий протоколлов.
(все легко разруливается на низком уровне)

Задачу я не знаю, то что ты предлагаешь - это для интерактивного взаимодействия (заехал вагон/машина на весы, кладовщик запустил прогу и считал вес), я исходил из того, что есть непрерывный процесс взвешивания и SCADA система обрабатывает сигналы от датчиков и складывает в БД.


------------------
Есть многое на свете, друг Горацио...
Что и не снилось нашим мудрецам.
(В.Шекспир Гамлет)
Ratings: 0 negative/0 positive
Re: Сопряжение 1с83 с весами тензо-м
medstrax
Забанен

Сообщений: 5964
Дата регистрации: 23.03.2007
По-хорошему на уровне ассемблера тут вполне можно обойтись
mov rax, параметр ; 1-5 или что-то другое
;проверили параметр и
jmp [rbx+rax*8]; в rbx табличка смещений
Ratings: 0 negative/0 positive
Re: Сопряжение 1с83 с весами тензо-м
medstrax
Забанен

Сообщений: 5964
Дата регистрации: 23.03.2007
никаких ифов, но слегка вырастает код
Ratings: 0 negative/0 positive
Re: Сопряжение 1с83 с весами тензо-м
Аспид
Автор

Сообщений: 3475
Откуда: Москва
Дата регистрации: 01.04.2005
Спасибо за драйвер. Верил - он есть)))
pasha_usue
Блин. Им, кажись, за объем кода платят:

А это что за код? из автоурагана?
Я как то внутрь вообще не лазил, с ними проще через БД работать
Ratings: 0 negative/0 positive


Извините, только зарегистрированные пользователи могут оставлять сообщения в этом форуме.

On-line: 1 (Гостей: 1)

© 2000-2024 Fox Club 
Яндекс.Метрика