Ошибка при вызове метода контекста загрузить несоответствие типов параметр номер 1

После выполнения запроса, пытаюсь загрузить результат запроса в табличную часть Документа. Выдает ошибку:

Ошибка при вызове метода контекста (Загрузить): Несоответствие типов (параметр номер ‘1’)

УстановкаРазрешений.Партнеры.Загрузить(Результат);

по причине:

Несоответствие типов (параметр номер ‘1’)

Поля совпадают. Из-за чего такое может быть?

| ВЫБРАТЬ

| втДанные.Контрагент КАК Контрагент,

| втДанные.Артикул КАК Артикул,

| втДанные.Разрешение КАК Разрешенность

|ИЗ

| втДанные КАК втДанные

| ЛЕВОЕ СОЕДИНЕНИЕ втСрезРазрешений КАК втСрезРазрешений

| ПО втДанные.Контрагент = втСрезРазрешений.КонтрагентСрез И втДанные.Артикул = втСрезРазрешений.АртикулСрез

|ГДЕ

…

ЗапросРазрешений.УстановитьПараметр(«Данные»,ДанныеXML);

Результат = ЗапросРазрешений.Выполнить().Выбрать();

УстановкаРазрешений = Документы.УстановкаРазрешенийКОтгрузке.СоздатьДокумент(); УстановкаРазрешений.Партнеры.Загрузить(Результат); // тут ошибка

Источник

Ошибка Несоответствие типов в 1С 8.3 связана с передачей параметров в командах и запросах 1С.

Изучив статью, вы:

ознакомитесь с порядком исправления ошибки в запросе и командах 1С;
получите два внешних отчета, демонстрирующих ошибочный и правильный коды.

Содержание

Несоответствие типов в 1С 8.3
- Ошибка в таблице запроса
- Исправление ошибки в команде 1С

Как правило, параметры в командах 1С идут в определенной очередности и ссылаются на данные конкретного типа. Ошибка в указании параметра не на том месте или не того типа приводит к появлению сообщения о несоответствии типов:

Исправляется подобная ошибка восстановлением правильной последовательности в строке параметров команды или указанием нужного типа данных Ошибка 1С Несоответствие типов наиболее часто появляется при написании запросов и при некорректном указании параметров команды.

Рассмотрим причины ее возникновения и исправление на конкретном примере.

Ошибка в таблице запроса

При чтении цен номенклатуры по регистру сведений Цены номенклатуры из внешнего отчета появляется ошибка Неоднозначное поле «ТипЦен.Номенклатура».

В окне сообщений уже указано место возникновения ошибки: Параметр номер «1» в строке Регистр сведений.ЦеныНоменклатуры.СрезПоследних(&&ТипЦен,) КАК ЦеныНоменклатурыСрезПоследних.

Для исправления ошибки необходимо открыть отчет в Конфигураторе 1С и найти в модуле формы указанную строчку.

Правильность написания команды проверьте по выделенной кнопке Синтаксис-Помощник в меню 1С:

Из описания видно, что команда СрезПоследних имеет 2 параметра:

Период;
Отбор.

Если параметр Период не указывается, место в команде остается пустым, а через запятую указывается параметр отбора, в нашем случае: ТипЦен. Исправленная команда выглядит следующим образом: СрезПоследних(, ТипЦен = &ТипЦен ).

После исправления команды запустите отчет в 1С по кнопке Главное меню — Файл — Открыть:

Теперь отчет формируется правильно!

Скачать внешний отчет Вывод списка цен номенклатуры

Исправление ошибки в команде 1С

При поиске ссылок на контрагента в отчете 1С появляется ошибка Несоответствие типов (параметр номер 2):

1С сообщает место ошибки — Параметр номер 2 при нажатии кнопки ERROR.

Для ее исправления необходимо открыть отчет в Конфигураторе 1С и найти в модуле формы строчку с командой НайтиПоСсылкам.

Правильность написания команды проверьте по выделенной кнопке Синтаксис-Помощник в меню 1С:

Из описания идно, что команда НайтиПоСсылкам имеет 4 параметра:

СписокСсылок;
ОбластьПоиска;
ВключитьОбъекты;
ИсключитьОбъекты.

Параметр ОбластьПоиска имеет тип «массив», а в нашем примере указано число 1: НайтиПоСсылкам(МассивПоиска, 1, , МассивИсключений). Область поиска — необязательный параметр, поэтому исправленная команда может выглядеть следующим образом: НайтиПоСсылкам(МассивПоиска, , , МассивИсключений).

После исправления команды запустите внешний отчет в 1С по кнопке Главное меню — Файл — Открыть:

Теперь команда поиска ссылок на контрагента отрабатывает правильно.

Скачать внешний отчет Поиск ссылок на контрагента

Вот так можно получить ошибку 1С Несоответствие типов в 1С, поэтому контролируйте правильность указания параметров в запросах и командах 1С в Синтаксис-Помощнике!

См. также:

Неоднозначное поле в запросе

Исправление технических ошибок при работе с 1С:Бухгалтерия: для начинающих и опытных пользователей

Метод объекта не обнаружен

Неизвестный идентификатор формы

Переменная не определена

Если Вы еще не подписаны:

Активировать демо-доступ бесплатно →

или

Оформить подписку на Рубрикатор →

После оформления подписки вам станут доступны все материалы Бухэксперт8, записи поддерживающих эфиров и вы сможете задавать любые вопросы по программе 1С.

Подписывайтесь на наши YouTube и Telegram чтобы не пропустить
важные изменения 1С и законодательства

Помогла статья?

Получите еще секретный бонус и полный доступ к справочной системе БухЭксперт8 на 14 дней бесплатно

Источник

Здравствуйте, помогите пожалуйста с проблемой.
У меня внешняя обработка, загрузка xml файла в дерево значений, и выдает ошибку {Обработка.Обработка1.Форма.Форма.Форма(37)}: Ошибка при вызове метода контекста (УстановитьСтроку)
Чтение.УстановитьСтроку(ТекстXML);
по причине:
Несоответствие типов (параметр номер ‘1’)
Что нужно сделать?? Я начинающий программист в 1с, и поэтому не очень сильна в этом.

Вот полностью мой код модуля.

&НаКлиенте
Процедура Файл(Команда)
   Диалог = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Открытие);
   Диалог.Заголовок = «Выбор документа»;
   Диалог.Фильтр = «Документы XML (*.xml, *.xdr, *.xsd, *.xsl)|*.xml;*.xdr;*.xsd;*.xsl|Все файлы|*.*|»;
   Если Диалог.Выбрать() Тогда
      ТекстXML.Прочитать(Диалог.ПолноеИмяФайла);
      Документ = ТекстXML.ПолучитьТекст();
      Заголовок = «Просмотр XML-документа: » + Диалог.ПолноеИмяФайла;

КонецЕсли;

КонецПроцедуры

&НаКлиенте
Процедура КнИмпорт(Команда)
Если НЕ ПустаяСтрока(ТекстXML) Тогда
Дерево = Импорт1();

                              Если Объект.Дерево.Строки.Количество() > 0 Тогда
         ЭлементДерево = ТекстXML.Объект.Дерево;
         ЭлементДерево.СоздатьКолонки();
         ЭлементДерево.Колонки.Удалить(ЭлементДерево.Колонки[«Атрибуты»]);

               КонецЕсли;
   КонецЕсли;
КонецПроцедуры
&НаСервере
Функция Импорт1() Экспорт
   Чтение = Новый ЧтениеXML();
   Чтение.УстановитьСтроку(ТекстXML);
   ДеревоЗначений = Новый ДеревоЗначений();

   ДеревоЗначений.Колонки.Добавить(«Элемент»);
   ДеревоЗначений.Колонки.Добавить(«Текст»);
   ДеревоЗначений.Колонки.Добавить(«Атрибуты»);
   Корень = ДеревоЗначений.Строки.Добавить();
   Корень.Элемент = Чтение.Имя;
   Рекурсия(Корень, Чтение);
   Возврат ДеревоЗначений;
КонецФункции
Процедура Рекурсия(СтрокаДерева, Чтение)
   Если Чтение.КоличествоАтрибутов() > 0 Тогда
      АтрибутыСоответствие = Новый Соответствие();
      Пока Чтение.ПрочитатьАтрибут() Цикл
         АтрибутыСоответствие.Вставить(Чтение.Имя, Чтение.Значение);
      КонецЦикла;
      СтрокаДерева.Атрибуты = АтрибутыСоответствие;
   КонецЕсли;
   //Состояние(Чтение.Имя);
   Пока Чтение.Прочитать() Цикл
      Если Чтение.ТипУзла = ТипУзлаXML.КонецЭлемента Тогда
         Прервать;
      ИначеЕсли Чтение.ТипУзла = ТипУзлаXML.Текст Тогда
         СтрокаДерева.Текст = Чтение.Значение;
      ИначеЕсли Чтение.ТипУзла = ТипУзлаXML.НачалоЭлемента Тогда
         Дочерний = СтрокаДерева.Строки.Добавить();
         Дочерний.Элемент = Чтение.Имя;
         Рекурсия(Дочерний, Чтение);
      КонецЕсли;
         КонецЦикла;
КонецПроцедуры

&НаКлиенте
Процедура Дерево1ПриАктивизацииСтроки(Элемент)
   Объект.Атрибуты.Очистить();
   Данные = Элемент.ТекущиеДанные;
   Если Данные <> Неопределено Тогда
      АтрибутыДерева = Данные.Атрибуты;
      Если ТипЗнч(АтрибутыДерева) = Тип(«Соответствие») Тогда
         Для каждого АтрибутДерева из АтрибутыДерева Цикл
            СтрокаТаблицы = Объект.Атрибуты.Добавить();
            СтрокаТаблицы.Атрибут = АтрибутДерева.Ключ;
            СтрокаТаблицы.ЗначениеАтрибута = АтрибутДерева.Значение;
         КонецЦикла;
      КонецЕсли;
   КонецЕсли;
КонецПроцедуры

&НаКлиенте
Процедура Дерево1Выбор(Элемент, ВыбраннаяСтрока, Поле, СтандартнаяОбработка)
ОткрытьЗначение(ВыбраннаяСтрока.Текст);
КонецПроцедуры

&НаКлиенте
Процедура АтрибутыВыбор(Элемент, ВыбраннаяСтрока, Поле, СтандартнаяОбработка)
ОткрытьЗначение(ВыбраннаяСтрока.ЗначениеАтрибута);

КонецПроцедуры

Процедура ОчиститьТаблицы() Экспорт
   Объект.Дерево.Строки.Очистить();
   Объект.Дерево.Колонки.Очистить();
   Объект.Атрибуты.Очистить();
КонецПроцедуры

Источник

Содержание:

1. Несоответствие типов данных

2. Ошибка внутри таблицы в запросе

3. Причина ошибки внутри команды

Приветствую, коллеги! В данной статье рассмотрим понятие и описание типа данных и переменных в системе 1С версии 8.3. Также поговорим о распространенной ошибке «Несоответствие типов», изложим инструкцию с по ее устранению.

1. Несоответствие типов данных

Тип – это характеристика у значения, которая определяет поведение и свойства, которые имеет данное значение.

В командах внутри системы 1С параметры имеют некую специальную очерёдность, а также все параметры имеют ссылку на данные, которые связаны с каким-либо типом. В случае, когда какой-то из параметров находится в неположенном месте, либо название не соответствует типу, выполняются невозможные действия для конкретного типа – появляется сообщение, в котором говорится о несоответствии типов данных (показано на скриншоте ниже):

Сообщение об ошибке несоответствии типов

Рис. 1 Сообщение об ошибке несоответствии типов

Чаще всего данная неполадка возникает, когда при написании запроса внутри команды не верно указывают параметры. Исправление подобной ошибки производится при помощи изменения типа передаваемого параметра или используемой переменной на правильный тип данных.

2. Ошибка внутри таблицы в запросе

Рассмотрим пример: при чтении цен из номенклатуры согласно регистру данных «Цены номенклатуры» с общего внешнего отчёта всплывает ошибка «Неоднозначное поле «ТипЦен.Номенклатура».

Ошибка Неоднозначное поле

Рис. 2 Ошибка Неоднозначное поле

Видим, что в окне с сообщением о неполадке указано место в коде, где возникла ошибка несоответствия типов: «Параметр номер «1», в строчке вида:

«РегистрСведений.ЦеныНоменклатуры.СрезПоследних(&&ТипЦен,) КАК ЦеныНоменклатурыСрезПоследних.

Чтобы устранить данную ошибку в первую очередь откроем конфигурацию с данным отчётом и найдем внутри кода с формой строчку, которая была приведена выше:

Исправление ошибки несоответствия типов (Параметр номер 1)

Рис. 3 Исправление ошибки несоответствия типов (Параметр номер 1)

При помощи «Синтаксис-Помощника», в меню конфигурации 1С можно сверить, насколько правильно была написана команда:

Исправление ошибки несоответствия типов

Рис. 4 Проверка написания команды с помощью Синтаксис-Помощника

Согласно описанию, в команде «СрезПоследних» находится два параметра: «Отбор» и «Период».

В случае, когда параметр «Период» не был указан, в данной команде будет пустое поле, а после запятой будет написан параметр для отбора. Для нашего примера этим параметром будет «ТипЦен». После правок команда видоизменится так: «СрезПоследних(,ТипЦен = &ТипЦен).

Исправление команды СрезПоследних

Рис. 5 Исправление команды СрезПоследних

После того как команда СрезПоследних была исправлена, стоит снова сформировать отчёт из «Главное меню → Файл → Открыть».

3. Причина ошибки внутри команды

Имеем такую ошибку: когда происходит поиск вариантов ссылок на контрагента в отчёте системы 1С, то возникает ошибка «Несоответствие типов (параметр номер «2»), как на скриншоте ниже:

Несоответствие типов

Рис. 6 Несоответствие типов (параметр номер «2»)

В системе 1С указано то место, где произошла неполадка – это недопустимый параметр номер 2, если кликнуть на кнопку «ERROR». Чтобы её исправить нужно запустить отчёт в конфигураторе системы 1С, далее ищем форму строчки, в которой написана команда «НайтиПоСсылкам», внутри модуля.

Команда НайтиПоСсылкам внутри модуля

Рис. 7 Команда НайтиПоСсылкам внутри модуля

Можно проверить верность того, как написана команда при помощи «Синтаксис-Помощника» в панели меню системы 1С, кнопка будет выделена:

Команда НайтиПоСсылкам

Рис. 8 Команда НайтиПоСсылкам в Синтаксис-Помощнике

По описанию следует: в команде «НайтиПоСсылкам» находится такие четыре параметра: СписокСсылок, ИсключитьОбъекты, ВключитьОбъекты и ОбластьПоиска.

В параметре с названием «ОбластьПоиска» будет тип «массив», в примере указана единица. Параметр «ОбластьПоиска» — не является обязательным, так что команда, которую исправили будет иметь следующий новый вид: НайтиПоСсылкам(МассивПоиска, , , МассивИсключений).

Тип массив в НайтиПоСсылкам

Рис. 9 Тип массив в НайтиПоСсылкам

Далее запускаем наш отчёт в системе 1С.

После наших действий команда работает исправно и ошибки нет.

НайтиПоСсылкам

Рис. 10 Проверка на наличие ошибок в системе конфигурации 1С

В данной статье было рассмотрено как устранить ошибку несоответствия типов в 1С. На примерах была устранена эта ошибка для запроса и для команды. По данному алгоритму можно всегда устранять данную ошибку.

Специалист компании «Кодерлайн»

Айдар Фархутдинов

Источник

Несоответствие типов 1С

Ошибка по причине Несоответствие типов в 1С 8.3 связана с передачей параметров в командах и запросах 1С.

Изучив статью, вы:

ознакомитесь с порядком исправления ошибки в запросе и командах 1С и узнаете, как исправить;
получите два внешних отчета, демонстрирующих ошибочный и правильный коды.

В какой момент выходит ошибка

Рассмотрим причины ее возникновения и исправление на конкретном примере.

Ошибка в таблице запроса

При чтении цен номенклатуры по регистру сведений Цены номенклатуры из внешнего отчета появляется ошибка Неоднозначное поле «ТипЦен.Номенклатура».

В окне сообщений уже указано место возникновения ошибки: Несоответствие типов Параметр номер «1» в строке Регистр сведений.ЦеныНоменклатуры.СрезПоследних(&&ТипЦен,) КАК ЦеныНоменклатурыСрезПоследних.

Правильность написания команды проверьте по выделенной кнопке Синтаксис-Помощник в меню 1 С Предприятие:

Из описания видно, что команда СрезПоследних имеет 2 параметра:

Период;
Отбор.

После исправления команды запустите отчет в 1 С Бухгалтерия по кнопке Главное меню — Файл — Открыть:

Теперь отчет формируется правильно!

Исправление ошибки в команде 1С

При поиске ссылок на контрагента в отчете 1С появляется ошибка Несоответствие типов (параметр номер 2):

1С сообщает место ошибки — Параметр номер 2 при нажатии кнопки ERROR.

Правильность написания команды проверьте по выделенной кнопке Синтаксис-Помощник в меню 1С:

Из описания идно, что команда НайтиПоСсылкам имеет 4 параметра:

СписокСсылок;
ОбластьПоиска;
ВключитьОбъекты;
ИсключитьОбъекты.

После исправления команды запустите внешний отчет в 1С по кнопке Главное меню — Файл — Открыть:

Теперь команда поиска ссылок на контрагента отрабатывает правильно.

Обслуживание

Заказать консультацию

По этой или иной ошибке Вы можете обратиться к нашим специалистам, мы Вам поможем решить Вашу проблему.

Источник

Выдает вот такую ошибку {Форма.Форма2.Форма(35)}: Ошибка при вызове метода контекста (Загрузить)
Номенклатура.Загрузить(ТЗ);
по причине:
Несоответствие типов (параметр номер ‘1’) Понимаю что есть уже очень много тем, но никак не могу разобраться.

Модуль объекта;:

перем мСКД_Номенклатура;
перем СхемаКомпоновки;

