Имя: Пароль:
1C
1С v8
Пропадает колонка в табличном поле на форме.
0 VismuT
 
21.10.23
13:23
Здравствуйте.
УТ Кз 2.2 ОП.
Документ "Установка цен номенклатуры"
Добавляю колонку "ОстаткиНаСкладе",в проведенных документах колонка появляется.
https://ibb.co.com/59JtG6C
https://ibb.co.com/r66yqhd
Но если в новом документе выбрать тип цен то колонка пропадает и пишет ошибку "Поле объекта не обнаружено".
https://ibb.co.com/1GLmczf
Процедура ТаблицаЦенПриПолученииДанных(Элемент, ОформленияСтрок)

Для Каждого ТекСтрока из ОформленияСтрок Цикл
Запрос = Новый Запрос;
Запрос.Параметры.Вставить("ДатаДокумента",Дата);
Запрос.Параметры.Вставить("Номенклатура",ТекСтрока.ДанныеСтроки.Номенклатура);
Запрос.Текст =

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

Выборка = Запрос.Выполнить().Выбрать();
ТекСтрока.Ячейки.ОстакиНаСкладе.ОтображатьТекст = Истина;
ТекСтрока.Ячейки.ОстакиНаСкладе.Выравнивание = ГоризонтальноеПоложение.Право;

Если Выборка.Следующий() Тогда
ОстатокКоличество = ?(Выборка.КоличествоОстаток = Null,0,Выборка.КоличествоОстаток);
Иначе
ОстатокКоличество = 0;
ТекСтрока.Ячейки.ОстакиНаСкладе.ЦветТекста = WebЦвета.Белый;
КонецЕсли;
ТекСтрока.Ячейки.ОстакиНаСкладе.Текст = "" + ОстатокКоличество;
КонецЦикла;
            
КонецПроцедуры
1 VismuT
 
21.10.23
13:32
Все разобрался!!

Процедура ОбновитьСоставКолонок()

    КолонкиТаблицыЦен = ТаблицаЦен.Колонки;
    ОчереднойНомерКолонки = 1;
    
    ТекущаяКолонка = КолонкиТаблицыЦен.Найти("ОстакиНаСкладе");
    СдвинутьКолонку(ТекущаяКолонка, ОчереднойНомерКолонки);
    
    ТекущаяКолонка = КолонкиТаблицыЦен.Найти("Код");
    СдвинутьКолонку(ТекущаяКолонка, ОчереднойНомерКолонки);

    ТекущаяКолонка = КолонкиТаблицыЦен.Найти("Артикул");
    СдвинутьКолонку(ТекущаяКолонка, ОчереднойНомерКолонки);

    ТекущаяКолонка = КолонкиТаблицыЦен.Найти("Номенклатура");
    СдвинутьКолонку(ТекущаяКолонка, ОчереднойНомерКолонки);

    ТекущаяКолонка = КолонкиТаблицыЦен.Найти("ХарактеристикаНоменклатуры");
    СдвинутьКолонку(ТекущаяКолонка, ОчереднойНомерКолонки);



........................................................

КонецПроцедуры