Имя: Пароль:
1C
1С v8
Свертывание "регистра накопления" в регистратор ввод начальных остатков
0 faust_max
 
17.08.22
12:07
Здравствуйте Уважаймые профии.
Подскажите как можно правильно свернуть регистр сведений "товары на складах" у данного регистра разные регистраторы. Нужно свернуть в один регистратор.
Розница 2.3 не имеет документ ввод начальных остатков как "КА"
Альтернативный документ, инвентаризация.
Пишу обработку и получаю ошибку.
&НаСервереБезКонтекста
Функция ЗаполнитьДокумент(ДанныеФормы, Период)
    //Переписать
    Документ = ДанныеФормыВЗначение(ДанныеФормы, Тип("ДокументОбъект.ОприходованиеТоваров"));
    ЗаполнитьПоРегистру(Документ, "ТоварыНаСкладах", Период);    
    ЗначениеВДанныеФормы(Документ,ДанныеФормы);
    
КонецФункции          


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




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

Не могу понять где я совершаю ошибки.
1 faust_max
 
17.08.22
12:08
Прошу прошения в описание перепутал регистр сведений и накоплений
2 shuhard
 
17.08.22
13:23
(0)[Не могу понять где я совершаю ошибки.]
Документы не создают программно через получение форм
для этого есть СоздатьОбъект
3 2S
 
17.08.22
13:28
(0) списать, оприходовать
4 alarm2020
 
17.08.22
13:28
(2) Брось клюшку!
5 МКК
 
17.08.22
14:04
(2) Да ну на
2 + 2 = 3.9999999999999999999999999999999...