Функция СведенияОВнешнейОбработке() Экспорт
  
    РегистрационныеДанные = Новый Структура;
    РегистрационныеДанные.Вставить("Наименование", "Обработка: переименование номенклатуры v1");
    РегистрационныеДанные.Вставить("БезопасныйРежим", Ложь);
    РегистрационныеДанные.Вставить("Версия", "1.0.1");
 
    //ДополнительнаяОбработка
    //ДополнительныйОтчет
    //ЗаполнениеОбъекта
    //Отчет
    //ПечатанаяФорма
    //СозданиеСвязанныхОбъектов
    РегистрационныеДанные.Вставить("Вид", "ДополнительнаяОбработка");
 
    РегистрационныеДанные.Вставить("Информация", "Обработка для переименования элементов в справочнике номенклатуры (управляемое приложение)");
 
    ///////////// команды /////////////////////////
    тзКоманд = Новый ТаблицаЗначений;
    тзКоманд.Колонки.Добавить("Идентификатор");
    тзКоманд.Колонки.Добавить("Представление");
    тзКоманд.Колонки.Добавить("Модификатор");
    тзКоманд.Колонки.Добавить("ПоказыватьОповещение");
    тзКоманд.Колонки.Добавить("Использование");
 
    строкаКоманды = тзКоманд.Добавить();
    строкаКоманды.Идентификатор = "Обработка1";
    строкаКоманды.Представление = "Обработка: переименование номенклатуры v1";
    строкаКоманды.ПоказыватьОповещение = Истина;
    строкаКоманды.Модификатор = "";
    строкаКоманды.Использование = "ОткрытиеФормы";
 
    РегистрационныеДанные.Вставить("Команды", тзКоманд);
 
    ////////////// назначение (в каких объектах используется) /////////////////////////
    //для печ.форм, заполнения, ввода свазанных объектов
    МассивНазначений = Новый Массив;
    МассивНазначений.Добавить("Справочник.*"); // все справочники назначаются
    МассивНазначений.Добавить("Справочник.Номенклатура");
   // МассивНазначений.Добавить("Документ.ЗаказПокупателя");
    РегистрационныеДанные.Вставить("Назначение", МассивНазначений);
 
    Возврат РегистрационныеДанные;
           
КонецФункции
//&НаСервере
Функция РезультатКомпоновкиВТЗ(СКД) Экспорт

    КомпоновщикНастроек = Новый КомпоновщикНастроекКомпоновкиДанных;
    КомпоновщикНастроек.Инициализировать(Новый ИсточникДоступныхНастроекКомпоновкиДанных(СКД));
    КомпоновщикНастроек.ЗагрузитьНастройки(СКД.НастройкиПоУмолчанию);

    Настройки = КомпоновщикНастроек.Настройки;
    //ПараметрыНастройки = НастройкиКомпоновщика.ПараметрыДанных;

//СхемаКомпоновкиДанных = ПолучитьИзВременногоХранилища(АдресКомпоновки);  
//Настройки = Компоновщик_Номенклатура.Настройки;
  
//Формируем макет, с помощью компоновщика макета


КомпоновщикМакета = Новый КомпоновщикМакетаКомпоновкиДанных;
  
МакетКомпоновки = КомпоновщикМакета.Выполнить(СКД, Настройки,,,Тип("ГенераторМакетаКомпоновкиДанныхДляКоллекцииЗначений"));
  
//Выполним компоновку с помощью процессора компоновки


ПроцессорКомпоновкиДанных = Новый ПроцессорКомпоновкиДанных;
    ПроцессорКомпоновкиДанных.Инициализировать(МакетКомпоновки);
  
Результат = Новый ТаблицаЗначений;

ПроцессорВывода = Новый ПроцессорВыводаРезультатаКомпоновкиДанныхВКоллекциюЗначений;
    ПроцессорВывода.УстановитьОбъект(Результат);
  
ПроцессорВывода.Вывести(ПроцессорКомпоновкиДанных);

//Для каждого ТекСтрока из Результат Цикл
//НоваяСтрока=ТабЧастьДобавить();
//        ЗаполнитьЗначенияСвойств(НоваяСтрока,ТекСтрока);
//НоваяСтрока.Пометка = Истина;
//КонецЦикла;
Возврат Результат;
КонецФункции

Модуль формы:

&НаКлиенте
Перем СКД;
Перем АдресКомпоновки;

&НаСервере
Функция ПолучитьМакетНаСервере()
Возврат РеквизитФормыВЗначение("Объект").ПолучитьМакет("Макет");
КонецФункции

&НаКлиенте
Процедура ПриОткрытии(Отказ)
    СКД = ПолучитьМакетНаСервере();
Компоновщик_Номенклатура.ЗагрузитьНастройки(СКД.НастройкиПоУмолчанию);
 
АдресКомпоновки = ПоместитьВоВременноеХранилище(СКД, Новый УникальныйИдентификатор);  
Компоновщик_Номенклатура.Инициализировать(Новый ИсточникДоступныхНастроекКомпоновкиДанных(АдресКомпоновки));
КонецПроцедуры

&НаСервере
Функция РезультатНаСервере()
    СКД = ПолучитьМакетНаСервере();
   ОбъектНаСервере = РеквизитФормыВЗначение("Объект");
   ОбъектНаСервере.РезультатКомпоновкиВТЗ(СКД);
   ЗначениеВРеквизитФормы(ОбъектНаСервере, "Объект");
КонецФункции

&НаКлиенте
Процедура Команда1(Команда)
    Команда1НаСервере();
КонецПроцедуры

&НаСервере
Процедура Команда1НаСервере()
Номенклатура.Загрузить(ТЗ);
КонецПроцедуры[DOUBLEPOST=1471982948][/DOUBLEPOST]&НаСервере
Процедура Команда1НаСервере()
  
Номенклатура.Загрузить(РезультатНаСервере());
КонецПроцедуры

Последнее редактирование модератором: 24 авг 2016

Offline

nomad_irk
Гуру в 1С

Регистрация:

20 окт 2008

Сообщения:

9.880

Симпатии:

1.028

Баллы:

204

Что есть ТЗ и как этот объект формируется?
Последняя процедура выглядит вот так

Процедура Команда1НаСервере()

Номенклатура.Загрузить(РезультатНаСервере());
КонецПроцедуры

Там нет ТЗ
Offline

alexburn
Модераторы
Команда форума
Модератор

Регистрация:

5 янв 2009

Сообщения:

15.150

Симпатии:

560

Баллы:

204

Почитайте как в УФ работать с таблицами значений.
Да в том то и дело, что я не могу никак понять как правильно это присвоить….
Offline

alexburn
Модераторы
Команда форума
Модератор

Регистрация:

5 янв 2009

Сообщения:

15.150

Симпатии:

560

Баллы:

204

Курите РеквизитФормыВЗначение() и ЗначениеВРеквизитФормы()
Offline

nomad_irk
Гуру в 1С

Регистрация:

20 окт 2008

Сообщения:

9.880

Симпатии:

1.028

Баллы:

204
Не, это не тот случай.Значит
&НаКлиенте Процедура Команда1(Команда) Команда1НаСервере(); КонецПроцедуры &НаСервере Процедура Команда1НаСервере() Номенклатура.Загрузить(ТЗ); КонецПроцедуры
Можно смело удалить.

Номенклатура.Загрузить(РезультатНаСервере()) — отрабатывает без ошибок?
Все до Загрузить отрабатывает исправно, то есть таблица результат выглядит должным образом.

— Объединение сообщений, 26 авг 2016 —

Код:
&НаКлиенте
Процедура Команда1(Команда)
Команда1НаСервере();
КонецПроцедуры

Вот это нельзя удалять
Offline

nomad_irk
Гуру в 1С

Регистрация:

20 окт 2008

Сообщения:

9.880

Симпатии:

1.028

Баллы:

204
Почему нельзя удалять? У вас используется:
Процедура Команда1НаСервере() Номенклатура.Загрузить(РезультатНаСервере()); КонецПроцедуры
Потому что вот это
&НаКлиенте
Процедура Команда1(Команда)
Команда1НаСервере();
КонецПроцедуры
Это процедура вызова команды без которой модуль не будет работать
Offline

nomad_irk
Гуру в 1С

Регистрация:

20 окт 2008

Сообщения:

9.880

Симпатии:

1.028

Баллы:

204

Хорошо. Как в данный момент выглядит модуль формы?
КонецФункции

Модуль формы:
Код:
&НаКлиенте
Перем СКД;
Перем АдресКомпоновки;

&НаСервере
Функция ПолучитьМакетНаСервере()
Возврат РеквизитФормыВЗначение(«Объект»).ПолучитьМакет(«Макет»);
КонецФункции

&НаКлиенте
Процедура ПриОткрытии(Отказ)
СКД = ПолучитьМакетНаСервере();
Компоновщик_Номенклатура.ЗагрузитьНастройки(СКД.НастройкиПоУмолчанию);

АдресКомпоновки = ПоместитьВоВременноеХранилище(СКД, Новый УникальныйИдентификатор);
Компоновщик_Номенклатура.Инициализировать(Новый ИсточникДоступныхНастроекКомпоновкиДанных(АдресКомпоновки));
КонецПроцедуры

