Ребят попробывал вот етот код и выбивает ошибку "поле объекту БезНДС не виявленно"
помогите
&НаКлиенте
Процедура ТабличнаяЧасть1НДСПриИзменении(Элемент)
стр=Элементы.ТабличнаяЧасть1.ТекущиеДанные;
стр.ЦенаСНДС=ПолучитьЦенаСНДС(объект.Дата,объект.БезНДС,объект.ставка0,объект.ставка20,объект.ставка7);
КонецПроцедуры
&НаСервере
Функция ПолучитьЦенаСНДС (Дата,БезНДС,ставка0,ставка20,ставка7);
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| ПриходнаяНакладнаяТабличнаяЧасть1.Цена,
| ПриходнаяНакладнаяТабличнаяЧасть1.НДС,
| ПриходнаяНакладнаяТабличнаяЧасть1.ЦенаСНДС,
| НДССрезПоследних.Период,
| НДССрезПоследних.БезНДС,
| НДССрезПоследних.ставка0,
| НДССрезПоследних.ставка7,
| НДССрезПоследних.ставка20,
| НДССрезПоследних.безНДСС,
| НДССрезПоследних.ставк0,
| НДССрезПоследних.ставк7,
| НДССрезПоследних.ставк20
|ИЗ
| РегистрСведений.НДС.СрезПоследних(
| &Дата,
| БезНДС = &БезНДС
| И ставка0 = &ставка0
| И ставка20 = &ставка20
| И ставка7 = &ставка7) КАК НДССрезПоследних,
| Документ.ПриходнаяНакладная.ТабличнаяЧасть1 КАК ПриходнаяНакладнаяТабличнаяЧасть1";
Запрос.УстановитьПараметр("БезНДС", БезНДС);
Запрос.УстановитьПараметр("Дата", Дата);
Запрос.УстановитьПараметр("ставка0", ставка0);
Запрос.УстановитьПараметр("ставка20", ставка20);
Запрос.УстановитьПараметр("ставка7", ставка7);
РезультатЗапроса = Запрос.Выполнить();
ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();
Если ВыборкаДетальныеЗаписи.Следующий() Тогда
ЦенаСНДС =ВыборкаДетальныеЗаписи.Цена*(ВыборкаДетальныеЗаписи.НДС*0.1)+ВыборкаДетальныеЗаписи.Цена;
Возврат ЦенаСНДС;
КонецЕсли;
КонецФункции
зделал!вот правельный код
&НаКлиенте
Процедура ТабличнаяЧасть1НДСПриИзменении(Элемент)
стр=Элементы.ТабличнаяЧасть1.ТекущиеДанные;
стр.ЦенаСНДС=стр.Цена*(ПолучитьЦенаСНДС(объект.Дата,стр.НДС)*0.01)+стр.Цена;
стр.Сумма = стр.ЦенаСНДС * стр.количество;
КонецПроцедуры
&НаСервере
Функция ПолучитьЦенаСНДС (Дата, ВидНДС);
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| НДССрезПоследних.Ставка
|ИЗ
| РегистрСведений.НДС.СрезПоследних(&Дата, ВидНДС = &ВидНДС) КАК НДССрезПоследних";
Запрос.УстановитьПараметр("Дата",Дата);
Запрос.УстановитьПараметр("ВидНДС",ВидНДС);
РезультатЗапроса = Запрос.Выполнить();
ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();
Если ВыборкаДетальныеЗаписи.Следующий() Тогда
Возврат ВыборкаДетальныеЗаписи.Ставка;
КонецЕсли;
КонецФункции
Сообщение отредактировал Vofka - 01.03.15, 12:15