Уж простите за мою тупость, но как? Делаю так:
РСЮрЛица = СоздатьОбъект("ODBCRecordSet");
РСЮрЛица.УстБД(ОДБЦБаза);
РСЮрЛица.Подготовить("{call p_Insert_Juridical_Perosn (?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)}");
РСЮрЛица.ДобПараметр(1,15,20,0,"@asABBREVIATED_NAME");//asABBREVIATED_NAME
РСЮрЛица.ДобПараметр(1,15,300,0,"@asFIRM_NAME");//asFIRM_NAME
РСЮрЛица.ДобПараметр(1,15,12,0,"@asINN");//asINN
РСЮрЛица.ДобПараметр(1,15,20,0,"@asTelePhone");//asTelePhone
РСЮрЛица.ДобПараметр(1,15,30,0,"@asCountry");//asCountry
РСЮрЛица.ДобПараметр(1,15,30,0,"@asState");//asState
РСЮрЛица.ДобПараметр(1,15,30,0,"@asCity");//asCity
РСЮрЛица.ДобПараметр(1,15,30,0,"@asStreet");//asStreet
РСЮрЛица.ДобПараметр(1,15,10,0,"@asHouse_Number");//asHouse_Number
РСЮрЛица.ДобПараметр(1,15,10,0,"@asApartment_Number");//asApartment_Number
РСЮрЛица.ДобПараметр(1,15,30,0,"@asRegion");//asRegion
РСЮрЛица.ДобПараметр(1,15,10,0,"@asZip");//asZip
РСЮрЛица.ДобПараметр(1,15,10,0,"@asBuilding");//asBuilding
РСЮрЛица.ДобПараметр(1,15,40,0,"@asNP");//asNP
РСЮрЛица.ДобПараметр(2,4,8,0,"@asRet");//asRet
//.....
РСЮрЛица.УстПараметр(1,СокрЛП(ЛЕВ(Контрагент.Наименование,20)));
РСЮрЛица.УстПараметр(2,СокрЛП(ЛЕВ(Контрагент.ПолнНаименование,300)));
РСЮрЛица.УстПараметр(3,СокрЛП(ЛЕВ(Контрагент.ИНН,12)));
РСЮрЛица.УстПараметр(4,СокрЛП(ЛЕВ(Контрагент.Телефоны,20)));
РСЮрЛица.УстПараметр(5,Страна);
РСЮрЛица.УстПараметр(6,СокрЛП(ЛЕВ(Контрагент.Регион.Наименование,30)));
РСЮрЛица.УстПараметр(7,СокрЛП(ЛЕВ(Контрагент.Город.Наименование,30)));
РСЮрЛица.УстПараметр(8,СокрЛП(ЛЕВ(Контрагент.Улица.ПолноеНазвание,30)));
РСЮрЛица.УстПараметр(9,СокрЛП(ЛЕВ(Контрагент.Дом,10)));
РСЮрЛица.УстПараметр(10,СокрЛП(ЛЕВ(Контрагент.Кв_Оф,10)));
РСЮрЛица.УстПараметр(11,СокрЛП(ЛЕВ(Контрагент.Район.Наименование,30)));
РСЮрЛица.УстПараметр(12,СокрЛП(ЛЕВ(Контрагент.Индекс,10)));
РСЮрЛица.УстПараметр(13,СокрЛП(ЛЕВ(Контрагент.Корпус,10)));
РСЮрЛица.УстПараметр(14,СокрЛП(ЛЕВ(Контрагент.НасПункт.ПолноеНазвание,40)));
Рез = РСЮрЛица.ВыполнитьИнструкцию();
ВозвращаемоеЗначение = РСЮрЛица.ПолучПараметр(15); //чтение параметра типа OUTPUT после выполнения.
Если Число(ВозвращаемоеЗначение)=0 Тогда
Сообщить("Уже был "+Рез+ТипЗначенияСтр(ВозвращаемоеЗначение));
Иначе
Сообщить("Добавлен "+Рез+ТипЗначенияСтр(ВозвращаемоеЗначение));
КонецЕсли;
На сервер ничего не отправляется. Может я как-то не так с параметрами работаю? МОжет не в таком порядке всё надо делать? Но я уже всё перепробывал...
Какая строка должна быть, если сделать
РСЮрЛица.Отладка(1);
?
У меня всегда такая:
Цитата:{call p_Insert_Juridical_Perosn (?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)}
P.S. Соединение с базой точно есть. Такой вот код:
РСЮрЛица = СоздатьОбъект("ODBCRecordSet");
РСЮрЛица.УстБД(ОДБЦБаза);
ТекстЗапроса = "
|select top 1 *
|from www_osago_attribute"
;
ТЗ = РСЮрЛица.ВыполнитьИнструкцию(ТекстЗапроса);
ТЗ.ВыбратьСтроку();
Отрабатывает нормально