&НаСервере
Функция РезультатНаСервере()
СКД = ПолучитьМакетНаСервере();
ОбъектНаСервере = РеквизитФормыВЗначение(«Объект»);
ОбъектНаСервере.РезультатКомпоновкиВТЗ(СКД);
ЗначениеВРеквизитФормы(ОбъектНаСервере, «Объект»);
КонецФункции

&НаКлиенте
Процедура Команда1(Команда)
Команда1НаСервере();
КонецПроцедуры

&НаСервере
Процедура Команда1НаСервере()

Номенклатура.Загрузить(РезультатНаСервере());
КонецПроцедуры
Offline

nomad_irk
Гуру в 1С

Регистрация:

20 окт 2008

Сообщения:

9.880

Симпатии:

1.028

Баллы:

204

Хорошо. В данный момент ошибка сохраняется и такая же?
Offline

nomad_irk
Гуру в 1С

Регистрация:

20 окт 2008

Сообщения:

9.880

Симпатии:

1.028

Баллы:

204

У вас функция РезультатНаСервере() ничего не возвращает.
А подскажите чио она должна возвращать если необходимая таблица Результат формируется в функцииРезультатКомпоновкиВТЗ(СКД)
Offline

nomad_irk
Гуру в 1С

Регистрация:

20 окт 2008

Сообщения:

9.880

Симпатии:

1.028

Баллы:

204

Значит и возвращать она должна эту функцию:

Возврат ОбъектНаСервере.РезультатКомпоновкиВТЗ(СКД);
Большое спасибо. Ошибка действительно исчезла, но на форму в табличную часть так ничего и не выводится

— Объединение сообщений, 1 сен 2016 —

Большое спасибо. Ошибка действительно исчезла, но на форму в табличную часть так ничего и не выводится

Источник

Jackshi

59 / 59 / 6

Регистрация: 16.01.2013

Сообщений: 162

Несоответствие типов

14.05.2014, 12:23. Показов 15419. Ответов 5

Метки нет (Все метки)

Доброго времени суток. Помогите решить задачу в Бух 3.0

Докум = Документы.ПоступлениеТоваровУслуг.ПолучитьСсылку(новый УникальныйИдентификатор(мОбъект.id));
Если не ЗначениеЗаполнено(Докум) Тогда
    Док = Документы.ПоступлениеТоваровУслуг.СоздатьДокумент();
    Док.УстановитьСсылкуНового(новый УникальныйИдентификатор(мОбъект.id));
Иначе 
    Если Докум.ПолучитьОбъект() = Неопределено Тогда
        Док = Документы.ПоступлениеТоваровУслуг.СоздатьДокумент();
        Док.УстановитьСсылкуНового(новый УникальныйИдентификатор(мОбъект.id));// в этом месте Ошибка
    Иначе
        Док = Докум.ПолучитьОбъект();
    КонецЕсли;
КонецЕсли;

Докум = Ссылка(<Объект не найден> (170:8cde001e6759045111e3b5045af92b08))

{Форма.Форма.Форма(405)}: Ошибка при вызове метода контекста (УстановитьСсылкуНового)
Док.УстановитьСсылкуНового(новый УникальныйИдентификатор(мОбъект.id));
по причине:
Несоответствие типов (параметр номер ‘1’)

Вроде первый раз не ругается, а вот второй раз….. Почему?

__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

14.05.2014, 12:23

Ответы с готовыми решениями:

Несоответствие типов
Подскажите пожалуйста мне надо написать программу автоматического формирования кода справочника по…

Несоответствие типов
Помогите исправить пожайлуста.
uses crt,graph;
var
a:array of integer;
…

Несоответствие типов
Всем привет, выдает ошибку о несоответствие типов хотя в БД стоит тип текстовый
cmd.CommandText =…

Несоответствие типов
var s1,s2,s3:string;
ss1,ss2,ss3 :set of byte;
y:integer;
H:char;

begin
readln(s1);
…

SPR1TE89

21 / 21 / 3

Регистрация: 22.04.2014

Сообщений: 112

14.05.2014, 12:36

Jackshi, А если так попробовать?

1
2

НоваяСсылка = Документы.ПоступлениеТоваровУслуг.ПолучитьСсылку(новый УникальныйИдентификатор(мОбъект.id))
Док.УстановитьСсылкуНового(новаяСсылка);

И еще возможно битая ссылка. Поэтому и ругается.

59 / 59 / 6

Регистрация: 16.01.2013

Сообщений: 162

14.05.2014, 12:42

[ТС]

Работает, Спасибо!

А есть возможность избавиться от битой ссылки?

21 / 21 / 3

Регистрация: 22.04.2014

Сообщений: 112

14.05.2014, 14:06

Jackshi, Вообще есть, но лучше пока не заморачивайтесь).

multirum

0 / 0 / 0

Регистрация: 14.09.2020

Сообщений: 6

30.11.2020, 14:07

Процедура ИзменитьНаСервере()
    КодЭлемента = Справочники.Номенклатура.Выбрать(000000003);
    ИзменениеЦены = КодЭлемента.ПолучитьОбъект();
    ИзменениеЦены.ЦенаПродажи = 30000;
    ИзменениеЦены.Записать();
    Сообщить("Готово");
КонецПроцедуры

{Обработка.ИзменениеЦеныПоКодуЭлемента.Форма.Форма .Форма(4)}: Ошибка при вызове метода контекста (Выбрать)
КодЭлемента = Справочники.Номенклатура.Выбрать(000000003);
по причине:
Несоответствие типов (параметр номер ‘1’)
как исправить ?

polax

1783 / 1208 / 437

Регистрация: 16.01.2015

Сообщений: 5,322

30.11.2020, 18:44

multirum, Есть такая штука СП — синтакс помощник называется. Обращайтесь к нему чаще.

СправочникМенеджер.<Имя справочника> (CatalogManager.<Catalog name>)
Выбрать (Select)
Синтаксис:
Выбрать(<Родитель>, <Владелец>, <Отбор>, <Порядок>)
Параметры:
<Родитель> (необязательный)
Тип: СправочникСсылка.<Имя справочника>.
Отбор по родителю. Имеет смысл только для многоуровневых справочников. Если параметр не задан, то отбор по родителю не производится. Чтобы отобрать элементы верхнего уровня, нужно в качестве данного параметра указать пустую ссылку на элемент справочника.
<Владелец> (необязательный)
Тип: СправочникСсылка.<Имя справочника>.
Отбор по владельцу. Имеет смысл только для подчиненных справочников. Если параметр не задан, то отбор по владельцу не производится.
<Отбор> (необязательный)
Тип: Структура.
Задает поле и значение отбора открываемой выборки. Ключ структуры описывает имя поля, а значение структуры — значение отбора по этому полю. В качестве полей для отбора могут задаваться только поля «Код», «Наименование» и реквизиты справочника, для которых в конфигураторе признак индексирования установлен в значение «Индексировать» или в значение «Индексировать с доп. упорядоч.».
Важно! Структура может содержать только один элемент.
Если параметр не указан, то отбор не используется.
<Порядок> (необязательный)
Тип: Строка.
Строка с именем реквизита справочника, определяющая упорядочивание элементов в выборке. Может быть указано «Код», «Наименование» или имя одного из реквизитов примитивного типа (Число, Строка, Дата, Булево), для которого установлен признак «Индексирование» в значение «Индексировать» или в «Индексировать с дополнительным упорядочиванием» в конфигураторе. После имени реквизита через пробел может быть указано направление сортировки. Направление определяется: «Убыв» («Desc») — упорядочивать по убыванию; «Возр» («Asc») — упорядочивать по возрастанию. По умолчанию сортировка производится по возрастанию. Если параметр не указан, то порядок определяется основным представлением справочника.
Значение по умолчанию: Пустая строка.
Возвращаемое значение:
Тип: СправочникВыборка.<Имя справочника>.
Описание:
Формирует выборку элементов справочника по заданным условиям.
Доступность:
Сервер, толстый клиент, внешнее соединение, мобильное приложение (сервер), мобильный автономный сервер.
Пример:

