Имя: Пароль:
1C
1С v8
Помогите дописать ТОРГ12. С новым реквизитом в ТЧ и подправленным выводом номенк
0 Akasyra
 
05.05.12
11:46
Помогите дописать ТОРГ12. В ТЧ добавляется реквизит "Примечание", на форме он должен выводиться так:
ОбластьМакетаСтрока.Параметры.ТоварНаименование = СокрЛП(ВыборкаСтрок.ТоварНаименование)+ " (зак.№ " + СокрЛП(ВыборкаСтрок.Примечание)+")" ;
В запрос естественно внесено изменение:


Текст =
   "ВЫБРАТЬ
   |    РеализацияТоваровУслуг.НомерСтроки КАК Номер,
   |    РеализацияТоваровУслуг.Номенклатура,
   |    ВЫРАЗИТЬ(РеализацияТоваровУслуг.Номенклатура.НаименованиеПолное КАК Строка(1000)),
   |    РеализацияТоваровУслуг.Примечание,
   |    РеализацияТоваровУслуг.Номенклатура.Код КАК ТоварКод,
   |    РеализацияТоваровУслуг.Количество,
   |    РеализацияТоваровУслуг.КоличествоМест,
   |    РеализацияТоваровУслуг.Номенклатура.БазоваяЕдиницаИзмерения КАК БазоваяЕдиницаНаименование,
   |    РеализацияТоваровУслуг.Номенклатура.БазоваяЕдиницаИзмерения.Код КАК БазоваяЕдиницаКодПоОКЕИ,
   |    РеализацияТоваровУслуг.ЕдиницаИзмерения КАК ВидУпаковки,
   |    РеализацияТоваровУслуг.Коэффициент,
   |    РеализацияТоваровУслуг.Коэффициент КАК КоличествоВОдномМесте,
   |    РеализацияТоваровУслуг.Цена * &Курс / &Кратность КАК Цена,
   |    РеализацияТоваровУслуг.Сумма * &Курс / &Кратность КАК Сумма,
   |    РеализацияТоваровУслуг.СуммаНДС * &Курс / &Кратность КАК СуммаНДС,
   |    РеализацияТоваровУслуг.Сумма  КАК СуммаВВалютеДокумента,
   |    РеализацияТоваровУслуг.СуммаНДС КАК СуммаНДСВВалютеДокумента,
   |    РеализацияТоваровУслуг.СтавкаНДС,
   |    1 КАК ID
   |ИЗ
   |    Документ.РеализацияТоваровУслуг.Товары КАК РеализацияТоваровУслуг
   |
   |ГДЕ
   |    РеализацияТоваровУслуг.Ссылка = &ТекущийДокумент
   |
   |ОБЪЕДИНИТЬ ВСЕ";
   
   Если НЕ БезУслуг Тогда
       Текст = Текст +"
       |
       |ВЫБРАТЬ
       |    РеализацияТоваровУслуг.НомерСтроки,
       //|    РеализацияТоваровУслуг.Примечание,
       |    " + ЧастьЗапросаДляВыбораСодержанияУслуг + ",
       |    " + ЧастьЗапросаДляВыбораСодержанияУслуг + ",
       |    РеализацияТоваровУслуг.Номенклатура.Код,
       |    РеализацияТоваровУслуг.Количество,
       |    0,
       |    РеализацияТоваровУслуг.Номенклатура.БазоваяЕдиницаИзмерения,
       |    РеализацияТоваровУслуг.Номенклатура.БазоваяЕдиницаИзмерения.Код,
       |    NULL,
       |    0,
       |    0,
       |    РеализацияТоваровУслуг.Цена * &Курс / &Кратность,
       |    РеализацияТоваровУслуг.Сумма * &Курс / &Кратность,
       |    РеализацияТоваровУслуг.СуммаНДС * &Курс / &Кратность,
       |    РеализацияТоваровУслуг.Сумма,
       |    РеализацияТоваровУслуг.СуммаНДС,
       |    РеализацияТоваровУслуг.СтавкаНДС,
       |    3
       |ИЗ
       |    Документ.РеализацияТоваровУслуг.Услуги КАК РеализацияТоваровУслуг
       |
       |ГДЕ
       |    РеализацияТоваровУслуг.Ссылка = &ТекущийДокумент
       |
       |ОБЪЕДИНИТЬ ВСЕ
       |
       |ВЫБРАТЬ
       |    РеализацияТоваровУслуг.НомерСтроки,
       //|    РеализацияТоваровУслуг.Примечание,
       |    " + ЧастьЗапросаДляВыбораСодержанияУслуг + ",
       |    " + ЧастьЗапросаДляВыбораСодержанияУслуг + ",
       |    РеализацияТоваровУслуг.Номенклатура.Код,
       
       |    РеализацияТоваровУслуг.Количество,
       |    0,
       |    РеализацияТоваровУслуг.Номенклатура.БазоваяЕдиницаИзмерения,
       |    РеализацияТоваровУслуг.Номенклатура.БазоваяЕдиницаИзмерения.Код,
       |    NULL,
       |    0,
       |    0,
       |    РеализацияТоваровУслуг.Цена * &Курс / &Кратность,
       |    РеализацияТоваровУслуг.Сумма * &Курс / &Кратность,
       |    РеализацияТоваровУслуг.СуммаНДС * &Курс / &Кратность,
       |    РеализацияТоваровУслуг.Сумма,
       |    РеализацияТоваровУслуг.СуммаНДС,
       |    РеализацияТоваровУслуг.СтавкаНДС,
       |    4
       |ИЗ
       |    Документ.РеализацияТоваровУслуг.АгентскиеУслуги КАК РеализацияТоваровУслуг
       |
       |ГДЕ
       |    РеализацияТоваровУслуг.Ссылка = &ТекущийДокумент
       |
       |
       |ОБЪЕДИНИТЬ ВСЕ";
   КонецЕсли;
   Текст = Текст +"
   |
   |ВЫБРАТЬ
   |    РеализацияТоваровУслуг.НомерСтроки,
   |    РеализацияТоваровУслуг.Номенклатура,
   |    ВЫРАЗИТЬ(РеализацияТоваровУслуг.Номенклатура.НаименованиеПолное КАК Строка(1000)),
   //|    РеализацияТоваровУслуг.Примечание,
   |    РеализацияТоваровУслуг.Номенклатура.Код,
   |    РеализацияТоваровУслуг.Количество,
   |    0,
   |    NULL,
   |    NULL,
   |    NULL,
   |    0,
   |    0,
   |    РеализацияТоваровУслуг.Цена * &Курс / &Кратность,
   |    РеализацияТоваровУслуг.Сумма * &Курс / &Кратность,
   |    0,
   |    РеализацияТоваровУслуг.Сумма,
   |    0,
   |    NULL,
   |    2
   |ИЗ
   |    Документ.РеализацияТоваровУслуг.ВозвратнаяТара КАК РеализацияТоваровУслуг
   |
   |ГДЕ
   |    РеализацияТоваровУслуг.Ссылка = &ТекущийДокумент
   |
   |УПОРЯДОЧИТЬ ПО
   |    ID,
   |    Номер";
   Запрос.Текст = Текст;
   
   Если Константы.ДополнительнаяКолонкаПечатныхФормДокументов.Получить() = Перечисления.ДополнительнаяКолонкаПечатныхФормДокументов.Артикул Тогда
       Запрос.Текст = СтрЗаменить(Запрос.Текст, "Номенклатура.Код","Номенклатура.Артикул");
   КонецЕсли;
   
   ЗапросТовары = Запрос.Выполнить().Выгрузить();


