Hello ClaList,
  Может кому интересно?
  Модуль по формированию и выгрузке отчета в Excel с использованием
  шаблонов для офиса от SoftMasters. Сделан недели три назад. Работал
  не совсем устойчиво, но работал. Т.е. вылетал изредка. Теперь
  постоянно. Фрагмент кода, на котором происходит вылет:
 Message('Трассирование ошибки 1.')
    !Вывод в отчет
    if records(q1)
     MSExcel2.Init(Window,?SMExcel,1,1,1)
 Message('Трассирование ошибки 2.')
 Первое сообщение еще выводится, затем "...fin.ехе вызвало ошибку и
 будет закрыто..."
 Проблема пока не решена. Лог Ватсона прилагаю.
 Есть подозрение, что программа здесь не причем. Хотя вылеты
 происходят на разных машинах, из под разных систем, при загрузке
 локальной или с сети.
-- 
Best regards,
 gorky                          mailto:gorky@sv3.net.ua
(Добавление)
Какая ОС, и какой MS Office?
-- 
Best regards,
 Alexander                            mailto:aperepechay@aktour.com
Написал: ClaList(2)
			
			
									
						Вылет при использованиие OfficeTeplate
Модератор: Дед Пахом
					Правила форума
При написании вопроса или обсуждении проблемы, не забывайте указывать версию Clarion который Вы используете.
А так же пользуйтесь спец. тегами при вставке исходников!!!
	При написании вопроса или обсуждении проблемы, не забывайте указывать версию Clarion который Вы используете.
А так же пользуйтесь спец. тегами при вставке исходников!!!
- 
				Гость
 
- 
				Гость
 
Вдогонку. ОС здесь не причем.
Если я включаю объект "как положено", как отдельный embed, до начала
выборки, то все ок. Это ж как-то неправильно. Вдруг выводить нечего, а
Excel уже пошел. (см *1)
Если тот же текст руками вставить ниже (см.*2), а *1 убрать - то вылет
    
--
Best regards,
gorky
Написал: ClaList(2)
			
			
									
						Если я включаю объект "как положено", как отдельный embed, до начала
выборки, то все ок. Это ж как-то неправильно. Вдруг выводить нечего, а
Excel уже пошел. (см *1)
Если тот же текст руками вставить ниже (см.*2), а *1 убрать - то вылет
Код: Выделить всё
*1  MSExcel2.Init(Window,?SMExcel,1,1,1)
      ! [Priority 4049]
          Message('Трассирование ошибки 0.')
          free(q1)
          PLA:date=Loc:dateEnd; set(PLA:d,PLA:d)
          loop until access:plat.next()
               ...
          .
          Message('Трассирование ошибки 1.')
          !Вывод в отчет
          if records(q1)
*2           MSExcel2.Init(Window,?SMExcel,1,1,1)
             Message('Трассирование ошибки 2.')
--
Best regards,
gorky
Написал: ClaList(2)
- 
				Гость
 
