Закрытие остатков по регистрам накопления

Публикация № 927990

Разработка - Практика программирования

закрытие остатки регистры накопления

7
Гибкий способ закрытия остатков по регистрам накопления. ДЛЯ ПРОГРАММИСТОВ, НЕ ДЛЯ БУХГАЛТЕРОВ.

Как относительно быстро закрыть остатки по регистрам накопления. Разработано для конфигурации "Управление производственным предприятием", но частично доработав можно использовать с другими конфигурациями.

Делается на основе Инструменты разработчика (ИР). Тестировалось на версии 4.57

Задачу закрытия остатков можно разделить на два этапа - получение данных, занесение этих данных в документ. Все это можно сделать в Консоли запросов. Получение данных через запрос (со всеми имеющимися возможностями запросов), а результат запроса заносится в документ на вкладке "Обработка результата".

 

 

Код занесения данных 

//код адаптирован под конфигурацию "Управление производственным предприятием"

//исходные данные для заполнения
ДатаДокумента = ТекущаяДата();
ИмяРегистраНакопления = "ДенежныеСредства";

//Вариант 1. Создание нового документа.
ДокДвижения = Документы.КорректировкаЗаписейРегистров.СоздатьДокумент();
ДокДвижения.Дата = ДатаДокумента;
ДокДвижения.УстановитьНовыйНомер();
//Вариант 2. Вставка в существующий документ. (Через кнопку Вставка/Ссылка на объект БД)
//ДокДвижения = Параметры.КорректировкаЗаписейРегистров03400000717От22_10_201816_12_02.ПолучитьОбъект();

РегистрМетаданные = Метаданные.РегистрыНакопления[ИмяРегистраНакопления];//этой строкой можем поймать ошибки

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

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

//полученный (или дополненный) документ можно сразу записать, 
//а в текущей реализации документ НЕ ЗАПИСЫВАЕТСЯ СРАЗУ в базу данных
//ДокДвижения.Записать();
ОткрытьЗначение(ДокДвижения);

 

Грабли, примечания и дополнения.

Не просто так в кратком описании написано ДЛЯ ПРОГРАММИСТОВ, НЕ ДЛЯ БУХГАЛТЕРОВ. Гибкость и относительная простота требует понимания выполняемых действий и некоторую работу по доработке кода при применении.

1. И это весьма существенно, в коде необходимо прописывать значение ИмяРегистраНакопления.

2. В запросе необходимо выводить все поля регистра (это для начинающих программистов, иначе можете не закрыть именно эти остатки).

3. Если остатки выбираются из Таблицы остатков регистра накопления, то полям Ресурсов необходимо  дать синоним в соответствии с именами в конфигураторе (их легко посмотреть в конструкторе запроса).

3.1. Если вдруг необходимо сделать движения на основе Таблицы оборотов регистра накопления, то надо опредяться какие данные ресурсов нужны, и которым необходимо присвоить корректный синоним.

4. Можно заносить данные в документ порциями - первый раз в новый документ, затем в уже существующий. Но при этом условия в запросе надо будет менять, код занесения данных для довнесения данных в документ также изменить, а документ записывать после каждого занесения данных. Либо наоборот, в документ внести избыточные данные, а затем удалить из документа лишние строки.

5. Код внесения данных в документ заточен на конфигурацию Управление производственным предприятием. То есть - данные будут заноситься в документ "Корректировка записей регистров", который имеет следующие особенности:
- чтобы данные в документе были видны пользователю необходимо занести информацию о изменяемом регистре в табличную часть ТаблицаРегистровНакопления;
- данные сразу записываются в движения документа;
- частично данные обрабатываются самим документом при записи (в частности устанавливается период).

Для иных конфигураций требуется адаптировать код под эту конфигурацию.

6. Кстати, убедитесь, что документ, куда заносятся данные, является регистратором данного движения. :)

7. Возможно, в некоторых конфигурациях, при занесении данных в документ, надо будет часть данных прописывать в коде (например период) либо наоборот, в тексте запроса убрать некоторые поля (например регистратор).

8. Возможно, некоторые бухгалтеры потребуют, чтобы в документе был вид движения - приход. В этом случае в тексте запроса перед полями ресурсов надо будет поставить знак "минус".

