Имя: Пароль:
1C
1С v8
Как отобразить данные в табличной части?
0 Zombi
 
04.02.14
10:16
В одном самописном документе есть табличная часть. При выборе номенклатуры нужно отобразить в отдельной колонке колмчество этого товара на определенном складе. Как это сделать? Если у колонки не заполню свойство "Данные" не могу в этой колонке ничего отобразить?
1 Wobland
 
04.02.14
10:18
точно надо?
2 KishMish
 
04.02.14
10:18
можешь, через процедуру ПриВыводеСтроки
3 banco
 
04.02.14
10:18
(0) УФ?
4 KishMish
 
04.02.14
10:18
+(2) что-то типа Оформление.Ячейки.ЯчейкаКакато.УстановитьТекст(Какоото)
5 Cube
 
04.02.14
10:19
(3) "Такое сообщение уже было отправлено в течение ближайшего часа." :)
6 Рэйв
 
04.02.14
10:19
(0)Нафига тебе это извращение?
7 Cube
 
04.02.14
10:19
(2) ПриПолученииДанных
8 Zombi
 
04.02.14
10:25
Обычные формы
9 Alpen906
 
04.02.14
10:29
Лови пример. Думаю разберешься
Процедура СписокПриПолученииДанных(Элемент, ОформленияСтрок)
    Если  НЕ (ВыводитьОстатки И ЗначениеЗаполнено(Склад)) Тогда
        Возврат;
    КонецЕсли;    
    
    МассивНоменклатуры        = Новый Массив;
    Соответствие            = Новый Соответствие;
    Организация                = глЗначениеПеременной("ОсновнаяОрганизация");
    Для Каждого Строка Из ОформленияСтрок Цикл
        МассивНоменклатуры.Добавить(Строка.ДанныеСтроки.Ссылка);
        Соответствие.Вставить(Строка.ДанныеСтроки.Ссылка, Строка);
        
        СчетаУчета            = БухгалтерскийУчет.ПолучитьСчетаУчетаНоменклатуры(Организация, Строка.ДанныеСтроки.Ссылка, Склад);
        Строка.Ячейки.СчетУчета.УстановитьТекст(СокрЛП(СчетаУчета.СчетУчета));
    КонецЦикла;
    
    Запрос                    = Новый Запрос;
    Запрос.УстановитьПараметр("СписокНоменклатуры", МассивНоменклатуры);
    Запрос.УстановитьПараметр("Счет10",                ПланыСчетов.Хозрасчетный.Материалы);
    Запрос.УстановитьПараметр("Склад",                 Склад);
    Запрос.Текст = "
    |ВЫБРАТЬ
    |    ХозрасчетныйОстатки.Субконто1             КАК Номенклатура,
    |    ХозрасчетныйОстатки.КоличествоОстаток    КАК Количество
    |ИЗ
    |    РегистрБухгалтерии.Хозрасчетный.Остатки(
    |            ,
    |            Счет В ИЕРАРХИИ (&Счет10),
    |            ,
    |            Субконто1 В (&СписокНоменклатуры) И
    |            Субконто2 = &Склад) КАК ХозрасчетныйОстатки";
                  
    
    Выб                        = Запрос.Выполнить().Выбрать();
    Пока Выб.Следующий() Цикл
        Строка                = Соответствие.Получить(Выб.Номенклатура.Ссылка);    
        Строка.Ячейки.Количество.УстановитьТекст(Формат(Выб.Количество, "ЧЦ=15; ЧДЦ=3"));
        Если Выб.Количество < 0 Тогда
            Строка.Ячейки.Количество.ЦветТекста = WebЦвета.Красный;
        КонецЕсли;    
    КонецЦикла;
КонецПроцедуры
10 Zombi
 
04.02.14
10:34
Спасибо
Компьютер — устройство, разработанное для ускорения и автоматизации человеческих ошибок.