Имя: Пароль:
1C
 
Вставить во внешнюю печатную форму документа ячейку цена закупки из справочника
0 DimaRodi
 
06.06.16
18:17
Необходимо вставить во внешнюю печатную форму документа ВозвратТоваровПоставщику ячейку с информацией из номенклатуру цена закупки
1 mikecool
 
06.06.16
18:35
я не против
2 DimaRodi
 
06.06.16
18:49
Вопрос что прописывать
3 drcrasher
 
06.06.16
18:50
Код
4 DimaRodi
 
06.06.16
18:50
Как это вообще можно сделать
5 DimaRodi
 
06.06.16
18:51
Какой и где?Просто недавно 1 с занимаюсь
6 DimaRodi
 
06.06.16
18:52
У меня есть внешняя печатная форма в которую нужно вставить столбец цена закупки
Процедура НажатиеКнопка1 (Элемент)
    
//ВЫБРАТЬ
//Наименование
//ИЗ
//Справочник.Номенклатура
//ОБЪЕДИНИТЬ
//Наименование
//Из
//Документы.ВозвратТоваровПоставщику



ТабДок = новый ТабличныйДокумент;
    Макет = ПолучитьМакет("Макет");
    ОбластьШапки=Макет.ПолучитьОбласть("Шапка");
    ОбластьДанные=Макет.ПолучитьОбласть("Данные");
    ОбластьПодвал=Макет.ПолучитьОбласть("Подвал");
ОбластьШапки.Параметры.ТекстЗаголовка = "Печатная форма "+СсылкаНаОбъект.Номер;
ОбластьШапки.Параметры.Организация = СсылкаНаОбъект.Организация;

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



Запрос = новый запрос;
Запрос.УстановитьПараметр("Ссылка",ПолеВвода1);
Запрос.Текст = "ВЫБРАТЬ
|   ВозвратТоваровПоставщику.Номенклатура,
|   ВозвратТоваровПоставщику.Сумма,
|   ВозвратТоваровПоставщику.Цена,
|   ВозвратТоваровПоставщику.Количество
|ИЗ
|   Документ.ВозвратТоваровПоставщику.Товары КАК ВозвратТоваровПоставщику
|ГДЕ
|   ВозвратТоваровПоставщику.Ссылка = &Ссылка";

Выборка = Запрос.Выполнить ().Выбрать ();

ИтогоСумма = 0;
ИтогоКоличество = 0;

Пока Выборка.Следующий() Цикл
    ЗаполнитьЗначенияСвойств(ОбластьДанные.Параметры,Выборка);

  ИтогоСумма = ИтогоСумма + Выборка.Сумма;
    ИтогоКоличество = ИтогоКоличество + Выборка.Количество;

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

ОбластьПодвал.Параметры.ИтогоКоличество = ИтогоКоличество;
ОбластьПодвал.Параметры.ИтогоСумма      = ИтогоСумма;

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

ТабДок.Показать();  


КонецПроцедуры
7 DimaRodi
 
06.06.16
18:52
есть макет в который я добавил столбец цена закупки
8 Михаил Козлов
 
06.06.16
18:56
В макете в области "Данные", надеюсь указали в столбце "Цена" параметр <Цена>?
9 DimaRodi
 
06.06.16
18:57
указал печатная форма выводится верно
10 Михаил Козлов
 
06.06.16
19:04
(9) Что-то не понял: а что неверно, если цена выводится?
11 DimaRodi
 
07.06.16
10:08
Нужно вставить цену закупки из справочника номенклатура
12 DimaRodi
 
07.06.16
10:09
а цена это обычная цена возвратного товара
13 FIXXXL
 
07.06.16
10:10
(11) в запрос левым соединением пристегни свои цены и выводи
14 FIXXXL
 
07.06.16
10:11
(13) хинт: в запросе поле назови как оно обозвано в макете и оно уже само попадет в табДок
15 SherifSP
 
07.06.16
10:18
(14) Ему нужно дописать запрос и выложить готовый, поможешь?))
16 DimaRodi
 
07.06.16
10:49
ребят помогите с кодом запроса
17 FIXXXL
 
07.06.16
10:59
(16) цена твоя это именно реквизит справочника номенклатуры?
18 DimaRodi
 
07.06.16
13:12
нет не реквизит
19 Ёпрст
 
гуру
07.06.16
13:35
(18)
ну, так, примерно

"ВЫБРАТЬ
               |    ВозвратТоваровПоставщику.Номенклатура,
               |    ВозвратТоваровПоставщику.Сумма,
               |    ВозвратТоваровПоставщику.Количество * ВозвратТоваровПоставщику.Коэффициент КАК Количество
               |ПОМЕСТИТЬ ТабличкаТоваров
               |ИЗ
               |    Документ.ВозвратТоваровПоставщику.Товары КАК ВозвратТоваровПоставщику
               |ГДЕ
               |    ВозвратТоваровПоставщику.Ссылка = &Ссылка
               |;
               |
               |////////////////////////////////////////////////////////////////////////////////
               |ВЫБРАТЬ
               |    ЦеныНоменклатурыСрезПоследних.Номенклатура КАК Номенклатура,
               |    МАКСИМУМ(ЦеныНоменклатурыСрезПоследних.Цена) КАК Цена
               |ПОМЕСТИТЬ ТабличкаЦен
               |ИЗ
               |    РегистрСведений.ЦеныНоменклатуры.СрезПоследних(
               |            &ДатаРасчетов,
               |            ТипЦен = &ТипЦен
               |                И Номенклатура В
               |                    (ВЫБРАТЬ
               |                        ТабличкаТоваров.Номенклатура
               |                    ИЗ
               |                        ТабличкаТоваров)) КАК ЦеныНоменклатурыСрезПоследних
               |
               |СГРУППИРОВАТЬ ПО
               |    ЦеныНоменклатурыСрезПоследних.Номенклатура
               |
               |ИМЕЮЩИЕ
               |    МАКСИМУМ(ЦеныНоменклатурыСрезПоследних.Цена) > 0
               |;
               |
               |////////////////////////////////////////////////////////////////////////////////
               |ВЫБРАТЬ
               |    ТабличкаТоваров.Номенклатура,
               |    ТабличкаТоваров.Сумма,
               |    ТабличкаТоваров.Количество,
               |    ЕСТЬNULL(ТабличкаЦен.Цена, 0) КАК ЦенаИзСправочника
               |ИЗ
               |    ТабличкаТоваров КАК ТабличкаТоваров
               |        ЛЕВОЕ СОЕДИНЕНИЕ ТабличкаЦен КАК ТабличкаЦен
               |        ПО (ТабличкаЦен.Номенклатура = ТабличкаТоваров.Номенклатура)";


Ну и Запрос.УстановитьПараметр("ДатаРасчетов",ПолеВвода1.Дата)
и тип цен свой..
+ по-уму, нужно цены еще к единице измерения привязывать
20 DimaRodi
 
07.06.16
15:24
всё сделал через конструктор запросов