Имя: Пароль:
1C
1С v8
Вывод в поле внешней печатной формы результат математического действия
,
0 Samie_ch
 
07.12.11
06:55
Как в поле внешней печатной формы документа "Реализация товаров и услуг" УТ 10.3  платформа 8.1 вывести результат деления поля "Сумма" на поле     "Количество"
1 Rie
 
07.12.11
06:59
(0) Либо присвоить результат деления параметру области (предварительно указав в макете где и как будет выводиться этот параметр). (Так обычно и делают).
Либо прямо присвоив этот результат свойству Текст некоторой области. (Это для тех, кто любит стоить заборы и героически их преодолевать).
2 kosts
 
07.12.11
07:00
Так же как и в других конфигурациях 8.1

Область.Параметры.Цена = ?(Количество = 0, 0, Сумма/Количество);
3 Samie_ch
 
07.12.11
07:10
// Создаем новый табличный документ для данных расходной накладной
 ТабДок = Новый ТабличныйДокумент;
 ТабДок.ИмяПараметровПечати = "ПАРАМЕТРЫ_ПЕЧАТИ_РТиУ_РасходнаяНакладная";

 // Получаем макет, доступный для понимания работником склада
 Макет = ЭтотОбъект.ПолучитьМакет("Накладная");

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


 Запрос.УстановитьПараметр("СсылкаНаОбъект",СсылкаНаОбъект);
 Результат = Запрос.Выполнить();

 // Выводим шапку расходной накладной: номер, название поставщика,
 // название не пустого грузополучателя или контрагента
 ОбластьМакета = Макет.ПолучитьОбласть("Заголовок");
 ОбластьМакета.Параметры.ТекстЗаголовка = "Расходная накладная №" + СсылкаНаОбъект.Номер;

 ТабДок.Вывести(ОбластьМакета);

 // Шапка: таблица накладной
 ОбластьМакета = Макет.ПолучитьОбласть("ШапкаТаблицы");
 ТабДок.Вывести(ОбластьМакета);

 // Вывод строк бланка накладной
 Всего     = 0;

 Выборка = Результат.Выбрать();
 Пока Выборка.Следующий() Цикл
   ОбластьМакета = Макет.ПолучитьОбласть("Строка");
   ОбластьМакета.Параметры.Заполнить(Выборка);
   ТабДок.Вывести(ОбластьМакета);
   // Накапливаем итоги
   Всего     = Всего + Выборка.Сумма;
 КонецЦикла;

 // Выводим итоги по сумме, весу и объему
 ОбластьМакета = Макет.ПолучитьОбласть("Итого");
 ОбластьМакета.Параметры.Всего = Всего;

 ТабДок.Вывести(ОбластьМакета);
 // Выводим ФИО Ответственного и доверенного лица
 ОбластьМакета = Макет.ПолучитьОбласть("Подписи");
 ОбластьМакета.Параметры.ОтветственныйПредставление = СсылкаНаОбъект.Ответственный;
 ОбластьМакета.Параметры.Получил = СсылкаНаОбъект.ДоверенностьЧерезКого;
 ТабДок.Вывести(ОбластьМакета);

 // Добавляем нижний колонтитул для вывода на печать
 ТабДок.НижнийКолонтитул.Выводить = Истина;
 ТабДок.НижнийКолонтитул.НачальнаяСтраница = 1;
 ТабДок.НижнийКолонтитул.ВертикальноеПоложение = ВертикальноеПоложение.Центр;
 ТабДок.НижнийКолонтитул.ТекстСправа = "[&НомерСтраницы] из [&СтраницВсего] стр.";

 Возврат ТабДок;

КонецФункции // Создать Табличный Документ Печать Расходной Накладной
4 Samie_ch
 
07.12.11
07:11
вот исходный код запроса. Подскажите куда именно необходимо вставить ващ код
5 Rie
 
07.12.11
07:21
(3) Вот где надо выводить эту цену - туда и вставляй.
6 Escander
 
07.12.11
07:21
Внутри  цикла, перед     ТабДок.Вывести(ОбластьМакета);
но сначало этот параметр нужно создать.
7 Wobland
 
07.12.11
07:25
+(5) или в запросе посчитать. выбор когда...
8 Samie_ch
 
07.12.11
12:05
Спасибо всем большое)Нашел все свои ошибки и как сделать.