Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
07 июн 2025, 17:10

метод записать

Автор joystas, 09 сен 2015, 12:20

0 Пользователей и 1 гость просматривают эту тему.

joystas

добрый день! при переходе с 8,2 на 8,3 перестал работать отчет. Выдает ошибку :{Форма.Форма.Форма(340)}: Ошибка при вызове метода контекста (Записать)
   ДвиженияУпр2.Записать();
по причине:
Запись не верна! Поле "Количество" должно быть пустым! (Регистр бухгалтерии: Управленческий 2; Номер строки: 1)

вот текст:Процедура ВыполнитьФормированиеПлан()
       //Состояние("Выборка данных (план)...");
   Запр = Новый Запрос;
   Запр.Текст =
   "ВЫБРАТЬ
   |   осиПЭОПриказ1.Наименование КАК НоменклатураПЭО,
   |   осиПЭОПриказ1.Количество * осиПЭОПриказ1.Цена * 1000 КАК Сумма,
   |   осиПЭОПриказ1.Подразделение КАК ПодразделениеПЭО,
   |   ВЫБОР
   |      КОГДА осиПЭОПриказ1.Пассив = &Строительство
   |         ТОГДА &Счет106
   |      КОГДА осиПЭОПриказ1.Пассив = &Приобретение
   |         ТОГДА &Счет107
   |      КОГДА осиПЭОПриказ1.Пассив = &ИнвестПроекты
   |         ТОГДА &Счет108
   |   КОНЕЦ КАК СчетПЭО,
   |   ВЫБОР
   |      КОГДА осиПЭОПриказ1.Пассив = &Строительство
   |         ТОГДА NULL
   |      ИНАЧЕ осиПЭОПриказ1.Количество
   |   КОНЕЦ КАК Количество
   |ИЗ
   |   РегистрСведений.осиПЭОПриказ1 КАК осиПЭОПриказ1
   |ГДЕ
   |   осиПЭОПриказ1.Период МЕЖДУ &НачДата И &КонДата
   |   И (осиПЭОПриказ1.Пассив = &Приобретение
   |         ИЛИ осиПЭОПриказ1.Пассив = &Строительство ИЛИ осиПЭОПриказ1.Пассив = &ИнвестПроекты)
   |   И осиПЭОПриказ1.Приоритет = 0";
   Запр.УстановитьПараметр("НачДата", НачалоМесяца(Объект.ЗаПериод));
   Запр.УстановитьПараметр("КонДата", КонецМесяца(Объект.ЗаПериод));
   Запр.УстановитьПараметр("Приобретение", ПолучитьЭлементСправочникаПоРеквизиту("осиПЭОПассив", "Наименование", "_Приобретение оборудования"));
   Запр.УстановитьПараметр("Строительство", ПолучитьЭлементСправочникаПоРеквизиту("осиПЭОПассив", "Наименование", "Капитальное строительство"));
   Запр.УстановитьПараметр("ИнвестПроекты", ПолучитьЭлементСправочникаПоРеквизиту("осиПЭОПассив", "Наименование", "_Инвестиционные проекты"));
   Запр.УстановитьПараметр("Счет106", ПолучитьЭлемент("ПланСчетов", "Инт_Управленческий2", "Код", "106"));
   Запр.УстановитьПараметр("Счет107", ПолучитьЭлемент("ПланСчетов", "Инт_Управленческий2", "Код", "107"));
   Запр.УстановитьПараметр("Счет108", ПолучитьЭлемент("ПланСчетов", "Инт_Управленческий2", "Код", "108"));
   
   ТЗ=Запр.Выполнить().Выгрузить();

   Выборка = Запр.Выполнить().Выбрать();
   
   
   //Состояние("Формирование проводок (план)...");
   Сценарий = ПолучитьЭлемент("Справочник", "Инт_Сценарии", "Наименование", "План");
   
   ЦФО = ПолучитьЭлемент("Справочник", "Инт_ЦФО", "Наименование", "ЦЗ ""Оренбургские минералы""");
   ВидСубконтоНоменклатураПЭО = ПолучитьЭлемент("ПланВидовХарактеристик", "ИНТ_Аналитика", "Код", "00000000042");//Номенклатура ПЭО
   ВидСубконтоПодразделенияПЭО = ПолучитьЭлемент("ПланВидовХарактеристик", "ИНТ_Аналитика", "Код", "00000000053");//Подразделения ПЭО
   
   Счет00 = ПолучитьЭлемент("ПланСчетов", "Инт_Управленческий2", "Код", "0");
   
   Проформа = ПолучитьПроформу(Сценарий).ПолучитьОбъект();
   ДвиженияУпр2 = Проформа.Движения.Инт_Управленческий2;
    ДвиженияУпр2.Очистить();
   
   Пока Выборка.Следующий() Цикл
      Проводка = ДвиженияУпр2.Добавить();
      Проводка.Период = КонецМесяца(Объект.ЗаПериод);
      Проводка.Содержание = "авт.загр.";
      Проводка.СчетДт = Выборка.СчетПЭО;
      Проводка.СчетКт = Счет00;
      Проводка.Сценарий = Сценарий;
      Проводка.Сумма = Выборка.Сумма;
      Проводка.ЦФОДт = ЦФО;
      Если Выборка.Количество<> 0  Тогда
         Проводка.КоличествоДт = Выборка.Количество;
      КонецЕсли;
            
      Проводка.Субконто1Дт= Выборка.НоменклатураПЭО;
      Проводка.Субконто2Дт = Выборка.ПодразделениеПЭО;                
   КонецЦикла;
   
   ДвиженияУпр2.Записать();
         //Состояние();
   
КонецПроцедуры


начал писать меньше месяца назад, помогите чем можете

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск