|
Как добавить значение в колонку из табличной части документа
|
|||
---|---|---|---|
#18+
Задача такая: Есть документ с табличной частью реквизиты следующие: * Тип контрагента (Тип ПеречислениеСсылка {Покупатель, Поставщик, Грузополучатель}) * Контрагент (СПравочникСсылка) Необходимо в форме списка показать две колонки, в первой будет Контрагент-Покупатель (елси занесен, если нет, то пусто), во второй Контрагент-Грузополучатель (также если введен). Мне подсказали нужно делать в ПриПолученииДанных(), но как конкретно нет. Если можно прям кусочек кода. Заренее спасибо. ... |
|||
:
Нравится:
Не нравится:
|
|||
31.10.2008, 12:13 |
|
Как добавить значение в колонку из табличной части документа
|
|||
---|---|---|---|
#18+
BurcevD, роцедура ТоварыПриПолученииДанных(Элемент, ОформленияСтрок) // ++MihP 30.10.2008 Для Каждого ОформлениеСтроки Из ОформленияСтрок Цикл ДанныеСтроки = ОформлениеСтроки.ДанныеСтроки; ОформлениеСтроки.Ячейки.ХарактеристикаНоменклатуры.Видимость = ДанныеСтроки.Номенклатура.ВестиУчетПоХарактеристикам; ОформлениеСтроки.Ячейки.Апгрейд.Видимость = ДанныеСтроки.Номенклатура.ВестиУчетАпгрейдов; // 1 Если ЭлементыФормы.Товары.Колонки.Всего.Видимость Тогда ОформлениеСтроки.Ячейки.Всего.ОтображатьТекст = Истина; ОформлениеСтроки.Ячейки.Всего.Текст = ОбщегоНазначения.ФорматСумм(ДанныеСтроки.Сумма + ?(СуммаВключаетНДС, 0, ДанныеСтроки.СуммаНДС)); КонецЕсли; и .тд ... |
|||
:
Нравится:
Не нравится:
|
|||
31.10.2008, 16:48 |
|
Как добавить значение в колонку из табличной части документа
|
|||
---|---|---|---|
#18+
Процедура ПринятыеДокументыПриПолученииДанных(Элемент, ОформленияСтрок) // ++MihP 06.10.2008 Для Каждого Стр Из ОформленияСтрок Цикл ТекДок = Стр.ДанныеСтроки.Документ; // 1. Показываем дату поступления оригинала Стр.Ячейки.КолонкаДатаПоступленияОригинала.УстановитьТекст(Формат(ДатаПоступленияОригинала(ТекДок), "ДФ=dd.MM.yyyy; ДП=-")); // 2. Показываем дату выписки там где это возможно Если Не Метаданные.Документы.Содержит(ТекДок.Метаданные()) Тогда Продолжить; КонецЕсли; Если ОбщегоНазначения.ЕстьРеквизитДокумента("ДатаВыписки", ТекДок.Метаданные()) Тогда Стр.Ячейки.КолонкаДатаВыписки.УстановитьТекст(Формат(ТекДок.ДатаВыписки, "ДФ=dd.MM.yyyy; ДП=-")); КонецЕсли; КонецЦикла; // --MihP 06.10.2008 КонецПроцедуры Более наглядный кусочек попался под руку ... |
|||
:
Нравится:
Не нравится:
|
|||
31.10.2008, 16:51 |
|
|
start [/forum/topic.php?fid=28&fpage=156&tid=1524303]: |
0ms |
get settings: |
10ms |
get forum list: |
12ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
47ms |
get topic data: |
10ms |
get forum data: |
2ms |
get page messages: |
39ms |
get tp. blocked users: |
1ms |
others: | 14ms |
total: | 141ms |
0 / 0 |