Показать сообщение отдельно
Старый 12.11.2013, 05:07    | »»» |  #1
Vasiliy_09_05
Начинающий
 
Аватар для Vasiliy_09_05
 
Oren
Регистрация: 11.11.2013
Сообщений: 18
Vasiliy_09_05 is on a distinguished road
По умолчанию Определение данных между остановками ТС в 1с 8

Доброго времени суток Уважаемые Дамы и Господа
Мне необходимо получить информацию о движение ТС в разрезе остановок ТС. Возможно тема замусолена (например тема Интеграция текущей дистанции(CrdEntryDistance)), но я так и не смог найти ответ

Смысл в том, что мне необходимо получить таблицу типа:
Время начала движения|Широта/Долгота|КТ(если движение в КТ)|Время остановки|Широта/Долгота|КТ(если остановка в КТ)|Путь между остановками

Сделал следующий код:
ТСПериодНач=Формат(НачПери ода,"ДФ=dd.MM.yyyy")+" 00:00:00";
ТСПериодКон=Формат(НачПери ода,"ДФ=dd.MM.yyyy")+" 23:59:59";

AG.SetGroupIndexByFieldName(ГрафФайл);
AG.SetCarIndexByDevice (СерийныйНомер);

AG.WaitForComputing (ГрафФайл, СерийныйНомер,ТСПериодНач, ТСПериодКон,"GSM",1);

КолРейс=AG.TripsNum;

Для x=1 По КолРейс Цикл
AG.TripIndex=x;
AG.TripEntriesListTypeName="parks";

КолОстановок=AG.TripEntriesNum;

Для xx=1 По КолОстановок Цикл
AG.EntryIndex=xx;

НовСтрок=ТабОстанов.Добави ть();
НовСтрок.ВремяНачДвиж=AG.Entry StartRealTime;
НовСтрок.НачШиротаДолгота= AG.EntryStartLatitude+" "+AG.EntryStartLongitude;
НовСтрок.НачальнаяТочка=AG.E ntryStartName;

НовСтрок.ВремяКонДвиж=AG.Entry EndRealTime;
НовСтрок.КонШиротаДолгота= AG.EntryEndLatitude+" "+AG.EntryStartLongitude;
НовСтрок.КонечнаяТочка=AG.Ent ryEndName;

НовСтрок.Дистанция=AG.EntryDistan ce;

Но при формировании таблицы хотя время начала движения/остановки верно, широта/долгота начала движения и остановки одинакова (в принципе логично, ведь я проверяю остановки), и неверна дистанция.
Видимо я перепутал такие объекты как Entry и CrdEntry, пытался изменить параметры, но тогда 1с начинает выдавать ошибки

Прошу помощи в оформлении алгоритма

P.S. И еще прошу сильно не пинать, так как Ole-сервером Автографа занимаюсь всего сутки
Vasiliy_09_05 вне форума   Ответить с цитированием