PDA

Просмотр полной версии : Програмирование в 1С


anriradex
20.03.2012, 08:38
Нужно вытянуть в 1С пробег с превышением скорости, и пробег вне геозоны. Подскажите какие команды нужно использовать что то не могу найти такой.

csistra
21.03.2012, 06:16
помоему звучит некоректно совсем.
откуда и куда может укажите ?

SK
21.03.2012, 07:14
Копать (в зависимости от способа обмена данными) тут:
http://gyazo.com/27bbd1f4d22c753b1ef984a81c9fc52b.png

или тут:

http://gyazo.com/8d03938c4b2c8931295736a07f2ef243.png

anriradex
21.03.2012, 16:45
откуда и куда может укажите ?
В 1С из Автографа с помощю OLE взять пробег с превышением скорости и пробег вне геозоны.

SK
21.03.2012, 18:05
Ну я же Вам дал два варианта. Через массив переменных и через DBF-файл.
На выбор. Как удобнее.

anriradex
26.03.2012, 08:20
Ну че то вобще не можем разобратся. Не могли б ли вы скинуть какой нибудь пример?

SK
26.03.2012, 08:24
Показывайте, что написали. Посмотрим.

anriradex
26.03.2012, 12:42
AG=СоздатьОбъект("AutoGRAPH.AutoGRAPHAutomation");

ddd=AG.WaitForInitializing();

AG.StartComputing("*",СокрЛП(Автомобиль.IDAutograph.П лучить(ДатаДок)),ДатаПоч,Да таКін,"GSM",0);

AG.WaitForComputing("*",СокрЛП(Автомобиль.IDAutograph.П лучить(ДатаДок)),ДатаПоч,Да таКін,"GSM",0);

AG.TripIndex = 1;


ПробегПолный = AG.TripDistance/1000; //Работает


ПробегВнеГеозоны = AG.TripEntriesListTypeName.geozones.stages; //Не работает
//Как задаются параметры: geozones,stages ???

anriradex
26.03.2012, 12:56
еще тут 1755

anriradex
28.03.2012, 13:12
еще тут AG.rar
Возможно я что то не то написал???

SK
28.03.2012, 13:31
Нет. Просто не было времени посмотреть.

anriradex
30.03.2012, 13:06
Подскажите пожалуйста по моему вопросу ну очень нужно.

SK
31.03.2012, 08:58
У меня рабочая машина приказала долго жить... так что оперативно не могу. Сожалею.

anriradex
02.04.2012, 07:52
У меня рабочая машина приказала долго жить...
Надежда на помощь есть?

SK
02.04.2012, 08:18
Через несколько дней. Сегодня привезут новый рабочий ноут, но его надо еще ввести в строй.

anriradex
04.04.2012, 13:04
Жду.

csistra
05.04.2012, 08:19
Через несколько дней. Сегодня привезут новый рабочий ноут, но его надо еще ввести в строй.
расскажите какой же у вас теперь ноут...

SK
05.04.2012, 08:29
Легкий. В плане веса. Т.к. постоянно носимый.

csistra
05.04.2012, 08:31
не уклоняйтесь :)
модель озвучьте.

SK
05.04.2012, 08:44
VAIO VGN-Z21MRN

csistra
05.04.2012, 09:17
чет не вижу цен на него.... вообще снят с производства судя по сайту соньки...
Почем взяли ?:)

SK
05.04.2012, 09:19
Недорого, по блату. А мне работать надо, а не шашечки.

csistra
05.04.2012, 09:25
Хорошо... Теперь ка кобладательно новищего ноута вы наконецто прекратите уверять всех что ноутбуки на 23 рубля это мега дорого и не нужно.

SK
05.04.2012, 09:28
Смотря для кого. Я вообще-то не диспетчер и не занимаюсь мониторингом транспорта предприятия. Каждый решает свой круг задач.

csistra
05.04.2012, 09:37
Не вы ли мне утверждали несколько другую позицию ?
Ладно не будем забивать флудом тему.
Мне все понятно :)

anriradex
09.04.2012, 07:31
Через несколько дней.
Есть уже какой то результат?

anriradex
11.04.2012, 07:24
Через несколько дней.
Есть смисл ждать помощи или нет?:sos:

zsergey
11.04.2012, 07:42
В 1С из Автографа с помощю OLE взять пробег с превышением скорости и пробег вне геозоны.
Вот пример по работе со списками:

Процедура ЗагрузитьКонтрольныеТочки ()

глАГ.TripEntriesListTypeName = "checkpoints";
глАГ.TripEntriesListKindName = "points";

Для Индекс=1 по глАГ.TripEntriesNum Цикл
......
КонецЦикла
КонецПроцедуры

anriradex
17.04.2012, 12:01
:sos::sos::sos::sos::sos::sos::sos:

programmer
17.04.2012, 18:05
anriradex,

Для отрезков вне геозон задайте:
TripEntriesListTypeName = "geozones"
TipEntriesListTypeName = "stages"
Затем пройдитесь циклом по всем записям, суммируя пробег.

Для отрезков с превышением скорости:
TripEntriesListTypeName = "over_speed"
Затем аналогично.

1С тут (http://life-prog.ru/view_cat.php?cat=14) не знаю, но в архиве с описанием OLE есть исходники тестового модуля на Си, а там пример такого циклического перебора записей для заполнения таблицы.

Попробуйте сначала это сделать на уже открытой программе с текущими данными (и сравнить со значениями во вкладках), а затем уже экспериментируйте с WaitForInitializing и StartComputing.

anriradex
19.04.2012, 07:53
Через несколько дней. Сегодня привезут новый рабочий ноут, но его надо еще ввести в строй.
Несколько дней уже прошло а помощи все нет и нет.

zsergey
19.04.2012, 10:27
Несколько дней уже прошло а помощи все нет и нет.
Так уже подсказывали: http://forum.tk-chel.ru/showpost.php?p=29071&postcount=30
Какая еще нужна помощь? :)
PS Совет: позовите друга-программиста 1С

SK
19.04.2012, 10:56
Через несколько дней. Сегодня привезут новый рабочий ноут, но его надо еще ввести в строй.
Несколько дней уже прошло а помощи все нет и нет.
Времени катастрофически не хватает...

См. вложение...
Отпишитесь по результату.

anriradex
20.04.2012, 09:24
Отпишитесь по результату.
Все, есть работает, то что нужно. Делали так же но пропустили одну строчку поетому выдавало нули. Спасибо за помощь.:thumbup: