Имя: Пароль:
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Начало замена ЭлПочтаИсполнителя на clients@av-buh.ru
17.07.2011 16:23:08Начало замена ПочтаИсполнителя на clients@av-buh.ru
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Начало замена ПочтаЗаказчика на gaman.os@yandex.ru
17.07.2011 16:23:28Начало замена ЭлПочтаЗаказчика на gaman.os@yandex.ru
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Начало замена ЭлПочтаИсполнителя на clients@av-buh.ru
17.07.2011 16:26:11Начало замена ПочтаИсполнителя на clients@av-buh.ru
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Начало замена ПочтаЗаказчика на gaman.os@yandex.ru
17.07.2011 16:26:12Начало замена ЭлПочтаЗаказчика на gaman.os@yandex.ru
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) попробуй замени шаблон ворда, который он по умолчанию использует, у меня из-за этого подобная проблема была, полотчета выгружалось в ворд,потом ворд благополучно зависал на полпути...тоже танцы с бубном устраивал, пока причину не нашел...на одном компе работало все ок, на втором долго не мог найти причину
Пользователь не знает, чего он хочет, пока не увидит то, что он получил. Эдвард Йодан