Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
27 ноя 2024, 03:36

Конструкция ЕСЛИ ТОГДА ИНАЧЕ

Автор Ann_, 04 сен 2020, 15:51

0 Пользователей и 1 гость просматривают эту тему.

LexaK

попробуйте так

//перенесено в цикл
//ОбластьСтроки = МакетОбработки.ПолучитьОбласть("СтрокаТЧ");

СуммаОбщаяБрутто = 0;
СуммаОбщаяНетто = 0;


Для Каждого ТекущаяСтрока Из СсылкаНаОбъект.Товары Цикл


//здесь получение области
ОбластьСтроки = МакетОбработки.ПолучитьОбласть("СтрокаТЧ");
и т.д.
если помогло нажмите: Спасибо!

Ann_


LexaK

тогда получается что вы нам не тот код присылаете, и либо не туда вносите изменения, ну еще кэш может быть виноват...
ну не программист-же ... :dfbbdrfb:
если помогло нажмите: Спасибо!

Ann_

СуммаОбщаяБрутто = 0;//+++
СуммаОбщаяНетто = 0;


Для Каждого ТекущаяСтрока Из СсылкаНаОбъект.Товары Цикл

ОбластьСтроки = МакетОбработки.ПолучитьОбласть("СтрокаТЧ");         

  ОбластьСтроки.Параметры.Нетто = 0;

Характеристика = ТекущаяСтрока.Характеристика;
//ОбластьСтроки.Параметры.Вес3 = ДопСведенияСтрокойВесНетто;
ОбластьСтроки.Параметры.НомерСтроки = ТекущаяСтрока.НомерСтроки;
ОбластьСтроки.Параметры.ПредставлениеНоменклатуры = ТекущаяСтрока.Номенклатура.НаименованиеПолное + " " + Характеристика;
ОбластьСтроки.Параметры.НоменклатураКод = ТекущаяСтрока.КодТНВЭД;
ОбластьСтроки.Параметры.КоличествоМест = ТекущаяСтрока.Количество;
ОбластьСтроки.Параметры.ЕдиницаИзмеренияНоменклатуры = ТекущаяСтрока.Номенклатура.ЕдиницаИзмерения;
//ОбластьСтроки.Параметры.ОбщаяНетто = ТекущаяСтрока.Номенклатура.ВесЧислитель * ТекущаяСтрока.Количество;


Если ТекущаяСтрока.Характеристика = Ложь Тогда
     ОбластьСтроки.Параметры.Нетто = ТекущаяСтрока.Номенклатура.ВесЧислитель * ТекущаяСтрока.Упаковка.Числитель;
     ОбластьСтроки.Параметры.ОбщаяНетто = ТекущаяСтрока.Номенклатура.ВесЧислитель * ТекущаяСтрока.Количество;
Иначе
     ОбластьСтроки.Параметры.Нетто = ДопСведенияСтрокойВесНетто;
     ОбластьСтроки.Параметры.ОбщаяНетто = ДопСведенияСтрокойВесНетто * ТекущаяСтрока.Количество;
КонецЕсли;


ОбластьСтроки.Параметры.КоличествоВОдномМесте = ТекущаяСтрока.Упаковка.Числитель;
ОбластьСтроки.Параметры.КоличествоМестКороб = ТекущаяСтрока.КоличествоУпаковок;
ОбластьСтроки.Параметры.Брутто = ТекущаяСтрока.Упаковка.Вес;

вес =  ТекущаяСтрока.КоличествоУпаковок * 0.3;                     

Если  ТекущаяСтрока.Упаковка.Числитель > 1 тогда
ОбластьСтроки.Параметры.ОбщаяБрутто = ТекущаяСтрока.Упаковка.Вес * ТекущаяСтрока.КоличествоУпаковок + вес;
Иначе
ОбластьСтроки.Параметры.ОбщаяБрутто = ТекущаяСтрока.Упаковка.Вес * ТекущаяСтрока.Количество;
КонецЕсли;

СуммаОбщаяБрутто = СуммаОбщаяБрутто + ОбластьСтроки.Параметры.ОбщаяБрутто;//+++
СуммаОбщаяНетто = СуммаОбщаяНетто + ОбластьСтроки.Параметры.ОбщаяНетто;

////////ОбластьСтроки.Параметры.НеттоСУпаковкой = ТекущаяСтрока.Упаковка.Вес / ТекущаяСтрока.Упаковка.Числитель * ТекущаяСтрока.Количество;
ОбластьСтроки.Параметры.НеттоСУпаковкой = ТекущаяСтрока.Упаковка.Вес * ТекущаяСтрока.КоличествоУпаковок;


ТабличныйДокумент.Вывести(ОбластьСтроки);

КонецЦикла;


Код тот, изменения вроде бы вношу туда, куда нужно) а вот кэш...как его почистить?)

IL2016

Цитата: IL2016 от 07 сен 2020, 12:42
давайте хоть взглянем на весь макет печатной формы от 1-й колонки до последней, с заполненными данными, как есть.
с этим как? или помощь не нужна?

Теги:

Похожие темы (3)

Рейтинг@Mail.ru

Поиск