Имя: Пароль:
1C
1С v8
Очистка табличной части не получается
,
0 НАТалья Голубева
 
24.06.16
14:09
Здравствуйте ... подскажите.. почему не получается очистка табличной части в этом коде
Процедура ЗаполнитьПоЦенеЗакупкиМатериалы(Кнопка)

    
Запрос = Новый Запрос;
Запрос.Текст =

"ВЫБРАТЬ
|    ЦеныНоменклатурыСрезПоследних.ТипЦен,
|    ЦеныНоменклатурыСрезПоследних.Цена,
|    ЦеныНоменклатурыСрезПоследних.Номенклатура.Ссылка КАК Номенклатура,
|    РасчетСебестоимостивсематериалы.Материал.Ссылка КАК Материал,
|    РасчетСебестоимостивсематериалы.ЕдиницаИзмерения.Ссылка КАК ЕДИЗМ,
|    РасчетСебестоимостивсематериалы.Количество,
|    РасчетСебестоимостивсематериалы.КолГП,
|    РасчетСебестоимостивсематериалы.ГотоваяПродукция.Ссылка КАК ГП
|ИЗ
|    РегистрСведений.ЦеныНоменклатуры.СрезПоследних КАК ЦеныНоменклатурыСрезПоследних
|        ВНУТРЕННЕЕ СОЕДИНЕНИЕ Документ.РасчетСебестоимости.всематериалы КАК РасчетСебестоимостивсематериалы
|        ПО ЦеныНоменклатурыСрезПоследних.Номенклатура.Ссылка = РасчетСебестоимостивсематериалы.Материал.Ссылка
|ГДЕ
|    ЦеныНоменклатурыСрезПоследних.ТипЦен.Ссылка = &ТипЦен
|    И РасчетСебестоимостивсематериалы.Ссылка = &ЭтотДокумент
|    И РасчетСебестоимостивсематериалы.Ссылка.Дата = &Дата";    

Запрос.УстановитьПараметр("Дата",    Дата);     //Дата
//Запрос.УстановитьПараметр("ТипЦенРозничнойТорговли", Склад.ТипЦенРозничнойТорговли.Наименование);
Запрос.УстановитьПараметр("ТипЦен", ТипЦен);
Запрос.УстановитьПараметр("ЭтотДокумент", ЭтотОбъект.Ссылка);



Результат = Запрос.Выполнить();
ТЗ=Результат.Выгрузить();
ВыбрЭлем=ТЗ.ВыбратьСтроку();
Выборка = Запрос.Выполнить().Выбрать();

ТекДок = ЭтотОбъект.Ссылка.ПолучитьОбъект();
ТекДок.Материалы1.Очистить();    

        
Пока Выборка.Следующий() Цикл
    Стр=всематериалы.Добавить();
    Стр.Материал=Выборка.Номенклатура;
    Стр.ЦенаМатериало=Выборка.Цена;
    Стр.ЕдиницаИзмерения=Выборка.ЕДИЗМ;
    Стр.Количество=Выборка.Количество;
    Стр.КолГП=Выборка.КолГП;
    Стр.ГотоваяПродукция=Выборка.ГП;
    Стр.Сумма=Выборка.Количество*Выборка.Цена;
КонецЦикла;

КонецПроцедуры
1 catena
 
24.06.16
14:12
А где ТекДок.Записать()?
2 Numerus Mikhail
 
24.06.16
14:13
Записать же нужно документ
3 catena
 
24.06.16
14:13
а, этотобъект... даже этотобъект.ссылка.
В каком месте конфигуратора находится это испражнение фантазии?
4 aleks_default
 
24.06.16
14:30
всематериалы - это что?
5 lera01
 
24.06.16
14:33
|    ЦеныНоменклатурыСрезПоследних.Номенклатура.Ссылка КАК Номенклатура,
|    РасчетСебестоимостивсематериалы.Материал.Ссылка КАК Материал,
|    РасчетСебестоимостивсематериалы.ЕдиницаИзмерения.Ссылка КАК ЕДИЗМ,
это тоже оригинально
6 НАТалья Голубева
 
24.06.16
14:35
всематериалы- это наименование табличной части
7 НАТалья Голубева
 
24.06.16
14:36
|    ЦеныНоменклатурыСрезПоследних.Номенклатура.Ссылка КАК Номенклатура,
|    РасчетСебестоимостивсематериалы.Материал.Ссылка КАК Материал,
|    РасчетСебестоимостивсематериалы.ЕдиницаИзмерения.Ссылка КАК ЕДИЗМ,
... В чем тут ориганальность???
8 Numerus Mikhail
 
24.06.16
14:38
(7) Вытаскивать ссылку ссылки весьма оригинально :)
9 aleks_default
 
24.06.16
14:39
(6)Ну так почему ты очищаешь одну таб. часть, а заполняешь другую?

И Ссылка убери во всех соединениях

И Этотбъект тоже
10 SashaNox
 
24.06.16
14:44
а вот это всем понятно?
Результат = Запрос.Выполнить();
ТЗ=Результат.Выгрузить();
ВыбрЭлем=ТЗ.ВыбратьСтроку();
11 aleks_default
 
24.06.16
14:46
(10)да, это для просмотра результата. Старая фишка 8.1