В целом, подобное использование Консоли запросов можно использовать и для регистров сведений, и для регистров бухгалтерии. Но в этих случаях код занесения данных усложняется, особенно для регистров бухгалтерии (проводки надо прописывать).

7

Специальные предложения

Комментарии
Избранное Подписка Сортировка: Древо
1. kosmo0 83 31.10.18 10:00 Сейчас в теме
:) Прям какая-то мистика творится. Первоначально ИР были без ссылки. Попросили сделать ссылку. Сделал. В итоге ссылка не та которую прописывал.

А в целом ИР хороши для разовых проблем. Тех, которые возникают внезапно и больше не проявляются. Плюс можно данные перетаскивать из инструмента в инструмент. Например из консоли запроса в консоль кода, там данные изменил и тут же посмотрел таблицу значений (в плане что там получилось после изменения).
2. kosmo0 83 04.09.19 15:07 Сейчас в теме
Для регистров бухгалтерии ЗаполнитьЗначенияСвойств(НовСтр, ВыборкаЗапроса); не пройдет для субконто.

либо прописывать каждое субконто подобно

НовСтр.СубконтоКт[ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.Номенклатура] = ВыборкаЗапроса.СубконтоКт1


либо (по Дт и по Кт)

Для Каждого текСуб Из НовСтр.СчетКт.ВидыСубконто Цикл
    НовСтр.СубконтоКт[текСуб.ВидСубконто]=ВыборкаЗапроса["СубконтоКт"+текСуб.НомерСтроки];
КонецЦикла;
Оставьте свое сообщение

См. также

Полезные процедуры и функции для программиста 160

Статья Программист Нет файла v8 1cv8.cf Россия Бесплатно (free) Практика программирования Универсальные функции

Все мы пишем программный код и часто используем процедуры, облегчающие его написание. Ниже приведена выборка таких полезных процедур и функций.

07.10.2019    12260    HostHost    23       

Программы для исполнения 54-ФЗ Промо

С 01.02.2017 контрольно-кассовая техника должна отправлять электронные версии чеков оператору фискальных данных - правила установлены в 54-ФЗ ст.2 п.2. Инфостарт предлагает подборку программ, связанных с применением 54-ФЗ, ККТ и электронных чеков.

Перенос данных БП 2.0 => УТ 11 / КА 2 / ERP 2 (перенос остатков, документов и справочников из "1С:Бухгалтерия предприятия 8", ред. 2.0 в "1С:Управление торговлей 8", ред.11 / КА 2 / ERP 2). Обновлено до УТ 11.4.10.х, КА 2.4.10.х, ERP 2.4.10.х! Промо

Перенос позволяет загрузить в УТ 11 / КА 2 / ERP 2 документы за выбранный период, справочную информацию и остатки по счетам бух. учета. Переносятся остатки денежных средств, взаиморасчетов, остатки товаров и материалов на складах. Переносятся девятнадцать основных видов документов за выбранный период и вся нормативно-справочная информация. Есть фильтр по организации. Если нужно переносить что-то дополнительно, то обычно бесплатно дорабатываю правила (перед покупкой согласуйте необходимые доработки).

29700 руб.

Агрегатные функции СКД, о которых мало кто знает 356

Статья Программист Нет файла v8 v8::СКД 1cv8.cf Бесплатно (free) Практика программирования

Пользуетесь ли Вы всеми возможными агрегатными функциями, которые предоставляет система компоновки данных? Если Вы используете только: СУММА, КОЛИЧЕСТВО, МИНИМУМ, МАКСИМУМ, СРЕДНЕЕ, то эта статья для Вас.

05.09.2019    16180    ids79    44       

Три костыля. Сказ про фокусы в коде 124

Статья Программист Нет файла v8 Бесплатно (free) Практика программирования Разработка

Три интересных (или странных) костыля в коде, которые могут помочь в повседневных и не очень задачах.

03.09.2019    10887    YPermitin    69       

Перенос данных БП 3.0 => УТ 11 / КА 2 / ERP 2 (ЕРП) (перенос остатков, документов и справочной информации из "1С:Бухгалтерия предприятия 8", ред.3.0). Обновлено до БП 3.0.73.х, УТ 11.4.10.х, КА 2.4.10.х., ERP 2.4.10.х! Промо

Переносятся документы за выбранный период, справочная информация и остатки по счетам бух. учета в программу УТ 11 / КА 2 / ЕРП 2 (ERP). Переносятся все возможные виды операций ввода остатков на нужную дату. Есть отбор по периоду переноса документов и фильтр по организации, доступен выбор даты ввода остатков. Если нужно переносить что-то дополнительно, то обычно бесплатно добавляем это в перенос . Смотрите видеодемонстрацию со звуком - советами по переносу и рекомендациями настройки программ.

29700 руб.

Отслеживание выполнения фонового задания 143

Статья Программист Нет файла v8 1cv8.cf Бесплатно (free) Практика программирования Универсальные функции Разработка

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

17.08.2019    13394    ids79    16       

Функции СКД: ВычислитьВыражение, ВычислитьВыражениеСГруппировкойМассив 262

Статья Программист Нет файла v8 v8::СКД 1cv8.cf Бесплатно (free) Практика программирования

Подробное описание и использование внутренних функций системы компоновки данных: Вычислить, ВычислитьВыражение, ВычислитьВыражениеСГруппировкойМассив, ВычислитьВыражениеСГруппировкойТаблицаЗначений.

08.08.2019    18936    ids79    31       

Перенос данных УПП 1.3 => ERP 2 (ЕРП) / УТ 11 / КА 2.х (обработка переноса документов, остатков и справочников из "1С:Управление производственным предприятием, ред. 1.3" в ERP / УТ 11 / КА 2). Обновлен до УПП 1.3.127.х, КА 2.4.10.х и ERP 2.4.10.х! Промо

Обработка позволяет переносить из УПП 1.3 в ERP 2 документы за выбранный период и остатки. Типовая обработка от фирмы 1С документы не переносит. Также исправлены ошибки типовой обработки. При выходе новых релизов обновление высылается бесплатно в течение года. Разработка будет полезна фирмам-франчайзи, которые периодически выполняют такой перенос данных для заказчиков. Вы можете один раз приобрести обработку переноса, и потом бесплатно получать обновления при выходе новых релизов конфигураций 1С.

29700 руб.

Фоновое выполнение кода в 1С - это просто 124

Статья Программист Нет файла v8 1cv8.cf Бесплатно (free) Практика программирования Разработка

Как легко запускать выполнение в фоне, не прибегая к долгому описанию фоновых процедур.

02.08.2019    13026    avalakh    21       

С 2020 года сервис «Продление поддержки конфигурации 1С:УПП» подорожает вдвое Промо

Успейте продлить поддержку УПП до повышения цен! Фирма «1С» предупредила об изменении цен на сервис «Продление поддержки конфигурации "1С:Управление производственным предприятием"». С 1 января 2020 года сервис подорожает в два раза.

СКД - наборы данных и связи между ними, создание собственной иерархии, вложенные отчеты 142

Статья Программист Нет файла v8 v8::СКД 1cv8.cf Бесплатно (free) Практика программирования

Набор данных объект. Использование в схеме компоновки нескольких наборов данных. Различные варианты связи наборов: объединение, соединение. Использование иерархии в отчетах на СКД. Создание собственной иерархии, иерархия детальных записей. Использование вложенных схем в отчетах на СКД.

26.07.2019    17042    ids79    8       

СКД - использование расширений языка запросов, секция ХАРАКТЕРИСТИКИ 156

Статья Программист Нет файла v8 v8::СКД Бесплатно (free) Инструментарий разработчика Практика программирования

Автоматическое и не автоматическое заполнение полей компоновки данных. Использование расширений языка запросов для СКД «{…}», секция ВЫБРАТЬ, секция ГДЕ, параметры виртуальных таблиц. Автоматизированное использование дополнительных данных в запросе: секция ХАРАКТЕРИСТИКИ.

17.07.2019    13955    ids79    27       

Перенос данных КА 1.1 => ERP 2 (ЕРП) (обработка переноса документов, остатков и справочной информации из "1С:Комплексная автоматизация, ред. 1.1" в "1С:ERP Управление предприятием, ред 2"). Обновлен до КА 1.1.115.х и ERP 2.4.10.х Промо

Обработка позволяет переносить из КА 1.1 в ERP 2 документы за выбранный период и остатки. Типовая обработка от фирмы 1С документы не переносит. Также исправлены ошибки типовой обработки. При выходе новых релизов обновление высылается бесплатно в течение года. Разработка будет полезна фирмам-франчайзи, которые периодически выполняют такой перенос данных для заказчиков. Вы можете один раз приобрести обработку переноса, и потом бесплатно получать обновления в случае выхода новых релизов конфигураций 1С.

29700 руб.

Регистры сведений. За кулисами 129

Статья Программист Нет файла v8 1cv8.cf Бесплатно (free) Практика программирования Разработка

Небольшие заметки по внутреннему устройству регистров сведений.

09.07.2019    11183    YPermitin    12       

"Меньше копипаста!", или как Вася универсальную процедуру писал 184

Статья Программист Стажер Нет файла v8 v8::СКД 1cv8.cf Бесплатно (free) Практика программирования Разработка

Программист Вася разбирает подход создания универсальных методов на примере программного вывода СКД.

04.07.2019    10032    SeiOkami    49       

Подборка решений для взаимодействия со ФГИС «Меркурий» Промо

С 1 июля 2019 года все компании, участвующие в обороте товаров животного происхождения, должны перейти на электронную ветеринарную сертификацию (ЭВС) через ФГИС «Меркурий». Инфостарт предлагает подборку программ, связанных с этим изменением.

Создание отчетов с помощью СКД - основные понятия и элементы 217

Статья Программист Нет файла v8 v8::СКД Бесплатно (free) Практика программирования Математика и алгоритмы

Основные принципы работы СКД. Понятия схемы компоновки и макета компоновки. Описание основных элементов схемы компоновки: наборы данных, поля, вычисляемые поля, ресурсы, параметры.

25.06.2019    24268    ids79    17       

Многопоточное ускорение однопользовательских нагрузок в 1С + Microsoft SQL Server 2017 179

Статья Программист Нет файла v8 v8::Запросы Бесплатно (free) Практика программирования Разработка

Взаимодействие с Microsoft SQL Server нередко вызывает трудности у 1С-ников, а потому интересны любые моменты, связанные с его использованием. О своем опыте работы с новым SQL Server 2017 участникам конференции Infostart-2018 рассказал директор ООО «Аналитика софт» Дмитрий Дудин.

11.06.2019    13792    dmurk    134       

Очный семинар по регулярному менеджменту Александра Фридмана "Вы или Хаос", 12 декабря 2019 г. , Санкт-Петербург Промо

Семинар по регулярному менеджменту от Александра Фридмана для собственников, первых лиц и топов. Технология управленческого планирования, комплексного управления временем и другими ресурсами, выполнением поручений, делами, информацией, контактами (встречи-звонки-почта).

от 11000 до 29000 рублей

Регистры накопления. Структура хранения в базе данных 178

Статья Программист Нет файла v8 1cv8.cf Бесплатно (free) Практика программирования Разработка

Структура хранения регистров накопления в базе данных для платформы 1С:Предприятие 8.x. Первая часть в серии публикаций.

16.05.2019    21835    YPermitin    27       

Выполнение внешней обработки в фоновом задании 149

Статья Программист Нет файла v8 1cv8.cf Бесплатно (free) Практика программирования Разработка

Подробное описание подхода к созданию длительной операции на основе внешней обработки. Реализация протестирована на 1С 8.3.12.1714 (x64).

11.05.2019    13704    Eret1k    23       

Перенос данных УТ 10.3 => УТ 11 / КА 2 / ERP 2 (ЕРП 2) (документы, остатки и справочная информация из "1С:Управление торговлей, ред. 10.3" в УТ 11 / КА 2 / ERP 2). Обновлен до УТ 10.3.56.х, УТ 11.4.10.х, КА 2.4.10.х и ERP 2.4.10.х! Промо

Уже более 100 компаний приобрели перенос и выполнили переход на УТ 11 / КА 2 / ERP 2 с помощью нашей разработки! Обработка перехода с УТ 10.3 на УТ 11 / КА 2 / ERP 2 позволяет перенести не только остатки на указанную дату (как типовой перенос), но и все возможные документы за выбранный период. При выходе новых релизов этих программ оперативно выпускаем обновление обработки. Предоставляем техническую поддержку. Можем сделать бесплатный тестовый перенос!

29700 руб.

Выгрузка документа по условию 5

Статья Программист Нет файла v8 Бесплатно (free) Практика программирования Разработка

Что делать, если документы нужно выгружать не все подряд, а по какому-то фильтру: статусу, дате, набору условий... А что если он соответствовал этим условиям, а потом перестал? А если потом опять начал? Такие ситуации заставили попотеть не одного программиста.

25.04.2019    7894    m-rv    2       

Как прикрутить ГУИД к регистру сведений 23

Статья Программист Нет файла v8 Бесплатно (free) Практика программирования Перенос данных из 1C8 в 1C8 Разработка

... и немного теории обмена данными. В частности, разберем боль всех, кто пишет небанальные обмены данными: как набору записей регистра сведений назначить гуид и далее использовать его в обмене для идентификации этого набора.

16.04.2019    10431    m-rv    16       

Онлайн-курс "Технология выполнения проектов ERP-класса – процессный подход". Третий поток. Курс проходит с 21 января по 18 марта 2020 года. Промо

Курс разработан Внедренческим центром «Раздолье». Курс предназначен для подготовки аналитиков, архитекторов и руководителей проектов автоматизации процессов управления с использованием комплексных ИТ-систем (1С:ERP, 1С:УХ, 1С:КА, 1С:УТ). В основе курса лежит методика применения процессного подхода.

9000 рублей

О расширениях замолвите слово... 195

Статья Программист Стажер Нет файла v8 Бесплатно (free) Практика программирования Разработка

О чём стоит задуматься при принятии решения о создании расширения конфигурации…

07.04.2019    19092    ellavs    125       

Git-репозитории для 1С-кода (опыт использования при небольших проектах) 202

Статья Программист Стажер Нет файла v8 Windows Бесплатно (free) Практика программирования Разработка

Инструкции по взаимодействию с Git-репозиторием, которые писались для тех наших программистов, которые вообще никогда не работали с Git (руководства в духе "Как получить код из git-репозитория?", "Как отправить код в git-репозиторий")...

28.03.2019    15634    ellavs    83       

Программы для исполнения 488-ФЗ: Маркировка товаров Промо

1 января 2019 года вступил в силу ФЗ от 25.12.2018 № 488-ФЗ о единой информационной системе маркировки товаров с использованием контрольных (идентификационных) знаков, который позволяет проследить движение товара от производителя до конечного потребителя. Инфостарт предлагает подборку программ, связанных с применением 488-ФЗ и маркировкой товаров.

Трюки с внешними источниками данных 167

Статья Программист Нет файла v8 1cv8.cf Бесплатно (free) Практика программирования Разработка

Некоторые трюки для преодоления ограничений внешних источников данных.

14.03.2019    16614    YPermitin    53       

Новый раздел на Инфостарте - Electronic Software Distribution Промо

Инфостарт напоминает: на нашем сайте можно купить не только ПО, связанное с 1С. В нашем арсенале – ESD-лицензии на ПО от ведущих вендоров: Microsoft, Kaspersky, ESET, Dr.Web, Аскон и другие.

  • Низкие цены, без скрытых платежей и наценок
  • Оперативная отгрузка
  • Возможность оплаты с личного счета (кешбек, обмен стартмани на рубли и т.п.)
  • Покупки идут в накопления для получения скидочных карт лояльности Silver (5%) и Gold (10%)

Возможности типовых шаблонов ограничения доступа на уровне записей (RLS) 174

Статья Программист Нет файла v8 v8::Права Бесплатно (free) Практика программирования БСП (Библиотека стандартных подсистем) Роли и права

Краткий обзор применения типовых шаблонов ограничения доступа на уровне записей в конфигурациях, созданных на базе БСП: #ПоЗначениям, #ПоНаборамЗначений, #ПоЗначениямРасширенный, #ПоЗначениямИНаборамРасширенный

03.02.2019    19569    ids79    9