Документ таб часть
☑
0
azeml
15.08.14
✎
13:33
Здравствуйте! Такой вопрос надо выбрать из документа поступления товаров из переработки количество и номенклатуру и дату документа и номер. С датой ясно, вот как номенклатуру и количество
Заранее спасибо!
Процедура КнопкаВыполнитьНажатие(Кнопка)
Польз = ПользователиИнформационнойБазы.ТекущийПользователь();
НайтиКор = Справочники.Пользователи.НайтиПоНаименованию(Користувач);
Дата1 = НачалоДня(ТекущаяДата());
Дата2 = КонецДня(ТекущаяДата());
ПомУд = Ложь;
запрос = Новый Запрос;
запрос.УстановитьПараметр("Дата1",Дата1);
запрос.УстановитьПараметр("Дата2",Дата2);
запрос.УстановитьПараметр("Пом",ПомУд);
запрос.Текст =
"ВЫБРАТЬ
| ПоступлениеТоваровИзПереработки.Ссылка,
| ПоступлениеТоваровИзПереработки.Номер,
| ПоступлениеТоваровИзПереработки.Дата,
| ПоступлениеТоваровИзПереработки.Проведен,
| ПоступлениеТоваровИзПереработки.Ответственный,
| ПоступлениеТоваровИзПереработки.Ответственный.Наименование,
| ПоступлениеТоваровИзПереработки.Продукция.(
| Количество,
| Номенклатура
| )
|ИЗ
| Документ.ПоступлениеТоваровИзПереработки КАК ПоступлениеТоваровИзПереработки
|ГДЕ
| ПоступлениеТоваровИзПереработки.Дата МЕЖДУ &Дата1 И &Дата2
| И ПоступлениеТоваровИзПереработки.ПометкаУдаления = &Пом";
реззап = запрос.Выполнить().Выбрать();
Пр = Ложь;
Пока реззап.Следующий() Цикл
польз = Справочники.Пользователи.НайтиПоНаименованию(реззап.ОтветственныйНаименование);
Если польз.Код = НайтиКор.Код Тогда
Пр = Истина;
ДатаДок = реззап.Дата;
ПользДок = реззап.ОтветственныйНаименование;
НомерДок = реззап.Номер;
КонецЕсли;
КонецЦикла;
Сообщить(реззап.Продукция.Колонки.Количество);
КонецПроцедуры
1
rendez-vous
15.08.14
✎
13:36
(0) Делай запрос к таб. части. Дату и номер получишь по ссылке.
2
Wobland
15.08.14
✎
13:37
а ну нажми шифт+7. может, у меня такая клавиатура ущербная
3
azeml
15.08.14
✎
14:18
(1) дату беру так реззап.дата
4
azeml
15.08.14
✎
14:19
как так же з номенклатуру и количество ???
5
salvator
15.08.14
✎
14:20
(4) Прочитай еще раз сообщение (1). И еще раз, до просветления.
6
Крошка Ру
15.08.14
✎
14:25
(5) Вот так запостишь что-нибудь, а там глядь - твоим постом все просветляются...
"Миста: Прокачай свои навыки духовного лидера!"
7
azeml
16.08.14
✎
01:38
(1) спасибо!!!
8
GreatOne
16.08.14
✎
02:01
вообще такой код надо срочно выбросить и написать все заново. И кстати он не выполняется, здесь ругается 100%:
НайтиКор = Справочники.Пользователи.НайтиПоНаименованию(Користувач);
Я не хочу быть самым богатым человеком на кладбище. Засыпать с чувством, что за день я сделал какую-нибудь потрясающую вещь — вот что меня интересует. Стив Джобс