Доброе утро! Такая задача - документ ТаблицаЦенообразования. В нем 5 вкладок с 5 табличными частями. ЗаказПокупателя заполняется на основании ТЦ. Как сделать так чтобы переносить в ЗаказПокупателя ту табличную часть, которая текущая. ТО есть если открыта вкладка 2 и пользователь нажимает заполнить на основании, то именно табличная часть с этой вкладки переносилась в ЗаказПокупателя.

Если ТипЗнч(Основание) = Тип("ДокументСсылка.АльтернативнаяТаблицаЦенообразования") Тогда
        
        // Заполнение шапки
        Контрагент                 = Основание.Контрагент;
        Автор                      = Основание.Автор;
        Контрагент  = УправлениеВзаиморасчетами.ПолучитьКонтрагентаПоОрганизации(Основание.Организация);
        // Вот здесь условие что мол раз там активная вкладка 1 тогда и товары 1 или если вкладка 2 то и товары2
        Для Каждого ТекСтрокаТовары Из Основание.Товары Цикл
            НоваяСтрока                              = Товары.Добавить();
            НоваяСтрока.ЗапрашиваемоеНаименование    = ТекСтрокаТовары.ЗапрашиваемоеНаименование;
            НоваяСтрока.НовоеНаименование            = ТекСтрокаТовары.НовоеНаименование;
            НоваяСтрока.Номенклатура                    = ТекСтрокаТовары.Номенклатура;
            НоваяСтрока.Количество                    = ТекСтрокаТовары.Количество;
            НоваяСтрока.ПлановаяСебестоимость        = ТекСтрокаТовары.ПлановаяСебестоимость;
            НоваяСтрока.СуммаПлановойСебестоимости   = ТекСтрокаТовары.СуммаПлановойСебестоимости;
            НоваяСтрока.ЦенаБезНДС                   = ТекСтрокаТовары.ЦенаБезНДС;
            НоваяСтрока.СуммаБезНДС                  = ТекСтрокаТовары.СуммаБезНДС;
            НоваяСтрока.Цена                            = ТекСтрокаТовары.Цена;
            НоваяСтрока.Сумма                           = ТекСтрокаТовары.Сумма;
            НоваяСтрока.Транспортные                 = ТекСтрокаТовары.Транспортные;
            НоваяСтрока.Накладные                       = ТекСтрокаТовары.Накладные;
            НоваяСтрока.УслПостоянные                = ТекСтрокаТовары.УслПостоянные;
            НоваяСтрока.Прибыль                            = ТекСтрокаТовары.Прибыль;
            НоваяСтрока.Рентабельность                    = ТекСтрокаТовары.Рентабельность;
        КонецЦикла;
        
    Заказ = Основание;
    КонецЕсли;

В ОбработкаЗаполнения
ДанныеЗаполнения.ПолучитьФорму.

Не уверен что состояние текущей панели вернет, попробуйте достучаться, иначе тогда через переменную.

Обработка заполнения ЗаказаПокупателя?

При переключении страниц панели в форме основания присваивайте ей текущую страницу панели. И в модуле в обработке заполнения оперируйте с ней.

Из нее получать текущий элемент документа ТаблицаЦенообразования??

да

в смысле сделайте поглобальнее переменную. чтобы контекст любого дока видел ее.

(3) Что вызывается? Вам в обработчике кнопки надо описать создание и заполнение документа. У процедуры ОбработкаЗаполнения параметр ДанныеЗаполнения может иметь любой тип. Передавайте туда не ссылку, а структуру из ссылки и имени тч, по которой надо заполнить. И не надо будет никаких форм вызывать

(10) В какой момент - передавать, она об этом спрашивает.

(11) в момент нажатия на кнопку, разве нет? Или я что-то не понимаю?

(10)

// Процедура - обработчик события "ОбработкаЗаполнения".
//
Процедура ОбработкаЗаполнения(Основание)
    
    Если Основание <> Неопределено И ТипЗнч(Основание) <> Тип("Структура") Тогда
        ЗаполнитьПоДокументуОснования(Основание);
    КонецЕсли;
    
КонецПроцедуры // ОбработкаЗаполнения()


