Как в коде подрубить нужный регистр для документа "операции Введенные вручную"
Имеем документ, "Операции введенные в ручную", пишу обработку автоматически его заполняющую, как в коде написать подрубить такие-то регистры сведений и заполнить по ним табличную часть? на фотках пример как это делаю вручную из базы
&НаСервере
Процедура ЗаписатьДанныеНаСервере()
НовыйДок = Документы.ОперацияБух.СоздатьДокумент()
НовыйДок.Дата = ТекущаяДата();
НовыйДок.Организация = Справочники.Организации.НайтиПоНаименованию("ВОДОКАНАЛ-МЫТИЩИ АО");
//Для Каждого СтрокаДанных Из Объект.ДанныеФайла Цикл
//НайденнаяНоменклатура = Справочники.ОсновныеСредства.НайтиПоНаименованию(СтрокаДанных.Наименование);
//Если ЗначениеЗаполнено(НайденнаяНоменклатура) Тогда
// НоваяСтрока = НовыйДок.ОС.Добавить();
//НоваяСтрока.ОсновноеСредство = СтрокаДанных.Наименование;
НоваяСтрока.ОсновноеСредство = НайденнаяНоменклатура;
//НоваяСтрока.СтоимостьПоДаннымУчета = 100;
// НоваяСтрока.СтоимостьПоДаннымУчета = Число(СтрокаДанных.Сумма);
// НоваяСтрока.НаличиеПоДаннымУчета = Истина;
// НоваяСтрока.НаличиеФактическое = Истина;
//Иначе
// Сообщить ("Номенклатура не обнаружена!!!" + СтрокаДанных);
//КонецЕсли;
КонецЦикла;
НовыйДок.Записать();
Сообщить("Запись, создана" + НовыйДок.Ссылка);
КонецПроцедуры
ПоказатьНайденные решения
(3)
ДокОперация = документы.операциябух.создатьдокумент();
// заполняем реквизиты шапки: организацию, дату и пр.
ДокОперация.Записать();
НаборЗаписей = РегистрыСведений.РС.СоздатьНаборЗаписей();
Для каждого ИсточникДанных из массивданных цикл
НоваяЗапись = НаборЗаписей.Добавить()
ЗаполнитьЗначенияСвойств(НоваяЗапись, ИсточникДанных);
НоваяЗапись.Регистратор = ДокОперация.Ссылка;
КонецЦикла;
НаборЗаписей.Записать()
Показать
(9)ТабличнаяЧасть(-ые...и) уже есть в документе, в них нужно добавить строку с именем регистра.
ДокОперация = документы.операциябух.создатьдокумент();
// заполняем реквизиты шапки: организацию, дату и пр.
НСтр = ДокОперация.ТаблицаРегистров.Добавить();
НСтр.Имя = "ИмяТребуемогоРегистра";
ДокОперация.Записать();
Остальные ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
(3)
ДокОперация = документы.операциябух.создатьдокумент();
// заполняем реквизиты шапки: организацию, дату и пр.
ДокОперация.Записать();
НаборЗаписей = РегистрыСведений.РС.СоздатьНаборЗаписей();
Для каждого ИсточникДанных из массивданных цикл
НоваяЗапись = НаборЗаписей.Добавить()
ЗаполнитьЗначенияСвойств(НоваяЗапись, ИсточникДанных);
НоваяЗапись.Регистратор = ДокОперация.Ссылка;
КонецЦикла;
НаборЗаписей.Записать()
Показать
(4)
Блин только учусь все ровно не понял,
где я указываю какой конкретно регистр сведений втыкаю
НаборЗаписей = РегистрыСведений.РС.СоздатьНаборЗаписей(); // тут я создаю набор записей (потом в него поместим регистры нужные)
Для каждого ИсточникДанных из массивданных цикл // тут я беру те записи что нужно поместить в док, номенклатуры и тд,
НоваяЗапись = НаборЗаписей.Добавить() //создаю запись напримен номенклатура "карандаш"
ЗаполнитьЗначенияСвойств(НоваяЗапись, ИсточникДанных); // тут я потерялся
НоваяЗапись.Регистратор = ДокОперация.Ссылка;
КонецЦикла;[/IS-QUOTE]
ДокОперация = документы.операциябух.создатьдокумент();
// заполняем реквизиты шапки: организацию, дату и пр.
ДокОперация.Записать();
НаборЗаписей = РегистрыСведений.РС.СоздатьНаборЗаписей();
Для каждого ИсточникДанных из массивданных цикл
НоваяЗапись = НаборЗаписей.Добавить()
ЗаполнитьЗначенияСвойств(НоваяЗапись, ИсточникДанных);
НоваяЗапись.Регистратор = ДокОперация.Ссылка;
КонецЦикла;
// заполняем реквизиты шапки: организацию, дату и пр.
ДокОперация.Записать();
НаборЗаписей = РегистрыСведений.РС.СоздатьНаборЗаписей();
Для каждого ИсточникДанных из массивданных цикл
НоваяЗапись = НаборЗаписей.Добавить()
ЗаполнитьЗначенияСвойств(НоваяЗапись, ИсточникДанных);
НоваяЗапись.Регистратор = ДокОперация.Ссылка;
КонецЦикла;
Блин только учусь все ровно не понял,
где я указываю какой конкретно регистр сведений втыкаю
НаборЗаписей = РегистрыСведений.РС.СоздатьНаборЗаписей(); // тут я создаю набор записей (потом в него поместим регистры нужные)
Для каждого ИсточникДанных из массивданных цикл // тут я беру те записи что нужно поместить в док, номенклатуры и тд,
НоваяЗапись = НаборЗаписей.Добавить() //создаю запись напримен номенклатура "карандаш"
ЗаполнитьЗначенияСвойств(НоваяЗапись, ИсточникДанных); // тут я потерялся
НоваяЗапись.Регистратор = ДокОперация.Ссылка;
КонецЦикла;[/IS-QUOTE]
(1) кроме самих движений, нужно еще добавить имя регистра в табличную часть документа ТаблицаРегистров или РегистрыНакопления/РегистрыСведений/РегистрыБухгалтерии в зависимости от конфигурации.
Имя регистра можно узнать из Метаданные.РегистрыНакопления.<ИмяНужногоРегистра>.Имя;
Имя регистра можно узнать из Метаданные.РегистрыНакопления.<ИмяНужногоРегистра>.Имя;
(9)ТабличнаяЧасть(-ые...и) уже есть в документе, в них нужно добавить строку с именем регистра.
ДокОперация = документы.операциябух.создатьдокумент();
// заполняем реквизиты шапки: организацию, дату и пр.
НСтр = ДокОперация.ТаблицаРегистров.Добавить();
НСтр.Имя = "ИмяТребуемогоРегистра";
ДокОперация.Записать();
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот