|   |   | 
| 
 | 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... | 
| Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |