23.08.2023, 08:05
|
| »»» |
#1
|
Начинающий
Белгород, Белгородская обл, Негабаритика
Регистрация: 29.07.2021
Сообщений: 10
|
СОМ-сервер АвтоГРАФ
Получить данные.
|
|
|
|
23.08.2023, 08:45
|
| »»» |
#2
|
Начинающий
Белгород, Белгородская обл, Негабаритика
Регистрация: 29.07.2021
Сообщений: 10
|
Код:
|
AG.StartComputing ("",НомерУстройства,НачПериода,КонПериода,"GSM",0);
AG.WaitForComputing("",НомерУстройства,НачПериода,КонПериода,"GSM",0);
AG.TripEntriesListTypeName="over_speed" |
Данные получаю по параметрам из настроек объекта мониторинга Максимальный порог ,км.ч 70
Игнорировать превышения 180
Могу ли я передать отличные от настроек в дизайнере параметров параметры в расчет и получить результат?
Последний раз редактировалось Phantom; 26.08.2023 в 06:15.
|
|
|
|
24.08.2023, 09:43
|
| »»» |
#3
|
Начинающий
Белгород, Белгородская обл, Негабаритика
Регистрация: 29.07.2021
Сообщений: 10
|
СОМ-сервер АвтоГРАФ
Добрый день.
Нажмите для просмотра содержимого...
Код:
|
Процедура НарушениеСкоростногоРежима(НомерУстройства,ДатаНачало,ДатаОкончание,ПорогПревышения,ПорогПродолжительности,МассивУчастков)
НачПериода = Формат(ДатаНачало, "ДЛФ=ДВ");
КонПериода = Формат(ДатаОкончание,"ДЛФ=ДВ");
AG = Новый COMОбъект("AutoGRAPH.AutoGRAPHAutomation");
ddd = AG.WaitForInitializing();
AG.WaitForComputing("",НомерУстройства,НачПериода,КонПериода,"GSM",0);
КолРейсов = AG.TripsNum;
МассивУчастков = Новый Массив;
Для ИндексРейса = 1 По КолРейсов Цикл
AG.TripIndex = ИндексРейса;
AG.TripEntriesListTypeName="over_speed";
Для ИндексЗаписи = 1 По AG.TripEntriesNum Цикл
AG.EntryIndex = ИндексЗаписи;
Если НетСигнала(НомерУстройства,AG.EntryStartRealTime,AG.EntryEndRealTime) Тогда
Продолжить;
КонецЕсли;
////////
////////
////////
////////
//////// Обрабатываю результат отчета
////////
////////
////////
////////
КонецЦикла;
КонецЦикла;
КонецПроцедуры |
Результат получаю по значениям параметров в дизайнере параметров объекта мониторинга
- Максимальный порог и игнорировать превышения с продолжительностью менее,с
ВОПРОС: Можно ли передать в расчет свои параметры порога скорости и и длительности нарушения отличные от установленных в дизайнере параметров?
АвтоГРАФ.Pro 7.2
Последний раз редактировалось Phantom; 25.08.2023 в 05:22.
|
|
|
|
25.08.2023, 05:28
|
| »»» |
#4
|
ТехноКом
Челябинск, ООО НПО "ТехноКом"
Регистрация: 28.05.2010
Сообщений: 2,141
|
ngbr, для Вас в редакторе форума предусмотрены коды. Пользуйтесь.
ООО НПО «ТехноКом», г. Челябинск
Попов Дмитрий Александрович, старший инженер по ремонту оборудования
|
|
|
|
28.08.2023, 10:28
|
| »»» |
#5
|
Администратор
Регистрация: 27.05.2010
Сообщений: 29,983
|
Сообщение от ngbr
|
ВОПРОС: Можно ли передать в расчет свои параметры порога скорости и и длительности нарушения отличные от установленных в дизайнере параметров?
|
Нет. Расчет с произвольными параметрами, задаваемыми при вызове расчета, не предусмотрен и даже вреден в плане получения сфальсифицированных данных и утаивания реальных нарушений.
ООО «ТехноКом», г. Челябинск
Самцов Константин Юрьевич - зам. директора по коммерческой деятельности
|
|
|
|
25.10.2023, 12:15
|
| »»» |
#6
|
Дилер
ООО "Системы Контроля и Анализа Транспорта", г. Нижний Новгород
Регистрация: 17.05.2011
Сообщений: 5,672
|
Сообщение от ngbr
|
Добрый день.
Нажмите для просмотра содержимого...
Код:
|
Процедура НарушениеСкоростногоРежима(НомерУстройства,ДатаНачало,ДатаОкончание,ПорогПревышения,ПорогПродолжительности,МассивУчастков)
НачПериода = Формат(ДатаНачало, "ДЛФ=ДВ");
КонПериода = Формат(ДатаОкончание,"ДЛФ=ДВ");
AG = Новый COMОбъект("AutoGRAPH.AutoGRAPHAutomation");
ddd = AG.WaitForInitializing();
AG.WaitForComputing("",НомерУстройства,НачПериода,КонПериода,"GSM",0);
КолРейсов = AG.TripsNum;
МассивУчастков = Новый Массив;
Для ИндексРейса = 1 По КолРейсов Цикл
AG.TripIndex = ИндексРейса;
AG.TripEntriesListTypeName="over_speed";
Для ИндексЗаписи = 1 По AG.TripEntriesNum Цикл
AG.EntryIndex = ИндексЗаписи;
Если НетСигнала(НомерУстройства,AG.EntryStartRealTime,AG.EntryEndRealTime) Тогда
Продолжить;
КонецЕсли;
////////
////////
////////
////////
//////// Обрабатываю результат отчета
////////
////////
////////
////////
КонецЦикла;
КонецЦикла;
КонецПроцедуры |
Результат получаю по значениям параметров в дизайнере параметров объекта мониторинга
- Максимальный порог и игнорировать превышения с продолжительностью менее,с
ВОПРОС: Можно ли передать в расчет свои параметры порога скорости и и длительности нарушения отличные от установленных в дизайнере параметров?
АвтоГРАФ.Pro 7.2
|
А зачем вы балуетесь COM сервером? Не проще работать с АПИ Веб Сервера?
ООО "Системы Контроля и Анализа Транспорта" г. Нижний Новгород
Бородин Николай Олегович, ген. Директор
|
|
|
|
13.11.2023, 02:28
|
| »»» |
#7
|
Дилер
Иркутск, "Эсмиком и К"
Регистрация: 20.03.2017
Сообщений: 346
|
Сообщение от ngbr
|
Добрый день.
ВОПРОС: Можно ли передать в расчет свои параметры порога скорости и и длительности нарушения отличные от установленных в дизайнере параметров?
АвтоГРАФ.Pro 7.2
|
1. Перестаете использовать COM, переходите на Web API
2. Параметризуете через реестр свойств расчёт нужных параметров
3. Пишете в реестр свойств нужные значения свойств перед запросом расчёта.
4. Запрашиваете.
5. Получаете нужный результат.
ООО "Эсмиком и К", г. Иркутск, Иркутская область, Россия
Мартыненко Евгений Сергеевич, главный инженер
|
|
|
|
13.11.2023, 11:15
|
| »»» |
#8
|
Дилер
Екатеринбург, ЗАО "Седьмая Экспедиция"
Регистрация: 14.12.2010
Сообщений: 14,995
|
Сообщение от MartynenkoES
|
1. Перестаете использовать COM, переходите на Web API
|
не всегда это так легко и просто, может быть легко интегрировано в структуру предприятия, где выхода на внешний веб нет, а свой стваить то еще удовольствие
ЗАО "Седьмая Экспедиция", Екатеринбург, РФ
Мушин Виктор Валерьевич, Технический директор
|
|
|
|
08.04.2024, 06:42
|
| »»» |
#9
|
Начинающий
.
Регистрация: 08.04.2024
Сообщений: 3
|
COM-сервер Автограф 4
Добрый день.
Помогите, пожалуйста!
Не могу разобраться как из СОМ-клиента в приложении Автограф 4 открыть нужный вид отрезка данных?
Открываю приложение и нужное ТС за период времени, например следующим образом:
Set AutoGRAPH = CreateObject("AutoGRAPH.AutoGRAPHAutomation")
If InStr(AutoGRAPH.CurrentVersion, "4.0") > 0 Then
AutoGRAPH.ReceiveOnlineData Блок 'обновляем данные по ТС с сервера
AutoGRAPH.StartComputing "*", Блок, ДатаИзИмениФайла, ДатаИзДанных, "GSM", 0
AutoGRAPH.ShowApplication
End If
|
|
|
|
09.04.2024, 16:51
|
| »»» |
#10
|
Администратор
Регистрация: 27.05.2010
Сообщений: 29,983
|
Что значит "нужный вид"???
COM-сервер не предназначен для управления интерфейсом ПО.
Некоторые побочные эффекты в интерфейсе при расчете через COM обусловлены устаревшей архитектурой, от которой избавились в версии 5 и выше.
Почти 10 лет прошло с выхода последней сборки АвтоГРАФ 4.х...
ООО «ТехноКом», г. Челябинск
Самцов Константин Юрьевич - зам. директора по коммерческой деятельности
|
|
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
Ваши права в разделе
|
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения
HTML код Выкл.
|
|
|
Текущее время: 22:56. Часовой пояс GMT.
|
|