Вот таким стал запрос. В итоге выдается вот такое сообщение
{Форма.Форма.Форма(195)}: Ошибка при вызове метода контекста (Выполнить)
   ЗапросТовары = Запрос.Выполнить().Выгрузить();
по причине:

по причине:
В случае использования операторов ОБЪЕДИНИТЬ, поля предложений УПОРЯДОЧИТЬ ПО и ИТОГИ ПО должны находиться в списке выбора.
Не могу разобраться что с этим делать, помогите пожалуйста.
Бухгалтерия Предприятия 2.0.34.7
Платформа 8.2.14.540
1 hhhh
 
05.05.12
11:51
ну надо везде добавить примечание, чего вы прикалываетесь?
2 gosn1ck
 
05.05.12
11:53
запрос из типовой копируй в консоль запросов, там его правь, разницу руками во внешнюю пф
3 Akasyra
 
05.05.12
13:49
добавила везде теперь вот такую ошибку выдает:
{Форма.Форма.Форма(198)}: Ошибка при вызове метода контекста (Выполнить)
   ЗапросТовары = Запрос.Выполнить().Выгрузить();
по причине:

по причине:
{(31, 25)}: Поле не найдено "РеализацияТоваровУслуг.Примечание"
РеализацияТоваровУслуг.<<?>>Примечание,

Вы конечно меня извините, но я в 3 месяца как и запросы сама ещё ни разу не писала.. Без спец образования в этой области. Может кто-то что-то подобное делал, есть пример у кого выложите, пожалуйста, я посмотрю..

Если в конструкторе запроса добавляю Примечание из ТЧ получаю строки типа: |   РеализацияТоваровУслуг.Товар ( Примечание )
то все равно выдает эту ошибку...
4 Akasyra
 
05.05.12
13:53
Вот такая ошибка, когда "Если в конструкторе запроса добавляю Примечание из ТЧ получаю строки типа: |   РеализацияТоваровУслуг.Товар ( Примечание ) "
{Форма.Форма.Форма(201)}: Ошибка при вызове метода контекста (Выполнить)
   ЗапросТовары = Запрос.Выполнить().Выгрузить();
по причине:

по причине:
{(31, 25)}: Поле не найдено "РеализацияТоваровУслуг.Примечание"
РеализацияТоваровУслуг.<<?>>Примечание,


Собственно текст:
Запрос.Текст =
   "ВЫБРАТЬ
   |    РеализацияТоваровУслуг.Номер,
   |    РеализацияТоваровУслуг.Дата КАК ДатаДокумента,
   |    РеализацияТоваровУслуг.Организация,
   |    РеализацияТоваровУслуг.Организация КАК ЮрФизЛицо,
   |    РеализацияТоваровУслуг.Организация КАК Поставщик,
   |    РеализацияТоваровУслуг.Организация КАК Контрагент,
   |    РеализацияТоваровУслуг.Организация КАК Руководители,
   |    РеализацияТоваровУслуг.АдресДоставки КАК АдресДоставки,
   |    ВЫБОР
   |        КОГДА РеализацияТоваровУслуг.Грузополучатель = &ПустойКонтрагент
   |            ТОГДА РеализацияТоваровУслуг.Контрагент
   |        ИНАЧЕ РеализацияТоваровУслуг.Грузополучатель
   |    КОНЕЦ КАК Грузополучатель,
   |    ВЫБОР
   |        КОГДА РеализацияТоваровУслуг.Грузоотправитель = &ПустойКонтрагент
   |            ТОГДА РеализацияТоваровУслуг.Организация
   |        ИНАЧЕ РеализацияТоваровУслуг.Грузоотправитель
   |    КОНЕЦ КАК Грузоотправитель,
   |    РеализацияТоваровУслуг.БанковскийСчетОрганизации КАК БанковскийСчет,
   |    РеализацияТоваровУслуг.Контрагент КАК Покупатель,
   |    РеализацияТоваровУслуг.Контрагент КАК Плательщик,
   |    РеализацияТоваровУслуг.Водитель.Фамилия,
   |    РеализацияТоваровУслуг.ДоговорКонтрагента.Представление КАК Основание,
   |    РеализацияТоваровУслуг.ДоговорКонтрагента.РасчетыВУсловныхЕдиницах КАК РасчетыВУсловныхЕдиницах,
   |    РеализацияТоваровУслуг.ВалютаДокумента,
   |    РеализацияТоваровУслуг.КурсВзаиморасчетов КАК Курс,
   |    РеализацияТоваровУслуг.КратностьВзаиморасчетов КАК Кратность,
   |    РеализацияТоваровУслуг.УчитыватьНДС,
   |    РеализацияТоваровУслуг.СуммаВключаетНДС,
   |    РеализацияТоваровУслуг.Товары.(
   |        Примечание
   |    )
   |ИЗ
   |    Документ.РеализацияТоваровУслуг КАК РеализацияТоваровУслуг
   |ГДЕ
   |    РеализацияТоваровУслуг.Ссылка = &ТекущийДокумент";
   

   Шапка = Запрос.Выполнить().Выбрать();
   Шапка.Следующий();

   Запрос = Новый Запрос;
   Запрос.УстановитьПараметр("ТекущийДокумент", ЭтотОбъект.СсылкаНаОбъект);
   Запрос.УстановитьПараметр("Курс",            ЗаполнениеДокументов.КурсДокумента(ЭтотОбъект,      мВалютаРегламентированногоУчета));
   Запрос.УстановитьПараметр("Кратность",       ЗаполнениеДокументов.КратностьДокумента(ЭтотОбъект, мВалютаРегламентированногоУчета));
   
   
   
   Текст =
   "ВЫБРАТЬ
   |    РеализацияТоваровУслуг.НомерСтроки КАК Номер,
   |    РеализацияТоваровУслуг.Номенклатура,
   |    ВЫРАЗИТЬ(РеализацияТоваровУслуг.Номенклатура.НаименованиеПолное КАК Строка(1000)),
   |    РеализацияТоваровУслуг.Примечание,
   |    РеализацияТоваровУслуг.Номенклатура.Код КАК ТоварКод,
   |    РеализацияТоваровУслуг.Количество,
   |    РеализацияТоваровУслуг.КоличествоМест,
   |    РеализацияТоваровУслуг.Номенклатура.БазоваяЕдиницаИзмерения КАК БазоваяЕдиницаНаименование,
   |    РеализацияТоваровУслуг.Номенклатура.БазоваяЕдиницаИзмерения.Код КАК БазоваяЕдиницаКодПоОКЕИ,
   |    РеализацияТоваровУслуг.ЕдиницаИзмерения КАК ВидУпаковки,
   |    РеализацияТоваровУслуг.Коэффициент,
   |    РеализацияТоваровУслуг.Коэффициент КАК КоличествоВОдномМесте,
   |    РеализацияТоваровУслуг.Цена * &Курс / &Кратность КАК Цена,
   |    РеализацияТоваровУслуг.Сумма * &Курс / &Кратность КАК Сумма,
   |    РеализацияТоваровУслуг.СуммаНДС * &Курс / &Кратность КАК СуммаНДС,
   |    РеализацияТоваровУслуг.Сумма  КАК СуммаВВалютеДокумента,
   |    РеализацияТоваровУслуг.СуммаНДС КАК СуммаНДСВВалютеДокумента,
   |    РеализацияТоваровУслуг.СтавкаНДС,
   |    1 КАК ID
   |ИЗ
   |    Документ.РеализацияТоваровУслуг.Товары КАК РеализацияТоваровУслуг
   |
   |ГДЕ
   |    РеализацияТоваровУслуг.Ссылка = &ТекущийДокумент
   |
   |ОБЪЕДИНИТЬ ВСЕ";
   
   Если НЕ БезУслуг Тогда
       Текст = Текст +"
       |
       |ВЫБРАТЬ
       |    РеализацияТоваровУслуг.НомерСтроки,
       |    РеализацияТоваровУслуг.Примечание,
       |    " + ЧастьЗапросаДляВыбораСодержанияУслуг + ",
       |    " + ЧастьЗапросаДляВыбораСодержанияУслуг + ",
       |    РеализацияТоваровУслуг.Номенклатура.Код,
       |    РеализацияТоваровУслуг.Количество,
       |    0,
       |    РеализацияТоваровУслуг.Номенклатура.БазоваяЕдиницаИзмерения,
       |    РеализацияТоваровУслуг.Номенклатура.БазоваяЕдиницаИзмерения.Код,
       |    NULL,
       |    0,
       |    0,
       |    РеализацияТоваровУслуг.Цена * &Курс / &Кратность,
       |    РеализацияТоваровУслуг.Сумма * &Курс / &Кратность,
       |    РеализацияТоваровУслуг.СуммаНДС * &Курс / &Кратность,
       |    РеализацияТоваровУслуг.Сумма,
       |    РеализацияТоваровУслуг.СуммаНДС,
       |    РеализацияТоваровУслуг.СтавкаНДС,
       |    3
       |ИЗ
       |    Документ.РеализацияТоваровУслуг.Услуги КАК РеализацияТоваровУслуг
       |
       |ГДЕ
       |    РеализацияТоваровУслуг.Ссылка = &ТекущийДокумент
       |
       |ОБЪЕДИНИТЬ ВСЕ
       |
       |ВЫБРАТЬ
       |    РеализацияТоваровУслуг.НомерСтроки,
       |    РеализацияТоваровУслуг.Примечание,
       |    " + ЧастьЗапросаДляВыбораСодержанияУслуг + ",
       |    " + ЧастьЗапросаДляВыбораСодержанияУслуг + ",
       |    РеализацияТоваровУслуг.Номенклатура.Код,
       
       |    РеализацияТоваровУслуг.Количество,
       |    0,
       |    РеализацияТоваровУслуг.Номенклатура.БазоваяЕдиницаИзмерения,
       |    РеализацияТоваровУслуг.Номенклатура.БазоваяЕдиницаИзмерения.Код,
       |    NULL,
       |    0,
       |    0,
       |    РеализацияТоваровУслуг.Цена * &Курс / &Кратность,
       |    РеализацияТоваровУслуг.Сумма * &Курс / &Кратность,
       |    РеализацияТоваровУслуг.СуммаНДС * &Курс / &Кратность,
       |    РеализацияТоваровУслуг.Сумма,
       |    РеализацияТоваровУслуг.СуммаНДС,
       |    РеализацияТоваровУслуг.СтавкаНДС,
       |    4
       |ИЗ
       |    Документ.РеализацияТоваровУслуг.АгентскиеУслуги КАК РеализацияТоваровУслуг
       |
       |ГДЕ
       |    РеализацияТоваровУслуг.Ссылка = &ТекущийДокумент
       |
       |
       |ОБЪЕДИНИТЬ ВСЕ";
   КонецЕсли;
   Текст = Текст +"
   |
   |ВЫБРАТЬ
   |    РеализацияТоваровУслуг.НомерСтроки,
   |    РеализацияТоваровУслуг.Номенклатура,
   |    ВЫРАЗИТЬ(РеализацияТоваровУслуг.Номенклатура.НаименованиеПолное КАК Строка(1000)),
   //|    РеализацияТоваровУслуг.Примечание,
   |    РеализацияТоваровУслуг.Номенклатура.Код,
   |    РеализацияТоваровУслуг.Количество,
   |    0,
   |    NULL,
   |    NULL,
   |    NULL,
   |    0,
   |    0,
   |    РеализацияТоваровУслуг.Цена * &Курс / &Кратность,
   |    РеализацияТоваровУслуг.Сумма * &Курс / &Кратность,
   |    0,
   |    РеализацияТоваровУслуг.Сумма,
   |    0,
   |    NULL,
   |    2
   |ИЗ
   |    Документ.РеализацияТоваровУслуг.ВозвратнаяТара КАК РеализацияТоваровУслуг
   |
   |ГДЕ
   |    РеализацияТоваровУслуг.Ссылка = &ТекущийДокумент
   |
   |УПОРЯДОЧИТЬ ПО
   |    ID,
   |    Номер";
   Запрос.Текст = Текст;
5 ProProg
 
05.05.12
13:54
3000 руб
6 Akasyra
 
05.05.12
14:07
Ыыы =)
Глупец, лишенный способности посмеяться над собой вместе с другими, не сможет долго выносить программирование. Фредерик Брукс-младший