// Процедура выполняет заполнение документа по документу-основанию.
//
// Параметры:
//  Основание - ссылка на документ основание (приходный ордер товаров).
//
Процедура ЗаполнитьПоДокументуОснования(Основание) Экспорт
    
    Если ТипЗнч(Основание) = Тип("ДокументСсылка.АльтернативнаяТаблицаЦенообразования") Тогда
        
        // Заполнение шапки
        Контрагент                 = Основание.Контрагент;
        Автор                      = Основание.Автор;
        //Контрагент  = УправлениеВзаиморасчетами.ПолучитьКонтрагентаПоОрганизации(Основание.Организация);
        
        Для Каждого ТекСтрокаТовары Из Основание.Товары Цикл
            НоваяСтрока                              = Товары.Добавить();
            НоваяСтрока.ЗапрашиваемоеНаименование    = ТекСтрокаТовары.ЗапрашиваемоеНаименование;
            НоваяСтрока.НовоеНаименование            = ТекСтрокаТовары.НовоеНаименование;
            НоваяСтрока.Номенклатура                    = ТекСтрокаТовары.Номенклатура;
            НоваяСтрока.Количество                    = ТекСтрокаТовары.Количество;
            НоваяСтрока.ПлановаяСебестоимость        = ТекСтрокаТовары.ПлановаяСебестоимость;
            НоваяСтрока.СуммаПлановойСебестоимости   = ТекСтрокаТовары.СуммаПлановойСебестоимости;
            НоваяСтрока.ЦенаБезНДС                   = ТекСтрокаТовары.ЦенаБезНДС;
            НоваяСтрока.СуммаБезНДС                  = ТекСтрокаТовары.СуммаБезНДС;
            НоваяСтрока.Цена                            = ТекСтрокаТовары.Цена;
            НоваяСтрока.Сумма                           = ТекСтрокаТовары.Сумма;
            НоваяСтрока.Транспортные                 = ТекСтрокаТовары.Транспортные;
            НоваяСтрока.Накладные                       = ТекСтрокаТовары.Накладные;
            НоваяСтрока.УслПостоянные                = ТекСтрокаТовары.УслПостоянные;
            НоваяСтрока.Прибыль                            = ТекСтрокаТовары.Прибыль;
            НоваяСтрока.Рентабельность                    = ТекСтрокаТовары.Рентабельность;
        КонецЦикла;
        
    Заказ = Основание;
    КонецЕсли;    
КонецПроцедуры

(11) Да я об этом спрашиваю (12) Кнопка-то стандартная "ввести по основанию"

ТО есть когда я в ТЦ ее нажимаю в заказе идет в обработку заполнения и далее заполнение на основании, а в ТЦ не пойму где написать

(13) Ну, мое решение не подходит для этого кода. И что?
Еще раз говорю - в процедура-обработчике нажатия на кнопку укажите имя ТЧ, по которой будет заполняться. А потом переписывайте свою ОбработкаЗаполнения в заказе под структуру данных заполнения

В отправителе присваивайте текущую ТЧ переменной, в получателе разбирайте ее.

(15) в таком варианте - делайте как говорит reggyman - придумайте переменную поглобальней или реквизит документа, в который будете записывать нужную ТЧ

(16) а вы сами попробуйте это сделать, своим советом воспользоваться.

(16) А где обработчик этой кнопки??? Я об этом и спрашиваю.

ни в коем случчае не реквизит, вам тогда надо будет записывать документ чтобы обратиться к нему.

Обработчик внутри. Так сделано для облегчения нашей работы.

(14) у стандартной синей кнопки "ввести по основанию" есть обработчик?

(17) в отправителе глобально описать?
Перем ТекТабЧасть;
Так?

(23) ну как мне говорит (16) есть

В отправителе присвоить надо. А объявить ее в глобальном контексте.

(26) Сейчас попробую, спасибо!

(27) Караганде респект от Костаная!

Блин, и зависла что называется... вернулись снова к тому же вопросу - в отправителе это где, в каком месте? То есть я могу записать документ, а потом между вкладками еще щелкать выбирать, когда выбрала какой вариант переносить нажимаю стандартную кнопку "ввести на основании" и где мне запомнить текущую вкладку.
то есть я понимаю что надо написать
Если ЭлементыФормы.АльтернативныеТЦ.ТекущаяСтраница = ЭлементыФормы.АльтернативныеТЦ.Страницы.Альтернатива4 Тогда
ТекТабЧасть=ЭлементыФормы.Товары4;

Но где это написать???

(28) Ух ты и Вам респект!

У панели событие - ПриСменеСтраницы

(29)
сначала завести глобальную переменную

В "модуле обычного приложения
Перем глТекТабЧасть Экспорт;
или в параметрыСеанса

(19) Ну сделала. Показать? Я не поняла, в чем там трудность может возникнуть

(29) В процедуре, которая к кнопке приписана)

(33) см 23

конечно другое решение сделать свое меню ввода на основании со своей процедурой обработки

В модуле формы документа ТаблицаЦенообразования так написала

//Хранит текущую табличную часть
Перем ТекТабЧасть Экспорт;

...
Процедура АльтернативныеТЦПриСменеСтраницы(Элемент, ТекущаяСтраница)
    Если ЭлементыФормы.АльтернативныеТЦ.ТекущаяСтраница = ЭлементыФормы.АльтернативныеТЦ.Страницы.ТЦО Тогда
        ТекТабЧасть=ЭлементыФормы.Товары;    
    ИначеЕсли ЭлементыФормы.АльтернативныеТЦ.ТекущаяСтраница = ЭлементыФормы.АльтернативныеТЦ.Страницы.Альтернатива1 Тогда
        ТекТабЧасть=ЭлементыФормы.Товары1;    
    ИначеЕсли ЭлементыФормы.АльтернативныеТЦ.ТекущаяСтраница = ЭлементыФормы.АльтернативныеТЦ.Страницы.Альтернатива2 Тогда
        ТекТабЧасть=ЭлементыФормы.Товары2;
    ИначеЕсли ЭлементыФормы.АльтернативныеТЦ.ТекущаяСтраница = ЭлементыФормы.АльтернативныеТЦ.Страницы.Альтернатива3 Тогда
        ТекТабЧасть=ЭлементыФормы.Товары3;
    ИначеЕсли ЭлементыФормы.АльтернативныеТЦ.ТекущаяСтраница = ЭлементыФормы.АльтернативныеТЦ.Страницы.Альтернатива4 Тогда
        ТекТабЧасть=ЭлементыФормы.Товары4;
    КонецЕсли;
КонецПроцедуры


В модуле объекта Документа ЗаказПокупателя в обработке заполнения, ее дополнительным параметром писать?

(37) сделай (32) и используй глТекТабЧасть

(37) В обработку заполнения у вас передается ссылка. Как вы из ссылки собираетесь свою переменную получать?

(37) Проще надо. Просто текущую страницу присваивайте, зачем эта раскадровка панели полная?

(40) чтобы понять какая табличная часть

А как теперь в Процедуре ЗаполнитьПоДокументуОснования эту переменную раскидать? (Я просто никогда этого не делала)
Процедура ЗаполнитьПоДокументуОснования(Основание) Экспорт
    
    Если ТипЗнч(Основание) = Тип("ДокументСсылка.АльтернативнаяТаблицаЦенообразования") Тогда
        
        // Заполнение шапки

        Контрагент                 = Основание.Контрагент;
        Автор                      = Основание.Автор;
        //Контрагент  = УправлениеВзаиморасчетами.ПолучитьКонтрагентаПоОрганизации(Основание.Организация);

        
        Для Каждого ТекСтрокаТовары Из Основание.Товары Цикл
            НоваяСтрока                              = Товары.Добавить();
            НоваяСтрока.ЗапрашиваемоеНаименование    = ТекСтрокаТовары.ЗапрашиваемоеНаименование;
            НоваяСтрока.НовоеНаименование            = ТекСтрокаТовары.НовоеНаименование;
            НоваяСтрока.Номенклатура                    = ТекСтрокаТовары.Номенклатура;
            НоваяСтрока.Количество                    = ТекСтрокаТовары.Количество;
            НоваяСтрока.ПлановаяСебестоимость        = ТекСтрокаТовары.ПлановаяСебестоимость;
            НоваяСтрока.СуммаПлановойСебестоимости   = ТекСтрокаТовары.СуммаПлановойСебестоимости;
            НоваяСтрока.ЦенаБезНДС                   = ТекСтрокаТовары.ЦенаБезНДС;
            НоваяСтрока.СуммаБезНДС                  = ТекСтрокаТовары.СуммаБезНДС;
            НоваяСтрока.Цена                            = ТекСтрокаТовары.Цена;
            НоваяСтрока.Сумма                           = ТекСтрокаТовары.Сумма;
            НоваяСтрока.Транспортные                 = ТекСтрокаТовары.Транспортные;
            НоваяСтрока.Накладные                       = ТекСтрокаТовары.Накладные;
            НоваяСтрока.УслПостоянные                = ТекСтрокаТовары.УслПостоянные;
            НоваяСтрока.Прибыль                            = ТекСтрокаТовары.Прибыль;
            НоваяСтрока.Рентабельность                    = ТекСтрокаТовары.Рентабельность;
        КонецЦикла;
        
    Заказ = Основание;
    КонецЕсли;    
КонецПроцедуры

И наверное в основании так?
ГлТекТабЧасть = ЭлементыФормы.Товары.ТекущиеДанные;

в ГлТекТабЧасть сохранять номер или имя ТЧ, а не ТекущиеДанные. потом Если ИначеЕсли определять нужную ТЧ

(44) ясно

В процедуре ЗаполнитьПоДокументуОснования
Товары = глТекТабЧасть;
        Для Каждого ТекСтрокаТовары Из Товары Цикл


На такое выдает ошибку что переменная не определена

У вас два подхода сейчас как бы. Один общий такой, вы смотрите снаружи на конфу и задачу и определяете контекст обработки и что передаете. А второй это когда вы уже внутри процедур пишете код. Вы их не путайте, эти два подхода, определились с общим и ныряете во внутренний а не наоборот. У вас сейчас в каком подходе трабл? Во внешнем или внутреннем? В переменную сохраняйте и ссылку и текущую ТЧ для дальнейшей обработки если вам это нужно. Гуру проснутся еще про мутабельность расскажут вам.)

ЗаполнитьПоДокументуОснования - эта где процедура? В отладчике посмотрите какое значение в глТекТабЧасть.

ГлТекТабЧасть - табличная часть в отладчике.
Процедура ЗаполнитьПоДокументуОснования в модуле объекта Документа ЗаказПокупателя

Похоже что у вас док который заполняете (если эта процедура там) не видит переменную. Или в ней неопределено.

Для Каждого ТекСтрокаТовары Из Товары Цикл

на этой строке валится?

(49) переменная не определена. (50) да на этой строке

(48) не табличная часть - а табличное поле

делать (32) (44) чтобы потом было (45)

(53) да вроде так и делаю...


//Хранит текущую табличную часть
Перем ГлТекТабЧасть Экспорт;


Процедура АльтернативныеТЦПриСменеСтраницы(Элемент, ТекущаяСтраница)
    Если ЭлементыФормы.АльтернативныеТЦ.ТекущаяСтраница = ЭлементыФормы.АльтернативныеТЦ.Страницы.ТЦО Тогда
        ГлТекТабЧасть=ЭлементыФормы.Товары.Имя;    
    ИначеЕсли ЭлементыФормы.АльтернативныеТЦ.ТекущаяСтраница = ЭлементыФормы.АльтернативныеТЦ.Страницы.Альтернатива1 Тогда
        ГлТекТабЧасть=ЭлементыФормы.Товары1.Имя;    
    ИначеЕсли ЭлементыФормы.АльтернативныеТЦ.ТекущаяСтраница = ЭлементыФормы.АльтернативныеТЦ.Страницы.Альтернатива2 Тогда
        ГлТекТабЧасть=ЭлементыФормы.Товары2.Имя;
    ИначеЕсли ЭлементыФормы.АльтернативныеТЦ.ТекущаяСтраница = ЭлементыФормы.АльтернативныеТЦ.Страницы.Альтернатива3 Тогда
        ГлТекТабЧасть=ЭлементыФормы.Товары3.Имя;
    ИначеЕсли ЭлементыФормы.АльтернативныеТЦ.ТекущаяСтраница = ЭлементыФормы.АльтернативныеТЦ.Страницы.Альтернатива4 Тогда
        ГлТекТабЧасть=ЭлементыФормы.Товары4;
    КонецЕсли;
КонецПроцедуры

Тогда передаете Значение в переменную. То что внутри табличного поля.

ТекТабЧасть=ЭлементыФормы.Товары.Значение

Процедура АльтернативныеТЦПриСменеСтраницы(Элемент, ТекущаяСтраница)
    Если ЭлементыФормы.АльтернативныеТЦ.ТекущаяСтраница = ЭлементыФормы.АльтернативныеТЦ.Страницы.ТЦО Тогда
        ГлТекТабЧасть=ЭлементыФормы.Товары.Значение;    
    ИначеЕсли ЭлементыФормы.АльтернативныеТЦ.ТекущаяСтраница = ЭлементыФормы.АльтернативныеТЦ.Страницы.Альтернатива1 Тогда
        ГлТекТабЧасть=ЭлементыФормы.Товары1.Значение;    
    ИначеЕсли ЭлементыФормы.АльтернативныеТЦ.ТекущаяСтраница = ЭлементыФормы.АльтернативныеТЦ.Страницы.Альтернатива2 Тогда
        ГлТекТабЧасть=ЭлементыФормы.Товары2.Значение;
    ИначеЕсли ЭлементыФормы.АльтернативныеТЦ.ТекущаяСтраница = ЭлементыФормы.АльтернативныеТЦ.Страницы.Альтернатива3 Тогда
        ГлТекТабЧасть=ЭлементыФормы.Товары3.Значение;
    ИначеЕсли ЭлементыФормы.АльтернативныеТЦ.ТекущаяСтраница = ЭлементыФормы.АльтернативныеТЦ.Страницы.Альтернатива4 Тогда
        ГлТекТабЧасть=ЭлементыФормы.Значение;
    КонецЕсли;
КонецПроцедуры

В "модуле обычного приложения"
v8: 8.2 Модуль обычного приложения

ИначеЕсли ЭлементыФормы.АльтернативныеТЦ.ТекущаяСтраница = ЭлементыФормы.АльтернативныеТЦ.Страницы.Альтернатива4 Тогда
        ГлТекТабЧасть=ЭлементыФормы.Товары4.Значение;
    КонецЕсли;

точнее вот так.)

v8: Открыть модуль обычного приложения в УФ

У вас ругается потому что ТабличноеПоле в переменной. Выборку из чего делать? Поэтому так. ВашеТабличноеПоле.Значение - вот что вам надо чтобы перебрать строки.

(56) так в отладчике понимает какая табличная часть,
но все равно ошибку в том же месте выдает что переменная не определена

Товары = ГлТекТабЧасть;
        Для Каждого ТекСтрокаТовары Из Товары Цикл


{Документ.ЗаказПокупателя.МодульОбъекта(2221,12)}: Переменная не определена (ГлТекТабЧасть)
        Товары = <<?>>ГлТекТабЧасть; (Проверка: Толстый клиент (обычное приложение))

Значит не глобальный контекст переменной.

я ее определяю в модуле формы Документа Табличная часть

обращаюсь к ней из процедуры в модуле объекта ЗаказПокупателя

Что не так?

Круто. А если я буду вводить на основании не из формы документа?

(63) Не там определяете. Вы ушли в заполнение объекта, у вас нет вашей формы, а значит нет и переменной.

(64) Обо этом они думать не хотят)

(64) а где ее определять?

Ly_Alena

Процедура АльтернативныеТЦПриСменеСтраницы(Элемент, ТекущаяСтраница)
    стрИмяТабличнойЧасти="Товары"+?(ТекущаяСтраница=0, "", СокрЛП(ТекущаяСтраница));
    ПоместитьВоВременноеХранилище(стрИмяТабличнойЧасти, "ИмяТабличнойЧасти");
КонецПроцедуры

Процедура ЗаполнитьПоДокументуОснования(Основание) Экспорт
    Если ТипЗнч(Основание) = Тип("ДокументСсылка.АльтернативнаяТаблицаЦенообразования") Тогда
        // Заполнение шапки
        ЗаполнитьЗначенияСвойств(ЭтотОбъект, Основание, "Контрагент,Автор";
        //Контрагент  = УправлениеВзаиморасчетами.ПолучитьКонтрагентаПоОрганизации(Основание.Организация);
        
        стрИмяТабличнойЧасти=ПолучитьИзВременногоХранилища("ИмяТабличнойЧасти")
        Для каждого СтрокаКоллекции Из Основание[стрИмяТабличнойЧасти] Цикл
            ЗаполнитьЗначенияСвойств(Товары.Добавить(), СтрокаКоллекции);    
        КонецЦикла;

        Заказ = Основание;
    КонецЕсли;    
КонецПроцедуры

"Открыть модуль обычного приложения" в дереве метаданных на названии конфы правой кнопкой

(68) Кстати да, скоро этим ужимкам нашим которые мы тут мутим - конец. Ибо 3.0 грядет.)

