Показать сообщение отдельно
Старый 15.10.2007, 18:53     # 3108
EnigMan
Member
 
Аватар для EnigMan
 
Регистрация: 21.11.2003
Адрес: 45-я параллель
Пол: Male
Сообщения: 230

EnigMan Косячил раньше, старается исправиться
Предприятие 7.7
Подскажите где я напутал
Цитата:
Процедура СвязьПрометей()
Если ПустоеЗначение(СокрЛП(НомерПрометей))=1 Тогда
Предупреждение("Чтобы получить значение задолженности по абоненту необходимо внести абонентский номер");
Возврат;
КонецЕсли;
Если ТипЗначенияСТР(v7)<>"OLE" Тогда
v7=СоздатьОбъект("V1CEnterprise.Application");
rezult=v7.initialize(v7.RMTrade,"/D"+Константа.Прометей+" /NАгент","");
если rezult=0 ТОгда
Предупреждение("Попытка подключения к базе Прометей провалилась"+РазделительСтрок+"поэтому получить информацию о долгах абонента невозможно");
Возврат;
КонецЕсли;
КонецЕсли;
//теперь можно получать итоги
спрАбоненты=v7.CreateObject("Справочник.Абоненты");
Если спрАбоненты.НайтиПоКоду(НомерПрометей)=1 Тогда
ит=v7.CreateObject("БухгалтерскиеИтоги");
Ит.ОсновныеИтоги();
долг=ит.СКД("62","С",,спрАбоненты.ТекущийЭлемент());
сообщить ("Долг абонента "+НомерПрометей+" - "+долг+" руб");
КонецЕсли;

КонецПроцедуры
сей код выдает ошибку
Цитата:
спрАбоненты=v7.CreateObject("Справочник.Абоненты");
{Справочник.Контрагенты.Форма.Модуль(320)}: Поле агрегатного объекта не обнаружено (CreateObject)
Обе конфы написаны на компоненте БухгалтерскийУчет, также на компьютере установлена "Зарплата и Кадры" в отдльный каталог, т.к. ЗиК на 3х пользователей, а бух соответсвенно без ограничения.
Цитата:
Поле агрегатного объекта не обнаружено
такое сообщение вылазит при использовании любых методов OLE Automation Server
__________________
Никогда не спорьте с идиотом. Сначала он опустит вас до своего уровня, а потом выиграет, так как у него большой опыт

Последний раз редактировалось EnigMan; 15.10.2007 в 19:10.
EnigMan вне форума