Вопрос: СОМ-сервер АвтоГРАФ

[ngbr]

Получить данные.

[ngbr]

AG.StartComputing  ("",НомерУстройства,НачПериода,КонПериода,"GSM",0); 
      AG.WaitForComputing("",НомерУстройства,НачПериода,КонПериода,"GSM",0);
AG.TripEntriesListTypeName="over_speed"

Данные получаю по параметрам из настроек объекта мониторинга Максимальный порог ,км.ч 70
Игнорировать превышения 180
Могу ли я передать отличные от настроек в дизайнере параметров параметры в расчет и получить результат?

[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

[Phantom]

ngbr, для Вас в редакторе форума предусмотрены коды. Пользуйтесь.

[SK]

ВОПРОС: Можно ли передать в расчет свои параметры порога скорости и и длительности нарушения отличные от установленных в дизайнере параметров?

Нет. Расчет с произвольными параметрами, задаваемыми при вызове расчета, не предусмотрен и даже вреден в плане получения сфальсифицированных данных и утаивания реальных нарушений.

[NickolaDed]

Добрый день.

Нажмите для просмотра содержимого...

Код:

Процедура НарушениеСкоростногоРежима(НомерУстройства,ДатаНачало,ДатаОкончание,ПорогПревышения,ПорогПродолжительности,МассивУчастков) НачПериода = Формат(ДатаНачало, "ДЛФ=ДВ"); КонПериода = Формат(ДатаОкончание,"ДЛФ=ДВ"); 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 сервером? Не проще работать с АПИ Веб Сервера?

[MartynenkoES]

Добрый день.

ВОПРОС: Можно ли передать в расчет свои параметры порога скорости и и длительности нарушения отличные от установленных в дизайнере параметров?
АвтоГРАФ.Pro 7.2

1. Перестаете использовать COM, переходите на Web API
2. Параметризуете через реестр свойств расчёт нужных параметров
3. Пишете в реестр свойств нужные значения свойств перед запросом расчёта.
4. Запрашиваете.
5. Получаете нужный результат.

[plex]

1. Перестаете использовать COM, переходите на Web API

не всегда это так легко и просто, может быть легко интегрировано в структуру предприятия, где выхода на внешний веб нет, а свой стваить то еще удовольствие

[Федоров Павел]

Добрый день.
Помогите, пожалуйста!
Не могу разобраться как из СОМ-клиента в приложении Автограф 4 открыть нужный вид отрезка данных?
Открываю приложение и нужное ТС за период времени, например следующим образом:
Set AutoGRAPH = CreateObject("AutoGRAPH.AutoGRAPHAutomation")
If InStr(AutoGRAPH.CurrentVersion, "4.0") > 0 Then
AutoGRAPH.ReceiveOnlineData Блок 'обновляем данные по ТС с сервера
AutoGRAPH.StartComputing "*", Блок, ДатаИзИмениФайла, ДатаИзДанных, "GSM", 0
AutoGRAPH.ShowApplication
End If

[SK]

Что значит "нужный вид"???
COM-сервер не предназначен для управления интерфейсом ПО.
Некоторые побочные эффекты в интерфейсе при расчете через COM обусловлены устаревшей архитектурой, от которой избавились в версии 5 и выше.
Почти 10 лет прошло с выхода последней сборки АвтоГРАФ 4.х...