Имя: Пароль:
1C
1С v8
Не печатается накладка, подскажите по ошибке
0 demous
 
17.05.12
14:03
УПП 8.2, при печати из ПеремещениеТоваров накладной М 11, выдается такая ошибка


{Документ.ПеремещениеТоваров.МодульМенеджера(1027)}: Ошибка при вызове метода контекста (Выполнить)
       Шапка = Запрос.Выполнить().Выбрать();
по причине:

по причине:
{(7, 2)}: Поле не входит в группу "ОтветственныеЛицаОтправитель.ФизическоеЛицо"
<<?>>ОтветственныеЛицаОтправитель.ФизическоеЛицо КАК ФизЛицоОтправитель,

где группа эта?
1 andrewks
 
17.05.12
14:04
в запросе, вестимо
2 Ненавижу 1С
 
гуру
17.05.12
14:04
в группу или в группировку?

запрос показывай
3 demous
 
17.05.12
14:09
Функция ПечатьМ11(МассивОбъектов, ОбъектыПечати)
   
   ДопКолонка = Константы.ДополнительнаяКолонкаПечатныхФормДокументов.Получить();
   Если ДопКолонка = Перечисления.ДополнительнаяКолонкаПечатныхФормДокументов.Артикул Тогда
       ТоварКод = "Артикул";
   Иначе
       ТоварКод = "Код";
   КонецЕсли;
   
   ТекстЗапросаШапка =
   "ВЫБРАТЬ
   |    Ссылка.Номер    КАК НомерДокумента,
   |    Ссылка.Дата    КАК ДатаДокумента,
   |    Ссылка.Дата    КАК ДатаСоставления,
   |    Ссылка.Организация,
   |    Ссылка.СкладОтправитель КАК Склад,
   //>> Портал-Юг 151210 Селезнев А.А. добавил получение физ.лиц из складов
   |    ОтветственныеЛицаОтправитель.ФизическоеЛицо КАК ФизЛицоОтправитель,
   |    ОтветственныеЛицаПолучатель.ФизическоеЛицо  КАК ФизЛицоПолучатель,
   //<<
   |    Ссылка.СкладПолучатель КАК Подразделение
   |    //ПОЛЕ_КорСчет ,ВЫБОР КОГДА КОЛИЧЕСТВО(РАЗЛИЧНЫЕ НовыйСчетУчетаБУ) = 1 ТОГДА
   |    //ПОЛЕ_КорСчет    МИНИМУМ(НовыйСчетУчетаБУ)
   |    //ПОЛЕ_КорСчет ИНАЧЕ """" КОНЕЦ КАК КоррСчет
   |ИЗ
   |    Документ.ПеремещениеТоваров КАК ПеремещениеТоваров
   //>> Портал-Юг 151210 Селезнев А.А. добавил получение физ.лиц из складов
   |ЛЕВОЕ СОЕДИНЕНИЕ
   |    РегистрСведений.ОтветственныеЛица.СрезПоследних(&Дата, СтруктурнаяЕдиница = &СкладОтправитель) КАК ОтветственныеЛицаОтправитель
   |ПО
   |    ИСТИНА
   |ЛЕВОЕ СОЕДИНЕНИЕ
   |    РегистрСведений.ОтветственныеЛица.СрезПоследних(&Дата, СтруктурнаяЕдиница = &СкладПолучатель)  КАК ОтветственныеЛицаПолучатель
   |ПО
   |    ИСТИНА    
   //<<
   |
   |ГДЕ
   |    ПеремещениеТоваров.Ссылка = &ТекущийДокумент
   |//ПОЛЕ_КорСчет СГРУППИРОВАТЬ ПО Ссылка";
   
   ТекстЗапросаТовары = "
   |ВЫБРАТЬ
   |    ВложенныйЗапрос.Номенклатура                                  КАК Номенклатура,
   |    ВЫРАЗИТЬ(ВложенныйЗапрос.Номенклатура.НаименованиеПолное КАК Строка(1000)) КАК МатериалНаименование,
   |    ВложенныйЗапрос.Номенклатура." + ТоварКод + "                 КАК НоменклатурныйНомер,
   |    ВложенныйЗапрос.ЕдиницаИзмерения.Представление                КАК ЕдиницаИзмеренияНаименование,
   |    ВложенныйЗапрос.ЕдиницаИзмерения.ЕдиницаПоКлассификатору.Код  КАК ЕдиницаИзмеренияКод,
   |    ВложенныйЗапрос.Характеристика       КАК Характеристика,
   |    ВложенныйЗапрос.Серия                КАК Серия,
   |    ВложенныйЗапрос.Количество           КАК Количество,
   |    ВложенныйЗапрос.Счет                   КАК Счет,
   |    ВложенныйЗапрос.НомерСтроки          КАК НомерСтроки
   |ИЗ
   |    (
   |    ВЫБРАТЬ
   |        Номенклатура,
   |        ЕдиницаИзмерения,
   |        СчетУчетаБУ КАК Счет,
   |        ХарактеристикаНоменклатуры    КАК Характеристика,
   |        СерияНоменклатуры           КАК Серия,
   |        СУММА(Количество)           КАК Количество,
   |        МИНИМУМ(НомерСтроки)        КАК НомерСтроки
   |    ИЗ
   |        Документ.ПеремещениеТоваров.Товары КАК ПеремещениеТоваров
   |    ГДЕ
   |        ПеремещениеТоваров.Ссылка = &ТекущийДокумент
   |
   |    СГРУППИРОВАТЬ ПО
   |        Номенклатура,
   |        ЕдиницаИзмерения,
   |        ХарактеристикаНоменклатуры,
   |        СерияНоменклатуры,
   |        СчетУчетаБУ
   |
   |    ) КАК ВложенныйЗапрос
   |
   |УПОРЯДОЧИТЬ ПО НомерСтроки ВОЗР
   |";
   
   ТабДокумент = Новый ТабличныйДокумент;
   ТабДокумент.ИмяПараметровПечати = "ПАРАМЕТРЫ_ПЕЧАТИ_ПеремещениеТоваров_М11";
   
   // Вывод заголовка
   Макет = ПолучитьОбщийМакет("М11");

   ПервыйДокумент = Истина;
   
   Для Каждого Ссылка Из МассивОбъектов Цикл
       
       Если Не ПервыйДокумент Тогда
           ТабДокумент.ВывестиГоризонтальныйРазделительСтраниц();
       КонецЕсли;
       
       ПервыйДокумент = Ложь;
       
       НомерСтрокиНачало = ТабДокумент.ВысотаТаблицы + 1;

       Запрос = Новый Запрос;
       Запрос.УстановитьПараметр("ТекущийДокумент", Ссылка);
       //>> Портал-Юг 151210 Селезнев А.А. добавил получение физ.лиц из складов
       Запрос.УстановитьПараметр("Дата",             Ссылка.Дата);
       Запрос.УстановитьПараметр("СкладОтправитель", Ссылка.СкладОтправитель);
       Запрос.УстановитьПараметр("СкладПолучатель",  Ссылка.СкладПолучатель);
       //<<
       Запрос.Текст = ТекстЗапросаШапка;
       Если Ссылка.ОтражатьВБухгалтерскомУчете Тогда
           Запрос.Текст = СтрЗаменить(Запрос.Текст, "Документ.ПеремещениеТоваров", "Документ.ПеремещениеТоваров.Товары");
           Запрос.Текст = СтрЗаменить(Запрос.Текст, "//ПОЛЕ_КорСчет", "");
       Иначе
           Запрос.Текст = СтрЗаменить(Запрос.Текст,"Ссылка.", "");
       КонецЕсли;

       Шапка = Запрос.Выполнить().Выбрать();
       Шапка.Следующий();
       
       Запрос = Новый Запрос;
       Запрос.УстановитьПараметр("ТекущийДокумент", Ссылка);

       Запрос.Текст = ТекстЗапросаТовары;

       ЗапросПоНоменклатуре = Запрос.Выполнить();
       
       Область = Макет.ПолучитьОбласть("Шапка");
       Область.Параметры.Заголовок     = "ТРЕБОВАНИЕ-НАКЛАДНАЯ № " + Строка(Шапка.НомерДокумента);
       Область.Параметры.Заполнить(Шапка);
       
       СведенияОбОрганизации = УправлениеКонтактнойИнформацией.СведенияОЮрФизЛице(Шапка.Организация, Шапка.ДатаДокумента);

       Область.Параметры.ПредставлениеОрганизации   = ФормированиеПечатныхФормСервер.ОписаниеОрганизации(СведенияОбОрганизации);
       Область.Параметры.ПредставлениеПодразделения = Шапка.Подразделение;
       Область.Параметры.КодОКПО                    = СведенияОбОрганизации.КодПоОКПО;
       
       ТабДокумент.Вывести(Область);
       
       ВыборкаПоСтрокам = ЗапросПоНоменклатуре.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);
       Пока ВыборкаПоСтрокам.Следующий() Цикл

           Область = Макет.ПолучитьОбласть("Строка");
           Область.Параметры.Заполнить(ВыборкаПоСтрокам);
           Область.Параметры.МатериалНаименование = СокрЛП(ВыборкаПоСтрокам.МатериалНаименование) + ФормированиеПечатныхФормСервер.ПредставлениеСерий(ВыборкаПоСтрокам);
           
           ТабДокумент.Вывести(Область);

       КонецЦикла;
       
       Область = Макет.ПолучитьОбласть("Подвал");
       //>> Портал-Юг 151210 Селезнев А.А. добавил получение физ.лиц из складов
       ФИООтправителя = ФормированиеПечатныхФормСервер.ФамилияИмяОтчество(Шапка.ФизЛицоОтправитель, Шапка.ДатаДокумента);
       ФИОПолучателя  = ФормированиеПечатныхФормСервер.ФамилияИмяОтчество(Шапка.ФизЛицоПолучатель,  Шапка.ДатаДокумента);        
       Область.Параметры.ДолжностьОтправителя = ПолныеПрава.СведенияОСотруднике(Шапка.ФизЛицоОтправитель, Шапка.ДатаДокумента, Шапка.Организация).Должность;
       Область.Параметры.ФИООтправителя       = ОбщегоНазначения.ФамилияИнициалыФизЛица(ФИООтправителя.Фамилия + " " + ФИООтправителя.Имя + " " + ФИООтправителя.Отчество);
       Область.Параметры.ДолжностьПолучателя  = ПолныеПрава.СведенияОСотруднике(Шапка.ФизЛицоПолучатель,  Шапка.ДатаДокумента, Шапка.Организация).Должность;
       Область.Параметры.ФИОПолучателя        = ОбщегоНазначения.ФамилияИнициалыФизЛица(ФИОПолучателя.Фамилия  + " " + ФИОПолучателя.Имя  + " " + ФИОПолучателя.Отчество);
       //<<
       ТабДокумент.Вывести(Область);
       УправлениеПечатью.ЗадатьОбластьПечатиДокумента(ТабДокумент, НомерСтрокиНачало, ОбъектыПечати, Ссылка);
   КонецЦикла;

   Возврат ТабДокумент;
   