Номенклатура = Справочники.Номенклатура;
Отбор = Новый Структура("ТипНоменклатуры");
Пусто = Перечисления.ТипыНоменклатуры.ПустаяСсылка();
Отбор.ТипНоменклатуры = Пусто;
Выборка = Номенклатура.Выбрать(,,Отбор, "Наименование Убыв");
Пока Выборка.Следующий()  Цикл
    Объект = Выборка.ПолучитьОбъект();
    Объект.ТипНоменклатуры = Перечисления.ТипыНоменклатуры.Товар;
    Попытка
        Объект.Записать();
    Исключение
        Предупреждение(НСтр("ru = 'Невозможно записать объект';"
           + " en = 'Can't write object'")
           +" '" + Объект + '"
           |" + ОписаниеОшибки(),60);
    КонецПопытки;
КонецЦикла;

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

30.11.2020, 18:44

Помогаю со студенческими работами здесь

Несоответствие типов
Добрый день, ни как не могу победить несоответствие типов.
То есть, есть некая форма с полем…

Несоответствие типов
— в этом файле две базы данных, которые должны синхронизироваться. Главная база с названием "а",…

if then else несоответствие типов
unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics,…

Несоответствие типов
Делаю прогу, в которой программа ищет — существует ли ряд файлов. Например 153 файла текстi.txt,…

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:

Источник

После обновления конфигурации 1с упрощенка 8 до версии 8.3.10.2580 платформы и 3.0.52.42 конфигурации при создании счета вылезла ошибка: Несоответствие типов (параметр номер ‘1’) в отладчике: {ОбщийМодуль.РегламентныеЗаданияСервер.Модуль}: Ошибка при вызове метода контекста (НайтиПоУникальномуИдентификатору) РегламентноеЗадание = РегламентныеЗадания.НайтиПоУникальномуИдентификатору(Идентификатор); по причине: Несоответствие типов (параметр номер ‘1’) На этом мои познания в программировании 1с заканчиваются. Где собака закопана?

У тебя Идентификатор имеет тип НЕ УНИКАЛЬНЫЙИДЕНТИФИКАТОР. А нужно что бы был УникальныйИдентификатор. МенеджерРегламентныхЗаданий (ScheduledJobsManager) НайтиПоУникальномуИдентификатору (FindByUUID) Синтаксис: НайтиПоУникальномуИдентификатору(<Идентификатор>) Параметры: Тип: УникальныйИдентификатор. Идентификатор регламентного задания. Возвращаемое значение: Тип: РегламентноеЗадание; Неопределено. Если задание для заданного идентификатора не найдено, возвращает Неопределено. Описание: Осуществляет поиск регламентного задания по уникальному идентификатору. Получение регламентного задания возможно только для администратора. Доступность: Сервер, толстый клиент, внешнее соединение.

Соответственно, что мне нужно сделать?

Присвоить переменной Идентификатор тип УникальныйИдентификатор. 🙂

Так заводская конфигурация и модуль только для чтения.

А ну тогда все..ничего не сделать

Функция ПолучитьРегламентноеЗадание(Знач Идентификатор) Экспорт ВызватьИсключение( НСтр(«ru = ‘Регламентное задание не найдено.

Вот весь текст модуля. Где исправить идентификатор?

выгрузку-загрузку базы делал?

Выгрузку загрузку — не делал. А что такое тии?

тестирование и исправление в конфигураторе

Тааак. А как ты чистил кэш?

Тестирование и исправление запускал. C:Users1AppDataRoaming1C1Cv82 C:Users1AppDataLocal1C1Cv82 Из них грохнул папки с длинными названиями Еще пробовал через ClearCache и тонкий клиент

Выгрузил — загрузил. Все равно так-же.

Пройдись отладчиком, что у тебя в функцию передается? ИМХО, неопределено. И проблема не на самом деле не здесь, а при создании счета.

{ОбщийМодуль.РегламентныеЗаданияСервер.Модуль}: Ошибка при вызове метода контекста (НайтиПоУникальномуИдентификатору) РегламентноеЗадание = РегламентныеЗадания.НайтиПоУникальномуИдентификатору(Идентификатор); по причине: Несоответствие типов (параметр номер ‘1’) Это в отладчике

Как посмотреть, что в функцию передается?

Проблема была в расположении информационной базы. Перенес в корень другого диска. Все завелось))))

это значит кэш. про кэш наврал.

Как говАривала Алиса «все чудесатее и чудесатее»)

Не обязательно. Скорее всего на клиенте почистил. 🙂

Тэги:

Комментарии доступны только авторизированным пользователям

Источник

Перем ИмяМакета;

Перем мВалютаРегламентированногоУчета;

Функция Печать()Экспорт;

Запрос = Новый Запрос;

Запрос.УстановитьПараметр(«ТекущийДокумент», СсылкаНаОбъект.Ссылка);

Запрос.УстановитьПараметр(«Дата», СсылкаНаОбъект.Дата);

Запрос.Текст = «ВЫБРАТЬ

| ДокЧек.Номер КАК Номер,

| ДокЧек.Дата КАК Дата,

| ДокЧек.КассаККМ КАК КассаККМ,

| ДокЧек.Организация КАК Организация,

| ВЫБОР

| КОГДА ДокЧек.Организация.ЮрФизЛицо = ЗНАЧЕНИЕ(Перечисление.ЮрФизЛицо.ЮрЛицо)

| ТОГДА ДокЧек.Организация.НаименованиеПолное

| ИНАЧЕ «»ИП «» + ВЫБОР

| КОГДА ЕСТЬNULL(ФИОФизЛицСрезПоследнихИП.Фамилия, «»»») = «»»»

| ТОГДА «»»»

| ИНАЧЕ ФИОФизЛицСрезПоследнихИП.Фамилия + «» «» + ВЫБОР

| КОГДА ЕСТЬNULL(ФИОФизЛицСрезПоследнихИП.Имя, «»»») = «»»»

| ТОГДА «»»»

| ИНАЧЕ (ВЫРАЗИТЬ(ФИОФизЛицСрезПоследнихИП.Имя КАК СТРОКА(1))) + «». «»

| КОНЕЦ + ВЫБОР

| КОГДА ЕСТЬNULL(ФИОФизЛицСрезПоследнихИП.Отчество, «»»») = «»»»

| ТОГДА «»»»

| ИНАЧЕ (ВЫРАЗИТЬ(ФИОФизЛицСрезПоследнихИП.Отчество КАК СТРОКА(1))) + «».»»

| КОНЕЦ

| КОНЕЦ + «»»»

| КОНЕЦ КАК НаименованиеОрганизации,

| ДокЧек.СуммаДокумента КАК СуммаДокумента,

| ДокЧек.ВидОперации КАК ВидОперации,

| ДокЧек.Товары.(

| НомерСтроки КАК НомерСтроки,

| Номенклатура КАК Номенклатура,

| Номенклатура.Представление КАК Товар,

| Номенклатура.НаименованиеПолное КАК ТоварПолноеНаименование,

| Номенклатура.Код КАК Код,

| Номенклатура.Артикул КАК Артикул,

| Количество КАК Количество,

| ЕдиницаИзмерения.Представление КАК ЕдиницаИзмерения,

| Цена КАК Цена,

| ПроцентСкидкиНаценки КАК Скидка,

| ПроцентАвтоматическихСкидок КАК СкидкаАвтоматическая,

| Сумма КАК Сумма,

| ХарактеристикаНоменклатуры КАК Характеристика,

| СерияНоменклатуры КАК Серия,

| БИТ_Склад КАК БИТ_Склад

| ) КАК Товары,

| ДокЧек.Оплата.(

| НомерСтроки КАК НомерСтроки,

| ВидОплаты КАК ВидОплаты,

| Сумма КАК Сумма

| ) КАК Оплата,

| ВЫБОР

| КОГДА ЕСТЬNULL(ФИОФизЛицСрезПоследних.Фамилия, «»»») = «»»»

| ТОГДА «»»»

| ИНАЧЕ ФИОФизЛицСрезПоследних.Фамилия + «» «» + ВЫБОР

| КОГДА ЕСТЬNULL(ФИОФизЛицСрезПоследних.Имя, «»»») = «»»»

| ТОГДА «»»»

| ИНАЧЕ (ВЫРАЗИТЬ(ФИОФизЛицСрезПоследних.Имя КАК СТРОКА(1))) + «». «»

| КОНЕЦ + ВЫБОР

| КОГДА ЕСТЬNULL(ФИОФизЛицСрезПоследних.Отчество, «»»») = «»»»

| ТОГДА «»»»

| ИНАЧЕ (ВЫРАЗИТЬ(ФИОФизЛицСрезПоследних.Отчество КАК СТРОКА(1))) + «».»»

| КОНЕЦ

| КОНЕЦ КАК ФИО,

| ВложенныйЗапрос.БИТ_Склад КАК БИТ_Склад

|ИЗ

| Документ.ЧекККМ КАК ДокЧек

| ЛЕВОЕ СОЕДИНЕНИЕ Справочник.Пользователи КАК Пользователи

| ПО (Пользователи.Ссылка = ДокЧек.Ответственный)

| ЛЕВОЕ СОЕДИНЕНИЕ Справочник.ФизическиеЛица КАК ФизическиеЛица

| ПО (Пользователи.ФизЛицо = ФизическиеЛица.Ссылка)

| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ФИОФизЛиц.СрезПоследних(&Дата, ) КАК ФИОФизЛицСрезПоследних

| ПО (ФизическиеЛица.Ссылка = ФИОФизЛицСрезПоследних.ФизЛицо)

| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ФИОФизЛиц.СрезПоследних(&Дата, ) КАК ФИОФизЛицСрезПоследнихИП

| ПО ДокЧек.Организация.ИндивидуальныйПредприниматель = ФИОФизЛицСрезПоследнихИП.ФизЛицо,

| (ВЫБРАТЬ

| ЧекККМТовары.Ссылка КАК Ссылка,

| ЧекККМТовары.БИТ_Склад КАК БИТ_Склад

| ИЗ

| Документ.ЧекККМ.Товары КАК ЧекККМТовары

| ГДЕ

| ЧекККМТовары.Ссылка = &ТекущийДокумент

| СГРУППИРОВАТЬ ПО

| ЧекККМТовары.БИТ_Склад,

| ЧекККМТовары.Ссылка) КАК ВложенныйЗапрос

|ГДЕ

