Имя: Пароль:
1C
 
Дата выработки в накладной на перемещение
0 Satiel
 
12.08.16
12:31
Здравствуйте. Проблема в следующем: в печатной форме "Накладная на перемещение" есть Дата Выработки, которая рассчитывается на основании приходного ордера, но соответственно только для ордерного склада Нужно что бы Дата Выработки считалась и по не ордерному складу  из документа ПеремещениеТоваров. Я представляю что нужно в коде написать условия проверки ордерности, а потом ежу рассчитывать выработку. Подскажите как это сделать, я новичок и пока слабо разбираюсь. Код расчёта выработки по ордеру:

                 ЗапросПриходныйДокумент = Новый Запрос;
                 ЗапросПриходныйДокумент.Текст=
                   "ВЫБРАТЬ
                   |    ПриходныйОрдерНаТовары.Ссылка
                   |ИЗ
                   |    Документ.ПриходныйОрдерНаТовары КАК ПриходныйОрдерНаТовары
                   |ГДЕ
                   |    ПриходныйОрдерНаТовары.Распоряжение = &Распоряжение" ;
                
                ЗапросПриходныйДокумент.УстановитьПараметр("Распоряжение", ВыборкаПоТоварам.Ссылка);
                Результат =ЗапросПриходныйДокумент.Выполнить();
                Выборка=Результат.Выгрузить();
                                 
                 Если Выборка.Количество() > 0 Тогда
                 ПриходныйОрдер=Выборка.Получить(0);
                  
                 Если   ПриходныйОрдер.Ссылка.Товары[Счетчик].СтатусУказанияСерий<>0 Тогда
                 СрокГоденДо= ПриходныйОрдер.Ссылка.Серии[Счетчик2].Серия;
                 Счетчик2=Счетчик2+1;
                 //Иначе  СрокГоденДо="";//не указывается серия
                 ДатаВыработки=Лев (Строка(Дата(Лев(Прав(СрокГоденДо,8),6)+"20"+ Прав(СрокГоденДо,2) +" 0:00:00") - (ВыборкаПоТоварам.Товар.СрокГодности*3600*24)),10);//
                 КонецЕсли;
                 Счетчик=Счетчик+1;
1 DDwe
 
12.08.16
12:35
(0) Знаки препинания, кто украл? Подарить? У меня есть запасной комплект.
Читать же невозможно.
И да, про какого ежа идет речь?
2 DDwe
 
12.08.16
12:37
Понятно, что бы потом гордо написать- при расчете выработки ни один ёж не пострадал.
3 vicof
 
12.08.16
12:51
ДатаВыработки=Лев (Строка(Дата(Лев(Прав(СрокГоденДо,8),6)+"20"+ Прав(СрокГоденДо,2) +" 0:00:00") - (ВыборкаПоТоварам.Товар.СрокГодности*3600*24)),10)

ёк-макарёк
4 vicof
 
12.08.16
12:51
тут у любого ежа крыша поедет
5 DDwe
 
12.08.16
12:53
(4) А, если это маленький совсем ёжик, что с ним будет... а ..еклмн.
6 vicof
 
12.08.16
13:07
(0) Защитников природы на тебя нет, изверг