Имя: Пароль:
1C
 
v7: как вставить паузу при пакетном проведении документов без ВК в цикле ?
0 Evg
 
27.10.06
05:10
текст модуля типа, необходима управляемая пауза между проведениями

списокдоков=СписокЗначений;
Для сч=1 По списокдоков Цикл
   списокдоков.ПолучитьЗначение(сч,).Провести();
КонецЦикла;
1 Морозов Александр
 
27.10.06
05:15
и чего?
2 Злопчинский
 
27.10.06
05:15
смотри в поиске и базе знаний - sleep и romix
3 Морозов Александр
 
27.10.06
05:16
нето...
4 VladZ
 
27.10.06
05:22
(0) Слишком быстро проводятся?
5 Evg
 
27.10.06
05:38
(4) Мешают другим, натыкаются на блокировки других
6 Морозов Александр
 
27.10.06
05:41
Форма.ОбработкаОжидания()
7 Лефмихалыч
 
27.10.06
05:42
Процедура глВремя_Задержка(чСекунд) Экспорт

   ИмяПутьСкрипта = КаталогПользователя()+"sleep.js";
   
   Скрипт = СоздатьОбъект("Текст");
   
   Скрипт.ДобавитьСтроку("WScript.Sleep("+Строка(1000*чСекунд)+");");
   
   Скрипт.Записать(ИмяПутьСкрипта);
   
   cmdLine="wscript.exe "+ИмяПутьСкрипта;
   
   WshShell = СоздатьОбъект("WScript.Shell");
   
   WshShell.Run(cmdLine, 0, -1);
   
   ФСО.DeleteFile(ИмяПутьСкрипта);

КонецПроцедуры
8 smaharbA
 
27.10.06
05:43
(7) зачем делете ?
9 КВАДРО2
 
27.10.06
05:50
(0) pause
10 DenLaDen
 
27.10.06
06:08
(0)Вставь в цикл
Предупреждение("",<ТвояЗадержкаВСекундах>)
11 DenLaDen
 
27.10.06
06:09
(5) а что ВК Ромикса не подходит?
12 vcv
 
27.10.06
06:49
(10) Этот метод глючит, если запустить 1С в терминале и отключиться от сеанса.
13 Evg
 
27.10.06
06:56
Функцию в обработкеожидания можно использовать ?
14 smaharbA
 
27.10.06
07:15
(12) Правдо ?
ВвестиСтроку( - и не глючит и ВК ненада
15 vcv
 
27.10.06
07:36
(14) Правда. Перестает таймаут считать. Возможно связано с какими-то особенностями терминал-сервера. Эффект замечен на Windows 2000 Server Rus SP4.
16 Evg
 
27.10.06
08:13
Как снять Обработкуожидания в форме, после того как все необходимые действия сделаны, не закрывая форму  ?
17 gp42
 
27.10.06
08:22
Заведи константу и изменяй её сколько надо ..... типа
Процедура проводкадока(Список,Сч)
  списокдоков.ПолучитьЗначение(сч,).Провести();
КонецПроцедуры

......
списокдоков=СписокЗначений;
Для сч=1 По списокдоков Цикл
   Если Константа.Таймаут>0 тогда
       ОбработкаОжидания(проводкадока,Константа.Таймаут);
   КонецЕсли;
КонецЦикла;
18 gp42
 
27.10.06
08:24
Процедура проводкадока(Список,Сч)
  список.ПолучитьЗначение(сч,).Провести();
КонецПроцедуры

......
списокдоков=СписокЗначений;
Для сч=1 По списокдоков Цикл
   Если Константа.Таймаут>0 тогда
       ОбработкаОжидания(проводкадока(списокдоков,сч),Константа.Таймаут);
   иначе
       списокдоков.ПолучитьЗначение(сч,).Провести();
   КонецЕсли;
КонецЦикла;
19 gp42
 
27.10.06
08:25
2(16) так подойдет ?
20 Heckfy
 
27.10.06
08:48
2 (0)
Функция Ожидание()
   Х=1;
   Пока Х=1 Цикл
       Если _getperformancecounter()%500=0 Тогда
           Прервать;
       КонецЕсли;  
   КонецЦикла;
КонецФункции
...
списокдоков=СписокЗначений;
Для сч=1 По списокдоков Цикл
   Ожидание();
   списокдоков.ПолучитьЗначение(сч,).Провести();
КонецЦикла;
...
21 Evg
 
27.10.06
09:58
(20) А не ест ли это процессорное время ?
22 smaharbA
 
27.10.06
10:11
(15) Ты пост (14) внимательно прочел ? Рекомендую каждый вечер на сон грядущий в течение недели...
(тоже самое и всем ниже)
23 romix
 
модератор
27.10.06
13:39
Есть аккуратный способ через WScript...
Типа выполнение кода без создания внешнего файла...
24 Evg
 
27.10.06
13:51
(23) Более интересна через Обраоткуожидания, ведь пользователь может параллельно помаленьку работать
25 asady
 
27.10.06
13:57
(24) это как? между проведениями доков?
26 romix
 
модератор
27.10.06
13:58
(24) Пакетное проведение заблокирует обработку ожидания.
27 Evg
 
27.10.06
14:01
(27) Сначала составлю список доков для перепроведения, ну а потом из списка выдергиваю по одному доки для фонового проведения .
28 Evg
 
27.10.06
14:01
В общем красота
29 у лю 427
 
27.10.06
14:02
лохи... смотрим второй (или третий) параметр в Предупреждение...
30 Evg
 
27.10.06
14:14
(29) что-то не понял, у предупреждения 2 параметра
Предупреждение(<?>);
Синтаксис:
Предупреждение(<Текст_сообщения>,<Таймаут>)
Назначение:
Вывести окно предупреждения (модальное).
Параметры:
<Текст_вопроса> - cтрока текста предупреждения;
<Таймаут> - число секунд времени показа окна предупреждения (если опущен или 0, то без ограничения).
31 romix
 
модератор
27.10.06
14:16
(29) Оно не всегда срабатывает (например когда окно не активное в Терминале, у меня это затыкается).

Кстати внешнюю компоненту можно загрузить через vkloader...
2 + 2 = 3.9999999999999999999999999999999...