Теперь так в том же месте

{Документ.ЗаказПокупателя.МодульОбъекта(2230)}: Итератор для значения не определен
        Для Каждого ТекСтрокаТовары Из Т1 Цикл

А что такое Т1?

т1=ГлТекТабЧасть

В отладчик.

(73) Вот даже не удивлюсь если Т1 окажется строкой....

Основание[Т1]

Я не знаю как работать с глобальными переменными. Скажите как это делается?

(76)https://ru.wikipedia.org/wiki/Глобальная_переменная

(76) Судя по последней ошибке, вы не знаете, что у вас в переменную передалось. Дело не в ее глобальности, а в том, что вы туда положили.

Можно ли просто написать:
Для Каждого ТекСтрокаТовары Из ГлТекТабЧасть Цикл
            НоваяСтрока                              = Товары.Добавить();
            НоваяСтрока.ЗапрашиваемоеНаименование    = ТекСтрокаТовары.ЗапрашиваемоеНаименование;
            НоваяСтрока.НовоеНаименование            = ТекСтрокаТовары.НовоеНаименование;

...

Или нужно чему-то ее присвоить или проверить что-то надо

(78) положила туда имя табличной части - я так поняла

(80)а зачем тебе имя таб части в глобальной процедуре.Ты его так не знаешь чтоли?

(80) А посмотреть?

+(81)*в глобальной переменной

(80) Если Имя тогда Основание[ГлТекТабЧасть], а если саму таб часть, то можно как в (79)

(80) Я так понимаю ты принципиально пропускаешь часть комментов да?
(81) Не знает - в этом весь смысл.

(84) Посмотреть судьба - и я выше писала что туда передается
ДокументТабличнаяЧасть.АльтернативнаяТаблицаЦенообразования.Товары1

(84) Спасибо с Основание[ГлТекТабЧасть] сработало!

(86) Отладчиком учитесь пользоваться ужо.
"ДокументТабличнаяЧасть.АльтернативнаяТаблицаЦенообразования.Товары1" и "Спасибо с Основание[ГлТекТабЧасть] сработало!" нифига не стыкуются

(0) Сегодня пятница, все уже с утра хотят отдыха и юмора сегодня. На понедельник нельзя отложить все это дело? Два контекста у вас есть, подумайте об этом хорошо за выходные. Вы погружены не просто в болото, в трясину, в черную дыру сейчас. Начните спокойно рассуждать сначала, даже откройте новую конфу и с нуля начните. Все время себя спрашивайте - это откуда? для чего это? что дальше? - на каждом шаге. Не пишите хаотично код, вам это не поможет решить задачу. У вас есть наставник какой-то в деле изучения 1с?

А можно еще вопрос. В командной панели в свойствах есть источник данных, в котором указвается только одна табличная часть. как сделать чтобы в зависмости от тек вкладки и источник действий был для этой тек таб части

что-то типа ЭлементыФормы.КоманднаяПанель1.ИсточникДействий=Товары3;

не работает

Ха-ха. Сначала нахлобучили барышню глобальным контекстом, модулем приложения и прочей лабудой, а потом предложили подумать. Молодцы :)

(88) может и не стыкуется, но у меня заработало ) и еще раз за это спасибо!

(91) Вообще на мисту надо ходить с ?? когда уже всё перебрал и испробовал, перерыл и перекопал сверху донизу. Есть нормальные форумы казахстанские, там народ попроще..)))

(93) миста последняя инстанция как правило - потому как тут любят почморить от души )

(93) а какие казахстанские?

(94) Зато, имхо, очень эффективно отучает задавать глупые вопросы.

С девушками вообще отдельная история тут. Хорошо что фото есть в профиле.)

баланс кз

(97) на счет фото меня сразу научили в первый же день )))

СТО

А зачем вам 5 ТЧ? Неужто по пяти типам цен? Одну с выбором типа цены сверху - нельзя сделать разве?

С Источником действий разобралась. Всем большое за участие и дружеские пинки и неочень дружеские ) Все же вы потратили время.

(98) задача с альтернативными ТЦ, где меняется ко-во, цены, расходы