Имя: Пароль:
1C
1С v8
8.2. Зависает формирование печ формы из макета Word
,
0 SOLO1C
 
17.07.11
13:46
Проблема собственно в сабже.
По сути - в документе (договор) около 40 параметров.
При замене параметров на значения в типовом коде (БСП) для каждой области перебираются все параметры и происходит замена.

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

Нико не сталкивался, чем лечить? может изменить стандартный код чтоб для каждой области перебирались толкьо параметры относяшсиеся к ней ?
Тогда придется типовые участки переписывать (.
1 SOLO1C
 
17.07.11
14:02
Висит собственно не наглухо но мин 10 это слишком для формирования 1й формы, как по мне.
2 SOLO1C
 
17.07.11
16:19
Кто знает как в Word-e проверить статус готовности ?
3 skunk
 
17.07.11
16:26
поставь птички по шагам ... пусть чирикуют походу выполнения ... смотреть там где заткенеться
4 Икогнито
 
17.07.11
16:36
неубитые процессы Word поубивай
5 SOLO1C
 
17.07.11
16:46
(3)да в том то и дело что не затыкается если из отладчика
6 SOLO1C
 
17.07.11
16:46
(4)убивал, дело не в этом
7 DSSS
 
17.07.11
16:50
Может (3) имел в виду
......
Сообщить("Ща буду выполнять вот это")
......
Сообщить("Ща буду выполнять вот это")
8 SOLO1C
 
17.07.11
16:59
(7) может, это вариант
Кстати заметил такую штуку , при формировании этой же формы повторно - никаких зависаний - 5 секунд и форма на выходе.

При этом процессы закрываются как положено.
9 SOLO1C
 
17.07.11
16:59
Что же тогда такого полезного остается в памяти.....
После перезапуска самой 1с - снова долго...
10 SOLO1C
 
17.07.11
17:10
(7) (3) Принципи я нажимал паузу во время зависания и после отвисания прога останавливалась в той функции которая делает поиск и замену, т.е. работает с вердом.

Хз только почему она виснет (
11 Икогнито
 
17.07.11
17:11
код выложи
12 Икогнито
 
17.07.11
17:12
самостоятельно ворд руками открой
13 SOLO1C
 
17.07.11
17:16
(12) Это зачем ? Сомневаешься что откроется?
Код функци где замена

Функция ВыполнитьЗамену(знач ActiveDocument, ТекстДляПоиска, ТекстЗамены)
   Сообщить(Строка(ТекущаяДата())+"Начало замена "+ ТекстДляПоиска+" на "+ТекстЗамены);
   Range = ActiveDocument.Content;
   Поиск = Range.Find;
   Поиск.ClearFormatting();
   Поиск.Execute("{v8 " + ТекстДляПоиска + "}");
   Если Поиск.Found Тогда
       Range.Text = Строка(ТекстЗамены);
       Возврат Истина;
   КонецЕсли;
   Сообщить(Строка(ТекущаяДата())+"Конец замена "+ ТекстДляПоиска+" на "+ТекстЗамены);
   Возврат Ложь;
   
КонецФункции
14 SOLO1C
 
17.07.11
17:17
После установки флажков видно - что зависает оно хаотично при заполнении любой области и колонтитулов и общей.
15 Икогнито
 
17.07.11
17:18
(13) чтбобы убедиться, что глюков нет
16 SOLO1C
 
17.07.11
17:21
(13) Верд пустой открывается... да и с доком тоже. вопрос не в открытии а в его занятости чем-то....

Самая странность, что при повторной печати и поиск происходит быстрее...
17 DSSS
 
17.07.11
17:24
Попробуй ActiveDocument сделать переменной модуля. Для экселя помню мне это помогло, для схожей проблемы.
18 SOLO1C
 
17.07.11
17:25
17.07.2011 16:20:33Начало ВерхнийКолонтитул
17.07.2011 16:22:36Конец ВерхнийКолонтитул
17.07.2011 16:22:40Начало Общий
17.07.2011 16:22:40Начало замена Контрагент на ООО  Асток
17.07.2011 16:22:41Начало замена Фирма на Общество с ограниченной отвественностью "Аргентейра"
17.07.2011 16:22:42Начало замена Состояние на Авторизуется
17.07.2011 16:22:44Конец замена Состояние на Авторизуется
17.07.2011 16:22:44Начало замена НомерДок на ТО11
17.07.2011 16:22:45Начало замена ЕжемесячнаяСтоимость на 400
17.07.2011 16:22:47Конец замена ЕжемесячнаяСтоимость на 400
17.07.2011 16:22:47Начало замена СуммаНеОплаченныхСчетов на 0
17.07.2011 16:22:48Конец замена СуммаНеОплаченныхСчетов на 0
17.07.2011 16:22:48Начало замена Внимание на
17.07.2011 16:22:50Конец замена Внимание на
17.07.2011 16:22:50Начало замена Дата на «17» июня 2011 г.
17.07.2011 16:22:51Начало замена ИННИсполнителя на 7802740122
17.07.2011 16:22:53Начало замена КППИсполнителя на 780201001
17.07.2011 16:22:54Начало замена ТелефоныИсполнителя на +7 (812) 4413739
17.07.2011 16:22:56Начало замена ТелефонИсполнителя на +7 (812) 4413739
17.07.2011 16:22:57Начало замена РасчетныйСчетИсполнителя на 40702810927000005861
17.07.2011 16:22:58Начало замена БанкИсполнителя на ОАО "БАНК САНКТ-ПЕТЕРБУРГ"
17.07.2011 16:23:00Начало замена БикИсполнителя на 044030790
17.07.2011 16:23:01Начало замена АдресБанка на
17.07.2011 16:23:02Конец замена АдресБанка на
17.07.2011 16:23:02Начало замена КСИсполнителя на 30101810900000000790
17.07.2011 16:23:03Начало замена АдресИсполнителя на Санкт-Петербург г, Кантемировская, дом № 12 лит.А, оф. 34-Н, 9
17.07.2011 16:23:04Начало замена ЮрАдресИсполнителя на Санкт-Петербург г, Кантемировская, дом № 12 лит.А, оф. 34-Н, 9
17.07.2011 16:23:06Начало замена ФактАдресИсполнителя на Санкт-Петербург г, Кантемировская, дом № 12 лит.А, оф. 34-Н, 9
17.07.2011 16:23:07Начало замена ЭлПочтаИсполнителя на [email protected]
17.07.2011 16:23:08Начало замена ПочтаИсполнителя на [email protected]
17.07.2011 16:23:09Начало замена СайтИсполнителя на
17.07.2011 16:23:11Начало замена ПочтовыйАдресИсполнителя на Санкт-Петербург г, Кантемировская, дом № 12 лит.А, оф. 34-Н, 9
17.07.2011 16:23:12Начало замена ОГРНИсполнителя на 12828282828
17.07.2011 16:23:14Начало замена ИННЗаказчика на 1111111111
17.07.2011 16:23:15Начало замена КППЗаказчика на
17.07.2011 16:23:16Начало замена ТелефоныЗаказчика на +7 (812) 7567841
17.07.2011 16:23:18Начало замена РасчетныйСчетЗаказчика на
17.07.2011 16:23:19Начало замена БанкЗаказчика на
17.07.2011 16:23:21Начало замена БикЗаказчика на
17.07.2011 16:23:22Начало замена КСЗаказчика на
17.07.2011 16:23:24Начало замена ЮрАдресЗаказчика на
17.07.2011 16:23:25Начало замена ФактАдресЗаказчика на
17.07.2011 16:23:26Начало замена ПочтаЗаказчика на [email protected]
17.07.2011 16:23:28Начало замена ЭлПочтаЗаказчика на [email protected]
17.07.2011 16:23:29Начало замена ПочтовыйАдресЗаказчика на
17.07.2011 16:23:30Начало замена ОГРНЗаказчика на 111111
17.07.2011 16:23:32Конец Общий
17.07.2011 16:23:35Начало Общий
17.07.2011 16:23:35Начало замена НомерДок на ТО11
17.07.2011 16:23:37Начало замена Дата на «17» июня 2011 г.
17.07.2011 16:23:38Конец Общий
17.07.2011 16:23:42Начало Общий
17.07.2011 16:23:42Начало замена НомерДок на ТО11
17.07.2011 16:23:43Конец замена НомерДок на ТО11
17.07.2011 16:23:43Начало замена Дата на «17» июня 2011 г.
17.07.2011 16:23:45Конец Общий
19 SOLO1C
 
17.07.11
17:26
Вот такой лог примерно получается....
и я был не прав - висит только первый раз когда зоходит в эту функцию
20 SOLO1C
 
17.07.11
17:27
Похоже чтение переменных верда просто долго отрабатывает.
21 SOLO1C
 
17.07.11
17:28
17.07.2011 16:26:10Начало ВерхнийКолонтитул
17.07.2011 16:26:10Конец ВерхнийКолонтитул
17.07.2011 16:26:10Начало Общий
17.07.2011 16:26:10Начало замена Контрагент на ООО  Асток
17.07.2011 16:26:10Начало замена Фирма на Общество с ограниченной отвественностью "Аргентейра"
17.07.2011 16:26:10Начало замена Состояние на Авторизуется
17.07.2011 16:26:11Конец замена Состояние на Авторизуется
17.07.2011 16:26:11Начало замена НомерДок на ТО11
17.07.2011 16:26:11Начало замена ЕжемесячнаяСтоимость на 400
17.07.2011 16:26:11Конец замена ЕжемесячнаяСтоимость на 400
17.07.2011 16:26:11Начало замена СуммаНеОплаченныхСчетов на 0
17.07.2011 16:26:11Конец замена СуммаНеОплаченныхСчетов на 0
17.07.2011 16:26:11Начало замена Внимание на
17.07.2011 16:26:11Конец замена Внимание на
17.07.2011 16:26:11Начало замена Дата на «17» июня 2011 г.
17.07.2011 16:26:11Начало замена ИННИсполнителя на 7802740122
17.07.2011 16:26:11Начало замена КППИсполнителя на 780201001
17.07.2011 16:26:11Начало замена ТелефоныИсполнителя на +7 (812) 4413739
17.07.2011 16:26:11Начало замена ТелефонИсполнителя на +7 (812) 4413739
17.07.2011 16:26:11Начало замена РасчетныйСчетИсполнителя на 40702810927000005861
17.07.2011 16:26:11Начало замена БанкИсполнителя на ОАО "БАНК САНКТ-ПЕТЕРБУРГ"
17.07.2011 16:26:11Начало замена БикИсполнителя на 044030790
17.07.2011 16:26:11Начало замена АдресБанка на
17.07.2011 16:26:11Конец замена АдресБанка на
17.07.2011 16:26:11Начало замена КСИсполнителя на 30101810900000000790
17.07.2011 16:26:11Начало замена АдресИсполнителя на Санкт-Петербург г, Кантемировская, дом № 12 лит.А, оф. 34-Н, 9
17.07.2011 16:26:11Начало замена ЮрАдресИсполнителя на Санкт-Петербург г, Кантемировская, дом № 12 лит.А, оф. 34-Н, 9
17.07.2011 16:26:11Начало замена ФактАдресИсполнителя на Санкт-Петербург г, Кантемировская, дом № 12 лит.А, оф. 34-Н, 9
17.07.2011 16:26:11Начало замена ЭлПочтаИсполнителя на [email protected]
17.07.2011 16:26:11Начало замена ПочтаИсполнителя на [email protected]
17.07.2011 16:26:11Начало замена СайтИсполнителя на
17.07.2011 16:26:11Начало замена ПочтовыйАдресИсполнителя на Санкт-Петербург г, Кантемировская, дом № 12 лит.А, оф. 34-Н, 9
17.07.2011 16:26:11Начало замена ОГРНИсполнителя на 12828282828
17.07.2011 16:26:11Начало замена ИННЗаказчика на 1111111111
17.07.2011 16:26:11Начало замена КППЗаказчика на
17.07.2011 16:26:11Начало замена ТелефоныЗаказчика на +7 (812) 7567841
17.07.2011 16:26:11Начало замена РасчетныйСчетЗаказчика на
17.07.2011 16:26:11Начало замена БанкЗаказчика на
17.07.2011 16:26:12Начало замена БикЗаказчика на
17.07.2011 16:26:12Начало замена КСЗаказчика на
17.07.2011 16:26:12Начало замена ЮрАдресЗаказчика на
17.07.2011 16:26:12Начало замена ФактАдресЗаказчика на
17.07.2011 16:26:12Начало замена ПочтаЗаказчика на [email protected]
17.07.2011 16:26:12Начало замена ЭлПочтаЗаказчика на [email protected]
17.07.2011 16:26:12Начало замена ПочтовыйАдресЗаказчика на
17.07.2011 16:26:12Начало замена ОГРНЗаказчика на 111111
17.07.2011 16:26:12Конец Общий
17.07.2011 16:26:12Начало Общий
17.07.2011 16:26:12Начало замена НомерДок на ТО11
17.07.2011 16:26:12Начало замена Дата на «17» июня 2011 г.
17.07.2011 16:26:12Конец Общий
17.07.2011 16:26:12Начало Общий
17.07.2011 16:26:12Начало замена НомерДок на ТО11
17.07.2011 16:26:12Конец замена НомерДок на ТО11
17.07.2011 16:26:12Начало замена Дата на «17» июня 2011 г.
17.07.2011 16:26:12Конец Общий
22 DSSS
 
17.07.11
17:28
что с (17)?
23 SOLO1C
 
17.07.11
17:28
это на 2й раз без перезапуска 1с
24 SOLO1C
 
17.07.11
17:29
(22)Общий модуль Клиентский
Сейчас попробую если можно ее там объявить...
25 SOLO1C
 
17.07.11
17:32
Функция ВыполнитьЗаменуВВерхнемКолонтитуле(COMСоединение, ТекстДляПоиска, ТекстЗамены)
   
   Range = COMСоединение.ActiveDocument.Sections(1).Headers.Item(1).Range;
   Поиск = Range.Find;
   Поиск.ClearFormatting();
   Поиск.Execute("{v8 " + ТекстДляПоиска + "}");
   Если Поиск.Found Тогда
       Range.Text = ТекстЗамены;
       Возврат Истина;
   КонецЕсли;
   
   Возврат Ложь;
   
КонецФункции

вот эта строка похоже ппц
Range = COMСоединение.ActiveDocument.Sections(1).Headers.Item(1).Range;

(22) переменную объявить сложновато там соединение из модуль в модуль передается...
26 SOLO1C
 
17.07.11
18:05
Кстати проверил в БСП - такая же фигня ( так что навернео придется смириться...
27 SOLO1C
 
17.07.11
18:05
имею ввиду в демке
28 d_koz
 
17.07.11
18:46
(0) попробуй замени шаблон ворда, который он по умолчанию использует, у меня из-за этого подобная проблема была, полотчета выгружалось в ворд,потом ворд благополучно зависал на полпути...тоже танцы с бубном устраивал, пока причину не нашел...на одном компе работало все ок, на втором долго не мог найти причину