КонецФункции // ПечатьМ11()
4 andrewks
 
17.05.12
14:10
Селезнева А.А. из Портал-Юг 151210   - на кол
5 demous
 
17.05.12
14:11
что он там не так сделал?
6 Ненавижу 1С
 
гуру
17.05.12
14:11
Потралу Юг привет! Мостовой что-то плохих программеров стал набирать
7 DrShad
 
17.05.12
14:12
(4) +100500
8 demous
 
17.05.12
14:12
подскажите с чем связанна ошибка?) я не совсем въехал в нее
9 demous
 
17.05.12
14:16
люди)
10 Ненавижу 1С
 
гуру
17.05.12
14:17
поставь точку останова в строке Шапка = Запрос.Выполнить().Выбрать();
и покажи текст конечный текст запроса
11 andrewks
 
17.05.12
14:20
попробуй закомментить эту строку:
Запрос.Текст = СтрЗаменить(Запрос.Текст, "//ПОЛЕ_КорСчет", "");
12 DrShad
 
17.05.12
14:20
|//ПОЛЕ_КорСчет СГРУППИРОВАТЬ ПО Ссылка";

и

Запрос.Текст = СтрЗаменить(Запрос.Текст, "//ПОЛЕ_КорСчет", "");
13 andrewks
 