| ДокЧек.Ссылка = &ТекущийДокумент

|УПОРЯДОЧИТЬ ПО

| ДокЧек.Товары.НомерСтроки

|ИТОГИ ПО

| БИТ_Склад»;

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

Шапка.Следующий();

ТабДокумент = Новый ТабличныйДокумент;

ТабДокумент.ИмяПараметровПечати = «ПАРАМЕТРЫ_ПЕЧАТИ_Товарный_Чек»;

Макет = ПолучитьМакет(«Товарный_Чек»);

// Выводим шапку накладной.

ОбластьМакета = Макет.ПолучитьОбласть(«Заголовок»);

Если Шапка.ВидОперации = Перечисления.ВидыОперацийЧекККМ.Возврат Тогда

ОбластьМакета.Параметры.ТекстЗаголовка = ОбщегоНазначения.СформироватьЗаголовокДокумента(Шапка, «Чек (возврат)»);

Иначе

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

КонецЕсли;

ОбластьМакета.Параметры.ПредставлениеПоставщика = «ИП Мерзакулов Р.М»;

//ОбластьМакета.Параметры.ПредставлениеПоставщика = Шапка.Организация;

ОбластьМакета.Параметры.ИНН = «235703731865»;

ТабДокумент.Вывести(ОбластьМакета);

ЕстьСкидки = Ложь;

ВыборкаСтрокТовары = Шапка.Товары.Выбрать();

Пока ВыборкаСтрокТовары.Следующий() Цикл

Если ВыборкаСтрокТовары.Скидка + ВыборкаСтрокТовары.СкидкаАвтоматическая <> 0 Тогда

ЕстьСкидки = Истина;

КонецЕсли;

КонецЦикла;

//ДопКолонка = Константы.ДополнительнаяКолонкаПечатныхФормДокументов.Получить();

//Если ДопКолонка = Перечисления.ДополнительнаяКолонкаПечатныхФормДокументов.Артикул Тогда

// ВыводитьКоды = Истина;

// Колонка = «Артикул»;

//ИначеЕсли ДопКолонка = Перечисления.ДополнительнаяКолонкаПечатныхФормДокументов.Код Тогда

// ВыводитьКоды = Истина;

// Колонка = «Код»;

//Иначе

// ВыводитьКоды = Ложь;

//КонецЕсли;

ОбластьНомера = Макет.ПолучитьОбласть(«ШапкаТаблицы|НомерСтроки»);

//ОбластьКодов = Макет.ПолучитьОбласть(«ШапкаТаблицы|КолонкаКодов»);

ОбластьДанных = Макет.ПолучитьОбласть(«ШапкаТаблицы|Данные»);

//ОбластьСкидок = Макет.ПолучитьОбласть(«ШапкаТаблицы|Скидка»);

ОбластьСуммы = Макет.ПолучитьОбласть(«ШапкаТаблицы|Сумма»);

ОбластьСклад = Макет.ПолучитьОбласть(«ШапкаТаблицы|Склад»);

ТабДокумент.Вывести(ОбластьНомера);

//Если ВыводитьКоды Тогда ///Артикул

// ОбластьКодов.Параметры.ИмяКолонкиКодов = Колонка;

// ТабДокумент.Присоединить(ОбластьКодов);

//КонецЕсли;

ТабДокумент.Присоединить(ОбластьДанных);

//Если ЕстьСкидки Тогда

// ТабДокумент.Присоединить(ОбластьСкидок);

//КонецЕсли;

ТабДокумент.Присоединить(ОбластьСуммы);

ТабДокумент.Присоединить(ОбластьСклад);

ОбластьКолонкаТовар = Макет.Область(«Товар»);

//Если Не ВыводитьКоды Тогда

// ОбластьКолонкаТовар.ШиринаКолонки = ОбластьКолонкаТовар.ШиринаКолонки

// + Макет.Область(«КолонкаКодов»).ШиринаКолонки;

//КонецЕсли;

Если Не ЕстьСкидки Тогда

ОбластьКолонкаТовар.ШиринаКолонки = ОбластьКолонкаТовар.ШиринаКолонки

+ Макет.Область(«Сумма»).ШиринаКолонки;

КонецЕсли;

ОбластьНомера = Макет.ПолучитьОбласть(«Строка|НомерСтроки»);

//ОбластьКодов = Макет.ПолучитьОбласть(«Строка|КолонкаКодов»);

ОбластьДанных = Макет.ПолучитьОбласть(«Строка|Данные»);

//ОбластьСкидок = Макет.ПолучитьОбласть(«Строка|Скидка»);

ОбластьСуммы = Макет.ПолучитьОбласть(«Строка|Сумма»);

ОбластьСклад= Макет.ПолучитьОбласть(«Строка|Склад»);

Сумма = 0;

ВсегоСкидок = 0;

ВсегоБезСкидок = 0;

ВыборкаСтрокТовары = Шапка.Товары.Выбрать();

Пока ВыборкаСтрокТовары.Следующий() Цикл

Если НЕ ЗначениеЗаполнено(ВыборкаСтрокТовары.Номенклатура) Тогда

Сообщить(«В одной из строк не заполнено значение номенклатуры — строка при печати пропущена.», СтатусСообщения.Важное);

Продолжить;

КонецЕсли;

ОбластьНомера.Параметры.Заполнить(ВыборкаСтрокТовары);

ТабДокумент.Вывести(ОбластьНомера);

//Если ВыводитьКоды Тогда

// Если Колонка = «Артикул» Тогда

// ОбластьКодов.Параметры.Артикул = ВыборкаСтрокТовары.Артикул;

// Иначе

// ОбластьКодов.Параметры.Артикул = ВыборкаСтрокТовары.Код;

// КонецЕсли;

// ТабДокумент.Присоединить(ОбластьКодов);

//КонецЕсли;

ОбластьДанных.Параметры.Заполнить(ВыборкаСтрокТовары);

ОбластьДанных.Параметры.Товар = ?(НЕ ЗначениеЗаполнено(ВыборкаСтрокТовары.ТоварПолноеНаименование),

ВыборкаСтрокТовары.Товар, ВыборкаСтрокТовары.ТоварПолноеНаименование)

+ ФормированиеПечатныхФорм.ПредставлениеСерий(ВыборкаСтрокТовары);

ТабДокумент.Присоединить(ОбластьДанных);

//Скидка = ВыборкаСтрокТовары.Цена * ВыборкаСтрокТовары.Количество — ВыборкаСтрокТовары.Сумма;

//Если ЕстьСкидки Тогда

// ОбластьСкидок.Параметры.Скидка = Скидка;

// ОбластьСкидок.Параметры.СуммаБезСкидки = ВыборкаСтрокТовары.Сумма + Скидка;

// ТабДокумент.Присоединить(ОбластьСкидок);

//КонецЕсли;

ОбластьСуммы.Параметры.Заполнить(ВыборкаСтрокТовары);

ТабДокумент.Присоединить(ОбластьСуммы);

ТабДокумент.Присоединить(ОбластьСклад);//Выводим склад в таличную часть печатной формы

Сумма = Сумма + ВыборкаСтрокТовары.Сумма;

//ВсегоСкидок = ВсегоСкидок + Скидка;

ВсегоБезСкидок = Сумма + ВсегоСкидок;

//КонецЕсли;

КонецЦикла;

// Вывести Итого.

ОбластьНомера = Макет.ПолучитьОбласть(«Итого|НомерСтроки»);

//ОбластьКодов = Макет.ПолучитьОбласть(«Итого|КолонкаКодов»);

ОбластьДанных = Макет.ПолучитьОбласть(«Итого|Данные»);

//ОбластьСкидок = Макет.ПолучитьОбласть(«Итого|Скидка»);

ОбластьСуммы = Макет.ПолучитьОбласть(«Итого|Сумма»);

ТабДокумент.Вывести(ОбластьНомера);

//Если ВыводитьКоды Тогда

// ТабДокумент.Присоединить(ОбластьКодов);

//КонецЕсли;

ТабДокумент.Присоединить(ОбластьДанных);

//Если ЕстьСкидки Тогда

// ОбластьСкидок.Параметры.ВсегоСкидок = ВсегоСкидок;

// ОбластьСкидок.Параметры.ВсегоБезСкидок = ВсегоБезСкидок;

// ТабДокумент.Присоединить(ОбластьСкидок);

//КонецЕсли;

ОбластьСуммы.Параметры.Всего = Сумма;

ТабДокумент.Присоединить(ОбластьСуммы);

мВалютаРегламентированногоУчета = Константы.ВалютаРегламентированногоУчета.Получить();

// Вывести Сумму прописью.

ОбластьМакета = Макет.ПолучитьОбласть(«СуммаПрописью»);

ОбластьМакета.Параметры.ИтоговаяСтрока = «Всего наименований » + ВыборкаСтрокТовары.Количество()

+ «, на сумму » + ОбщегоНазначения.ФорматСумм(Шапка.СуммаДокумента, мВалютаРегламентированногоУчета);

ОбластьМакета.Параметры.СуммаПрописью = ОбщегоНазначения.СформироватьСуммуПрописью(Шапка.СуммаДокумента, мВалютаРегламентированногоУчета);

ТабДокумент.Вывести(ОбластьМакета);

// Вывести Оплату и Сдачу.

СуммаОплат = 0;

СуммаБезналичныхОплат = 0;

СписокОплат = Новый Соответствие();

ВыборкаОплат = Шапка.Оплата.Выбрать();

Пока ВыборкаОплат.Следующий() Цикл

Если Шапка.ВидОперации = Перечисления.ВидыОперацийЧекККМ.Возврат

И ВыборкаОплат.ВидОплаты.ТипОплаты <> Перечисления.ТипыОплатЧекаККМ.Наличные Тогда

СуммаБезналичныхОплат = СуммаБезналичныхОплат + ВыборкаОплат.Сумма;

КонецЕсли;

ЗаписьОплаты = СписокОплат.Получить(Строка(ВыборкаОплат.ВидОплаты.ТипОплаты));

Если ЗаписьОплаты = Неопределено Тогда

СписокОплат.Вставить(Строка(ВыборкаОплат.ВидОплаты.ТипОплаты), ВыборкаОплат.Сумма);

Иначе

СписокОплат.Вставить(Строка(ВыборкаОплат.ВидОплаты.ТипОплаты), ЗаписьОплаты + ВыборкаОплат.Сумма);

КонецЕсли;

СуммаОплат = СуммаОплат + ВыборкаОплат.Сумма;

КонецЦикла;

//Отдельная подготовка наличной оплаты для чека возврата

Если Шапка.ВидОперации = Перечисления.ВидыОперацийЧекККМ.Возврат Тогда

СписокОплат.Вставить(Строка(Перечисления.ТипыОплатЧекаККМ.Наличные), Шапка.СуммаДокумента — СуммаБезналичныхОплат);

КонецЕсли;

//ОбластьМакета = Макет.ПолучитьОбласть(«Оплата»);

//ОплатаДобавлена = Ложь;

//Для Каждого ЗнПеречисления Из Перечисления.ТипыОплатЧекаККМ Цикл

// ЗаписьОплаты = СписокОплат.Получить(Строка(ЗнПеречисления));

// Если ЗаписьОплаты <> Неопределено Тогда

// ОбластьМакета.Параметры.Оплата = ?(ОплатаДобавлена, ОбластьМакета.Параметры.Оплата + Символы.ПС, «»)

// + Строка(ЗнПеречисления) + «: » + Формат(ЗаписьОплаты, «ЧЦ=15; ЧДЦ=2; ЧРД=.; ЧН=; ЧГ=0»);

// ОплатаДобавлена = Истина;

// КонецЕсли;

//КонецЦикла;

//Если Шапка.ВидОперации = Перечисления.ВидыОперацийЧекККМ.Продажа Тогда

// ОбластьМакета.Параметры.Сдача = Формат(СуммаОплат — Шапка.СуммаДокумента, «ЧЦ=15; ЧДЦ=2; ЧРД=.; ЧН=; ЧГ=0»);

//Иначе

// ОбластьМакета.Параметры.Сдача = «0.00»;

//КонецЕсли;

//ТабДокумент.Вывести(ОбластьМакета);

// Вывести подписи.

ОбластьМакета = Макет.ПолучитьОбласть(«Подвал»);

ТабДокумент.Вывести(ОбластьМакета);

Возврат ТабДокумент;

///Печать Для кладовщика

Запрос = Новый Запрос;

Запрос.УстановитьПараметр(«ТекущийДокумент», СсылкаНаОбъект.Ссылка);

Запрос.УстановитьПараметр(«Дата», СсылкаНаОбъект.Дата);

Запрос.Текст = «ВЫБРАТЬ

| ДокЧек.Номер,

| ДокЧек.Дата,

| ДокЧек.КассаККМ,

| ДокЧек.Организация КАК Организация,

| ВЫБОР

| КОГДА ДокЧек.Организация.ЮрФизЛицо = ЗНАЧЕНИЕ(Перечисление.ЮрФизЛицо.ЮрЛицо)

| ТОГДА ДокЧек.Организация.НаименованиеПолное

| ИНАЧЕ «»ИП «» + ВЫБОР

| КОГДА ЕСТЬNULL(ФИОФизЛицСрезПоследнихИП.Фамилия, «»»») = «»»»

| ТОГДА «»»»

| ИНАЧЕ ФИОФизЛицСрезПоследнихИП.Фамилия + «» «» + ВЫБОР

| КОГДА ЕСТЬNULL(ФИОФизЛицСрезПоследнихИП.Имя, «»»») = «»»»

| ТОГДА «»»»

| ИНАЧЕ (ВЫРАЗИТЬ(ФИОФизЛицСрезПоследнихИП.Имя КАК СТРОКА(1))) + «». «»

| КОНЕЦ + ВЫБОР

| КОГДА ЕСТЬNULL(ФИОФизЛицСрезПоследнихИП.Отчество, «»»») = «»»»

| ТОГДА «»»»

| ИНАЧЕ (ВЫРАЗИТЬ(ФИОФизЛицСрезПоследнихИП.Отчество КАК СТРОКА(1))) + «».»»

| КОНЕЦ

| КОНЕЦ + «»»»

| КОНЕЦ КАК НаименованиеОрганизации,

| ДокЧек.СуммаДокумента,

| ДокЧек.ВидОперации,

| ДокЧек.Товары.(

| НомерСтроки,

| Номенклатура,

| Номенклатура.Представление КАК Товар,

| Номенклатура.НаименованиеПолное КАК ТоварПолноеНаименование,

| Номенклатура.Код КАК Код,

| Номенклатура.Артикул КАК Артикул,

| Количество,

| ЕдиницаИзмерения.Представление КАК ЕдиницаИзмерения,

| Цена,

| ПроцентСкидкиНаценки КАК Скидка,

| ПроцентАвтоматическихСкидок КАК СкидкаАвтоматическая,

| Сумма,

| ХарактеристикаНоменклатуры КАК Характеристика,

| СерияНоменклатуры КАК Серия,

| БИТ_Склад КАК БИТ_Склад

| ),

| ДокЧек.Оплата.(

| НомерСтроки,

| ВидОплаты,

| Сумма

| ),

| ВЫБОР

| КОГДА ЕСТЬNULL(ФИОФизЛицСрезПоследних.Фамилия, «»»») = «»»»

| ТОГДА «»»»

| ИНАЧЕ ФИОФизЛицСрезПоследних.Фамилия + «» «» + ВЫБОР

| КОГДА ЕСТЬNULL(ФИОФизЛицСрезПоследних.Имя, «»»») = «»»»

| ТОГДА «»»»

| ИНАЧЕ (ВЫРАЗИТЬ(ФИОФизЛицСрезПоследних.Имя КАК СТРОКА(1))) + «». «»

| КОНЕЦ + ВЫБОР

| КОГДА ЕСТЬNULL(ФИОФизЛицСрезПоследних.Отчество, «»»») = «»»»

| ТОГДА «»»»

| ИНАЧЕ (ВЫРАЗИТЬ(ФИОФизЛицСрезПоследних.Отчество КАК СТРОКА(1))) + «».»»

| КОНЕЦ

| КОНЕЦ КАК ФИО,

| ВложенныйЗапрос.БИТ_Склад КАК БИТ_Склад

|ИЗ

| Документ.ЧекККМ КАК ДокЧек

| ЛЕВОЕ СОЕДИНЕНИЕ Справочник.Пользователи КАК Пользователи

| ПО (Пользователи.Ссылка = ДокЧек.Ответственный)

| ЛЕВОЕ СОЕДИНЕНИЕ Справочник.ФизическиеЛица КАК ФизическиеЛица

| ПО (Пользователи.ФизЛицо = ФизическиеЛица.Ссылка)

| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ФИОФизЛиц.СрезПоследних(&Дата, ) КАК ФИОФизЛицСрезПоследних

| ПО (ФизическиеЛица.Ссылка = ФИОФизЛицСрезПоследних.ФизЛицо)

| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ФИОФизЛиц.СрезПоследних(&Дата, ) КАК ФИОФизЛицСрезПоследнихИП

| ПО ДокЧек.Организация.ИндивидуальныйПредприниматель = ФИОФизЛицСрезПоследнихИП.ФизЛицо

| ВНУТРЕННЕЕ СОЕДИНЕНИЕ (ВЫБРАТЬ

| ЧекККМТовары.Ссылка КАК Ссылка,

| ЧекККМТовары.БИТ_Склад КАК БИТ_Склад

| ИЗ

| Документ.ЧекККМ.Товары КАК ЧекККМТовары

| ГДЕ

| ЧекККМТовары.Ссылка = &ТекущийДокумент

| СГРУППИРОВАТЬ ПО

| ЧекККМТовары.Ссылка,

| ЧекККМТовары.БИТ_Склад) КАК ВложенныйЗапрос

| ПО ДокЧек.Ссылка = ВложенныйЗапрос.Ссылка

|ГДЕ

| ДокЧек.Ссылка = &ТекущийДокумент

|УПОРЯДОЧИТЬ ПО

| ДокЧек.Товары.НомерСтроки

|ИТОГИ ПО

| БИТ_Склад»;

ВыборкаСклад=Запрос.Выполнить().Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);

Пока ВыборкаСклад.Следующий()Цикл

