СоздатьДокумент() не работает
24.05.2007
21:40
#1
"из под бухгалтерии 80 подклучилась ч/з OLE к ТИС забрала необходимые данные. Хочу в бух 80 создать новый документ, а он гад пишет "Метод не обнаружен". Выглядит это приблизительно так
Для Каждого ТекущаяСтрока ИЗ ТЗ Цикл
НомДок = ТекущаяСтрока.НомерДокумента;
ДатДок = ТекущаяСтрока.ДатаДокумента;
Док = v7.createObject("Документ.ВводОстатковТМЦ");
Если Док.НайтиПоНомеру(НомДок,ДатДок) = 1 Тогда
КонтрКод = Док.Контрагент.Код;
Контрагент = Док.Контрагент;
ДоговорКод = Док.Договор.Код;
СкладКод = Док.Склад.Код;
Склад = Док.Склад;
ДокОпер = Документы.ОперацияБух;
Опер = ДокОпер.СоздатьДокумент();// а вот здесь он ругается
Опер.Дата = Док.ДатаДок;
Пробовала Опер = Метаданные.Документы.ОперацияБух.СоздатьДокумент() // все равно не хочет
Что делать подскажите?
"
Для Каждого ТекущаяСтрока ИЗ ТЗ Цикл
НомДок = ТекущаяСтрока.НомерДокумента;
ДатДок = ТекущаяСтрока.ДатаДокумента;
Док = v7.createObject("Документ.ВводОстатковТМЦ");
Если Док.НайтиПоНомеру(НомДок,ДатДок) = 1 Тогда
КонтрКод = Док.Контрагент.Код;
Контрагент = Док.Контрагент;
ДоговорКод = Док.Договор.Код;
СкладКод = Док.Склад.Код;
Склад = Док.Склад;
ДокОпер = Документы.ОперацияБух;
Опер = ДокОпер.СоздатьДокумент();// а вот здесь он ругается
Опер.Дата = Док.ДатаДок;
Пробовала Опер = Метаданные.Документы.ОперацияБух.СоздатьДокумент() // все равно не хочет
Что делать подскажите?
"
24.05.2007
22:08
#2
"сдается мне, что в конструкции:
ДокОпер = Документы.ОперацияБух;
Опер = ДокОпер.СоздатьДокумент();
вы пытаесь работать по ссылке на объект, а не с самим объектом. вот что в описании языка:
НовыйДок = Документы.ПеремещениеТоваров.СоздатьДокумент();
НовыйДок.Дата = ПолеВводаДаты;
НовыйДок.УстановитьВремя();
попробуйте ДокОпер = Документы.ОперацияБух.СоздатьДокумент();
а обращаться к метаданным для создания объекта - об этом лучше никому не говорите -)
"
ДокОпер = Документы.ОперацияБух;
Опер = ДокОпер.СоздатьДокумент();
вы пытаесь работать по ссылке на объект, а не с самим объектом. вот что в описании языка:
НовыйДок = Документы.ПеремещениеТоваров.СоздатьДокумент();
НовыйДок.Дата = ПолеВводаДаты;
НовыйДок.УстановитьВремя();
попробуйте ДокОпер = Документы.ОперацияБух.СоздатьДокумент();
а обращаться к метаданным для создания объекта - об этом лучше никому не говорите -)
"
Читают тему
(гостей: 1)