Показать сообщение отдельно
Старый 26.09.2012, 08:03    | »»» |  #1
Леонид Борисович
Начинающий
 
Аватар для Леонид Борисович
 
Екатеринбург, ООО ЕСК
Регистрация: 18.09.2012
Сообщений: 38
Леонид Борисович is on a distinguished road
По умолчанию 1с через ОЛЕ считывает с датчика3 данные о работе крановой установки, хотя подключено ко второму датчику...

Добрый день!



Пытаемся получить данные о включении и отключении работы крановой установки в 1С 8.1 через ОЛЕ. При установке оборудования на кран, техническая служба уведомила, что работу крановой установки будете видеть на датчике2. В 1с ке ловится почему то на датчик3. и вроде бы похоже, что данные достоверны. Т.е. видим это в мониторе самого автографа на датчике 2...

Вот код из 1с ки.
получаем аналоговые данные второй параметр =3
в ExportDataToFile

ИмяФайлаБазыDBF= строка("D:\kran.dbf");
Попытка
AG.ExportDataToFile(ИмяФайлаБазыDBF,3, 1);
Исключение
AG.PropertyName = "Last_Error";
Сообщить(AG.PropertyValue);
Сообщить("Не удалось экспортировать данные: "+ОписаниеОшибки());
КонецПопытки;
БД = Новый XBase;
БД.ОткрытьФайл(ИмяФайлаБаз ыDBF,,Истина);
Пока БД.Следующая() Цикл
НоваяСтрокаDBF = ДанныеОбработеКрановойУст ановки.Добавить();
НоваяСтрокаDBF.ALTITUDE = БД.ALTITUDE ;
НоваяСтрокаDBF.ANALOG1 = БД.ANALOG1;
НоваяСтрокаDBF.ANALOG2 = БД.ANALOG2 ;
НоваяСтрокаDBF.CAN1_FUEL = БД.CAN1_FUEL;
НоваяСтрокаDBF.CAN2_LVL1 = БД.CAN2_LVL1 ;
НоваяСтрокаDBF.CAN2_LVL2 = БД.CAN2_LVL2;
НоваяСтрокаDBF.CAN2_LVL3 = БД.CAN2_LVL3 ;
НоваяСтрокаDBF.CAN2_LVL4 = БД.CAN2_LVL4;
НоваяСтрокаDBF.CAN2_LVL5 = БД.CAN2_LVL5 ;
НоваяСтрокаDBF.CAN2_LVL6 = БД.CAN2_LVL6;
НоваяСтрокаDBF.CAN3_MHS = БД.CAN3_MHS ;
НоваяСтрокаDBF.COUNTER1 = БД.COUNTER1;
НоваяСтрокаDBF.COUNTER2 = БД.COUNTER2 ;
НоваяСтрокаDBF.COUNTER3 = БД.COUNTER3;
НоваяСтрокаDBF.COUNTER4 = БД.COUNTER4 ;
НоваяСтрокаDBF.COUNTER5 = БД.COUNTER5;
НоваяСтрокаDBF.COUNTER6 = БД.COUNTER6 ;
НоваяСтрокаDBF.COUNTER7 = БД.COUNTER7;
НоваяСтрокаDBF.COUNTER8 = БД.COUNTER8 ;
НоваяСтрокаDBF.DATETIME = БД.DATETIME;
НоваяСтрокаDBF.DISTANCE = БД.DISTANCE ;
НоваяСтрокаDBF.FUEL1 = БД.FUEL1;
НоваяСтрокаDBF.FUEL2 = БД.FUEL2 ;
НоваяСтрокаDBF.FUEL3 = БД.FUEL3;
НоваяСтрокаDBF.FUEL4 = БД.FUEL4 ;
НоваяСтрокаDBF.I1 = БД.I1;
НоваяСтрокаDBF.I2 = БД.I2 ;
НоваяСтрокаDBF.I3 = БД.I3;
НоваяСтрокаDBF.I4 = БД.I4 ;
НоваяСтрокаDBF.I5 = БД.I5;
НоваяСтрокаDBF.I6 = БД.I6 ;
НоваяСтрокаDBF.I7 = БД.I7;
НоваяСтрокаDBF.I8 = БД.I8 ;
НоваяСтрокаDBF.LATITUDE = БД.LATITUDE;
НоваяСтрокаDBF.LEVEL1 = БД.LEVEL1 ;
НоваяСтрокаDBF.LEVEL2 = БД.LEVEL2;
НоваяСтрокаDBF.LEVEL3 = БД.LEVEL3 ;
НоваяСтрокаDBF.LEVEL4 = БД.LEVEL4;
НоваяСтрокаDBF.LLS1 = БД.LLS1 ;
НоваяСтрокаDBF.LLS2 = БД.LLS2 ;
НоваяСтрокаDBF.LLS3 = БД.LLS3 ;
НоваяСтрокаDBF.LLS4 = БД.LLS4 ;
НоваяСтрокаDBF.LLS5 = БД.LLS5 ;
НоваяСтрокаDBF.LLS6 = БД.LLS6 ;
НоваяСтрокаDBF.LLS7 = БД.LLS7 ;
НоваяСтрокаDBF.LLS8 = БД.LLS8 ;
НоваяСтрокаDBF.LONGITUDE = БД.LONGITUDE ;
НоваяСтрокаDBF.SERNUM = БД.SERNUM;
НоваяСтрокаDBF.SPEED = БД.SPEED ;
НоваяСтрокаDBF.T1 = БД.T1;
НоваяСтрокаDBF.T2 = БД.T2 ;
НоваяСтрокаDBF.T3 = БД.T3;
НоваяСтрокаDBF.T4 = БД.T4 ;
НоваяСтрокаDBF.T5 = БД.T5;
НоваяСтрокаDBF.T6 = БД.T6 ;
НоваяСтрокаDBF.T7 = БД.T7;
НоваяСтрокаDBF.T8 = БД.T8 ;
НоваяСтрокаDBF.TDATETIME = БД.TDATETIME;
НоваяСтрокаDBF.TYPE = БД.TYPE ;
НоваяСтрокаDBF.VOLTAGE = БД.VOLTAGE;
НоваяСтрокаDBF.W_IDD = БД.W_IDD ;
НоваяСтрокаDBF.W_T1 = БД.W_T1;
НоваяСтрокаDBF.W_T2 = БД.W_T2 ;
НоваяСтрокаDBF.W_T3 = БД.W_T3;
НоваяСтрокаDBF.W_T4 = БД.W_T4 ;
НоваяСтрокаDBF.W_T5 = БД.W_T5;
НоваяСтрокаDBF.W_T6 = БД.W_T6 ;
НоваяСтрокаDBF.W_T7 = БД.W_T7;
НоваяСтрокаDBF.W_T8 = БД.W_T8 ;
КонецЦикла;
БД.ЗакрытьФайл();
ИмяФайлаБазыDBF = "";

Теперь ловим переходы из состояния 0 В число > 0... включение крановой установки, переход в 0 отключение.


ВключениеДатчика3 = 0 ;

для каждого стр10 из ДанныеОбработеКрановойУст ановки цикл
...
Датчик3 = стр10.I3 ; <******* вот обращение к датчику 3.
...



По правильному пути идем или нет?

Смущает то, что информация в автографе в мониторинге по датчику2 и данным получаемых 1с кой через оле по датчику 3 - одинаковые.

при открытии инфы : нажать ... левые "CTRL" + "ALT" + нажать правый "ALT"
..........
Видим все о работе датчиков всех...

Как быть?

Добавлено через 16 минут
В настройках у крана... двойной клик по крану, в выпадающем окне закладка 'Датчики' > 'Дискретные датчики' > Д2 вкл. = I2 выкл. , далее по строке питание галка установлена.

Добавлено через 24 минуты
Сорри. Разобрались ... У разных кранов разные датчики подключены. Надо у каждого крана делать привязку к нужному датчику.
Леонид Борисович вне форума   Ответить с цитированием