ТабДокумент.ВывестиГоризонтальныйРазделительСтраниц();

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

Пока Шапка.Следующий()Цикл

ТабДокумент = Новый ТабличныйДокумент;

ТабДокумент.ИмяПараметровПечати = «ПАРАМЕТРЫ_ПЕЧАТИ_Товарный_Чек»;

Макет = ПолучитьМакет(«Товарный_Чек»);

// Выводим шапку накладной.

ОбластьМакета = Макет.ПолучитьОбласть(«Заголовок1»);

Если Шапка.ВидОперации = Перечисления.ВидыОперацийЧекККМ.Возврат Тогда

Иначе

КонецЕсли;

ОбластьМакета.Параметры.ПредставлениеПоставщика = «ИП Мерзакулов Р.М»;

ОбластьМакета.Параметры.ИНН = «»;

ОбластьМакета.Параметры.Склад= ВыборкаСклад.БИТ_Склад;

ТабДокумент.Вывести(ОбластьМакета);

ЕстьСкидки = Ложь;

//ВыборкаСтрокТовары = Шапка.Товары.Выбрать();

//Пока ВыборкаСтрокТовары.Следующий() Цикл

// Если ВыборкаСтрокТовары.Скидка + ВыборкаСтрокТовары.СкидкаАвтоматическая <> 0 Тогда

// ЕстьСкидки = Истина;

// КонецЕсли;

//КонецЦикла;

ОбластьНомера = Макет.ПолучитьОбласть(«ШапкаТаблицы1|НомерСтроки»);

ОбластьДанных = Макет.ПолучитьОбласть(«ШапкаТаблицы1|Данные»);

ОбластьСуммы = Макет.ПолучитьОбласть(«ШапкаТаблицы1|Сумма»);

//ОбластьСклад = Макет.ПолучитьОбласть(«ШапкаТаблицы1|Склад»);

ТабДокумент.Вывести(ОбластьНомера);

ТабДокумент.Присоединить(ОбластьДанных);

ТабДокумент.Присоединить(ОбластьСуммы);

ОбластьКолонкаТовар = Макет.Область(«Товар»);

Если Не ЕстьСкидки Тогда

ОбластьКолонкаТовар.ШиринаКолонки = ОбластьКолонкаТовар.ШиринаКолонки

+ Макет.Область(«Сумма»).ШиринаКолонки;

КонецЕсли;

ОбластьНомера = Макет.ПолучитьОбласть(«Строка1|НомерСтроки»);

ОбластьДанных = Макет.ПолучитьОбласть(«Строка1|Данные»);

ОбластьСуммы = Макет.ПолучитьОбласть(«Строка1|Сумма»);

//ОбластьСклад= Макет.ПолучитьОбласть(«Строка|Склад»); Убираем область склад

Сумма = 0;

ВсегоСкидок = 0;

ВсегоБезСкидок = 0;

ВыборкаСтрокТовары = Шапка.Товары.Выбрать();

Пока ВыборкаСтрокТовары.Следующий() Цикл

Если ВыборкаСтрокТовары.БИТ_Склад=ВыборкаСклад.БИТ_Склад ТОгда

Если НЕ ЗначениеЗаполнено(ВыборкаСтрокТовары.Номенклатура) Тогда

Продолжить;

КонецЕсли;

ОбластьНомера.Параметры.Заполнить(ВыборкаСтрокТовары); ///????

ТабДокумент.Вывести(ОбластьНомера);

ОбластьДанных.Параметры.Заполнить(ВыборкаСтрокТовары);

ОбластьДанных.Параметры.Товар = ?(НЕ ЗначениеЗаполнено(ВыборкаСтрокТовары.ТоварПолноеНаименование),

ВыборкаСтрокТовары.Товар, ВыборкаСтрокТовары.ТоварПолноеНаименование)

+ ФормированиеПечатныхФорм.ПредставлениеСерий(ВыборкаСтрокТовары);

ТабДокумент.Вывести(ОбластьНомера);

ТабДокумент.Присоединить(ОбластьДанных);

ТабДокумент.Вывести(ОбластьМакета);

Сумма = Сумма + ВыборкаСтрокТовары.Сумма;

ВсегоБезСкидок = Сумма + ВсегоСкидок;

ТабДокумент.Присоединить(ОбластьСуммы);

КонецЕсли;

КонецЦикла;

// Вывести Итого.

ОбластьНомера = Макет.ПолучитьОбласть («Итого1|НомерСтроки»);

ОбластьДанных = Макет.ПолучитьОбласть(«Итого1|Данные»);

ОбластьСуммы = Макет.ПолучитьОбласть(«Итого1|Сумма»);

ТабДокумент.Вывести(ОбластьНомера);

ТабДокумент.Присоединить(ОбластьДанных);

ОбластьСуммы.Параметры.Всего = Сумма;

ТабДокумент.Присоединить(ОбластьСуммы);

мВалютаРегламентированногоУчета = Константы.ВалютаРегламентированногоУчета.Получить();

// Вывести Сумму прописью.

ОбластьМакета = Макет.ПолучитьОбласть(«СуммаПрописью1»);

ОбластьМакета.Параметры.ИтоговаяСтрока = «Всего наименований » + ВыборкаСтрокТовары.Количество()

+ «, на сумму » + ОбщегоНазначения.ФорматСумм(Шапка.СуммаДокумента, мВалютаРегламентированногоУчета);

ТабДокумент.Вывести(ОбластьМакета);

// Вывести Оплату и Сдачу.

СуммаОплат = 0;

СуммаБезналичныхОплат = 0;

СписокОплат = Новый Соответствие();

ВыборкаОплат = Шапка.Оплата.Выбрать();

Пока ВыборкаОплат.Следующий() Цикл

Если Шапка.ВидОперации = Перечисления.ВидыОперацийЧекККМ.Возврат

И ВыборкаОплат.ВидОплаты.ТипОплаты <> Перечисления.ТипыОплатЧекаККМ.Наличные Тогда

СуммаБезналичныхОплат = СуммаБезналичныхОплат + ВыборкаОплат.Сумма;

КонецЕсли;

ЗаписьОплаты = СписокОплат.Получить(Строка(ВыборкаОплат.ВидОплаты.ТипОплаты));

Если ЗаписьОплаты = Неопределено Тогда

СписокОплат.Вставить(Строка(ВыборкаОплат.ВидОплаты.ТипОплаты), ВыборкаОплат.Сумма);

Иначе

СписокОплат.Вставить(Строка(ВыборкаОплат.ВидОплаты.ТипОплаты), ЗаписьОплаты + ВыборкаОплат.Сумма);

КонецЕсли;

СуммаОплат = СуммаОплат + ВыборкаОплат.Сумма;

КонецЦикла;

//Отдельная подготовка наличной оплаты для чека возврата

Если Шапка.ВидОперации = Перечисления.ВидыОперацийЧекККМ.Возврат Тогда

КонецЕсли;

// Вывести подписи.

ОбластьМакета = Макет.ПолучитьОбласть(«Подвал1»);

ТабДокумент.Вывести(ОбластьМакета);

КонецЦикла

КонецЦикла;

//Возврат ТабДокумент;

КонецФункции // ПечатьЧека(

Источник

Ошибка при вызове метода контекста загрузить несоответствие типов параметр номер 1

Ошибка в таблице запроса

Исправление ошибки в команде 1С

См. также:

1. Несоответствие типов данных

2. Ошибка внутри таблицы в запросе

3. Причина ошибки внутри команды

Несоответствие типов 1С

В какой момент выходит ошибка

Ошибка в таблице запроса

Исправление ошибки в команде 1С

Заказать консультацию

nomad_irk
Гуру в 1С

alexburn
Модераторы
Команда форума
Модератор

alexburn
Модераторы
Команда форума
Модератор

nomad_irk
Гуру в 1С

nomad_irk
Гуру в 1С

nomad_irk
Гуру в 1С

nomad_irk
Гуру в 1С

nomad_irk
Гуру в 1С

nomad_irk
Гуру в 1С

Несоответствие типов

А вот еще интересные материалы:

Ошибка при вызове метода контекста загрузить несоответствие типов параметр номер 1

Ошибка в таблице запроса

Исправление ошибки в команде 1С

См. также:

1. Несоответствие типов данных

2. Ошибка внутри таблицы в запросе

3. Причина ошибки внутри команды

Несоответствие типов 1С

В какой момент выходит ошибка

Ошибка в таблице запроса

Исправление ошибки в команде 1С

Заказать консультацию

nomad_irk Гуру в 1С

alexburn Модераторы Команда форума Модератор

nomad_irk Гуру в 1С

nomad_irk Гуру в 1С

nomad_irk Гуру в 1С

nomad_irk Гуру в 1С

nomad_irk Гуру в 1С

nomad_irk Гуру в 1С

Несоответствие типов

А вот еще интересные материалы:

nomad_irk
Гуру в 1С

alexburn
Модераторы
Команда форума
Модератор

nomad_irk
Гуру в 1С

nomad_irk
Гуру в 1С

nomad_irk
Гуру в 1С

nomad_irk
Гуру в 1С

nomad_irk
Гуру в 1С

nomad_irk
Гуру в 1С