Имя: Пароль:
1C
1С v8
1c8.2 Бухгалтерия подсчет времени выполнения отчета
,
0 VBMADD
 
04.06.13
00:17
Привет братьям по разуму!
Подскажите братцы как подсчитать время которое уходит на формирование отчета.

Мои бухгалтера катят бочку что де медленно 1с'ка работает,
потому хочу замерить время формирования отчета и по этому параметру ориентироваться быстро или медленно работает 1с8.

Если можно дайте основу кода для вставления в отчет для подсчета времени выполнения оьчета.

Спасибо всем кто откликнулся.
1 Жирафка
 
04.06.13
00:23
Запись в журнал регистрации
Начало формирования отчета пользователм N
Конец формированияо тчета пользователм N
2 VBMADD
 
04.06.13
00:37
(1)
Какой код то нужно вставить в отчет?
3 VBMADD
 
04.06.13
00:42
Нужно что то типа:


Перем М1;//Конец отчета
Перем м2;//Начало отчета

M2=ТекущаяДата();
//
.....
//
M1=ТекущаяДата();

Сообщить("Время формирования отчета = " + Строка(М1-М2));
4 KUBIK
 
04.06.13
00:52
М2=ТекущееВремя()

М1=ТекущееВремя()
5 VBMADD
 
04.06.13
00:54
(4)
Ща попробую...
6 VBMADD
 
04.06.13
00:56
(4)
Пишет что функция ТекущееВремя() не определена
7 KUBIK
 
04.06.13
00:57
(5) Токо пропарси разицу в выводе, чтобы было: Сообщить("На отчет затрачено "+СтрМин+" мин. " +СтрСек);
8 KUBIK
 
04.06.13
00:59
(6) Это из 7.7 кажись, сорри, перепутал
9 VBMADD
 
04.06.13
01:01
Братцы, я не программёр в 1с,

ну должна же быть какая то функция чтобы определить начало работы и конец работы отчета

а ответить бухгалтершам надо
подсобите с реальным кодом...
10 Dethmont
 
04.06.13
01:36
Ява = Новый COMОбъект("MSScriptControl.ScriptControl");
Ява.Language = "javascript";

ВремяНачала = Ява.Eval("(new Date()).valueOf()");
//Код формирования отчета

ВремяОкончания = Ява.Eval("(new Date()).valueOf()");

ВремяВыполнения = (ВремяОкончания-ВремяНачала)/1000;

ЗаписьЖурналаРегистрации("Формирование отчета - "+ЭтаФорма.Заголовок+" пользователем: "+ПараметрыСеанса.ТекущийПользователь, , , "Время формирования отчета составило: "+ВремяВыполнения , "####");
11 Dethmont
 
04.06.13
01:37
В мс
12 VBMADD
 
04.06.13
01:42
(10) Круто завернул, ну ща буду пробовать...
А пока спасибо...
13 VBMADD
 
04.06.13
01:54
(11) Усе пашет спасибо, а как округлить ВремяВыполнения до целого?
14 Dethmont
 
04.06.13
02:06
Ява = Новый COMОбъект("MSScriptControl.ScriptControl");
Ява.Language = "javascript";

ВремяНачала = ТекущаяДата();
//Код формирования отчета


ВремяОкончания = ТекущаяДата();

ВремяВыполнения = (ВремяОкончания-ВремяНачала);

ЗаписьЖурналаРегистрации("Формирование отчета - "+ЭтаФорма.Заголовок+" пользователем: "+ПараметрыСеанса.ТекущийПользователь, , , "Время формирования отчета составило: "+ВремяВыполнения+" сек." , "####");
15 Dethmont
 
04.06.13
02:07
Это нафиг не надо тогда
Ява = Новый COMОбъект("MSScriptControl.ScriptControl");
Ява.Language = "javascript";
16 VBMADD
 
04.06.13
02:15
Выручил, спасибо!
Отчет реально выполняется за 24 сек, блин а разговоров что медленно работает 1с'ка
Носом придется потыкать лодырей бухгалтеров в реальные факты!!!
17 ДенисЧ
 
04.06.13
05:27
(16) 24 секунды????
Это что за рокет - сайенс вы обсчитываете? В 1с отчёты олжны выполняться за 1, максмимум 2 секунды!
AdBlock убивает бесплатный контент. 1Сергей