17.05.12
14:20
(12) фотофиниш :)
14 andrewks
 
17.05.12
14:28
ТекстЗапросаШапка =
   "ВЫБРАТЬ
   |    Ссылка.Номер     КАК НомерДокумента,
   |    Ссылка.Дата    КАК ДатаДокумента,
   |    Ссылка.Дата    КАК ДатаСоставления,
   |    Ссылка.Организация,
   |    Ссылка.СкладОтправитель КАК Склад,
   //>> Портал-Юг 151210 Селезнев А.А. добавил получение физ.лиц из складов

   |    ОтветственныеЛицаОтправитель.ФизическоеЛицо КАК ФизЛицоОтправитель,
   |    ОтветственныеЛицаПолучатель.ФизическоеЛицо  КАК ФизЛицоПолучатель,
   //<<

   |    Ссылка.СкладПолучатель КАК Подразделение
   |    //ПОЛЕ_КорСчет ,ВЫБОР КОГДА КОЛИЧЕСТВО(РАЗЛИЧНЫЕ НовыйСчетУчетаБУ) = 1 ТОГДА

   |    //ПОЛЕ_КорСчет    МИНИМУМ(НовыйСчетУчетаБУ)

   |    //ПОЛЕ_КорСчет ИНАЧЕ """" КОНЕЦ КАК КоррСчет

   |ИЗ
   |    Документ.ПеремещениеТоваров КАК ПеремещениеТоваров
   //>> Портал-Юг 151210 Селезнев А.А. добавил получение физ.лиц из складов

   |ЛЕВОЕ СОЕДИНЕНИЕ
   |    РегистрСведений.ОтветственныеЛица.СрезПоследних(&Дата, СтруктурнаяЕдиница = &СкладОтправитель) КАК ОтветственныеЛицаОтправитель
   |ПО
   |    ИСТИНА
   |ЛЕВОЕ СОЕДИНЕНИЕ
   |    РегистрСведений.ОтветственныеЛица.СрезПоследних(&Дата, СтруктурнаяЕдиница = &СкладПолучатель)  КАК ОтветственныеЛицаПолучатель
   |ПО
   |    ИСТИНА    
   //<<

   |
   |ГДЕ
   |    ПеремещениеТоваров.Ссылка = &ТекущийДокумент
   |//ПОЛЕ_КорСчет СГРУППИРОВАТЬ ПО Ссылка,
   |//ПОЛЕ_КорСчет ОтветственныеЛицаОтправитель.ФизическоеЛицо,
   |//ПОЛЕ_КорСчет ОтветственныеЛицаПолучатель.ФизическоеЛицо";
15 DrShad
 
17.05.12
14:34
(14) ну теперь другим тут делать нечего