Простое закрытие забалансовых счетов в БП 2.0/БП3.0.41+

Обработки - Обработка документов

4
Простое закрытие забалансовых счетов в БП 2.0/БП3.0.41+

Представляю вашему вниманию простую обработку для закрытия остатком забалансовых счетов.

Обработка создает новый документ "Операция бух" или может наполнить уже существующий документ.

4

Скачать файлы

Наименование Файл Версия Размер
ЗакрытиеЗабалансовыхСчетов.epf
.epf 10,40Kb
22.08.17
90
.epf 10,40Kb 90 Скачать
ЗакрытиеЗабалансовыхСчетовБП30_УФ_INFOSTART.epf
.epf 10,56Kb
22.08.17
10
.epf 10,56Kb 10 Скачать

См. также

Комментарии
Сортировка: Древо
1. ZergKRSK 30.11.11 06:34 Сейчас в теме
Покажите готовую операцию после закрытия :)
3. boevik 2 22.08.17 16:06 Сейчас в теме
Чуть чуть с косячком: запрос без отбора по указываемой организации. Т.е., если без правки, закроет все организации на одну :-)
5. Brawler 392 22.08.17 18:29 Сейчас в теме
(3)(4)
Добрый день.
Да, подтверждаю, что была допущена ошибка с отбором остатков по организации еще в БП 2.0, потом эта ошибка методом копипаста перешла в обработку под БП 3.0.

Обработки обновил и перевыложил.

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

В обработке для БП 2.0
Старый участок кода
Запрос = Новый Запрос;
Запрос.Текст = 
	"ВЫБРАТЬ
	|	ХозрасчетныйОстатки.Счет,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.Субконто1, НЕОПРЕДЕЛЕНО) КАК Субконто1,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.Субконто2, НЕОПРЕДЕЛЕНО) КАК Субконто2,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.Субконто3, НЕОПРЕДЕЛЕНО) КАК Субконто3,
	|	ХозрасчетныйОстатки.Организация,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.Подразделение, НЕОПРЕДЕЛЕНО) КАК Подразделение,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.СуммаОстаток, 0) КАК Сумма,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.КоличествоОстаток, 0) КАК Количество,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.ВалютнаяСуммаОстаток, 0) КАК ВалютнаяСумма,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.СуммаНУОстаток, 0) КАК СуммаНУ,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.СуммаПРОстаток, 0) КАК СуммаПР,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.СуммаВРОстаток, 0) КАК СуммаВР,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.Валюта, &РеглВалюта) КАК Валюта
	|ИЗ
	|	РегистрБухгалтерии.Хозрасчетный.Остатки(
	|			&ДатаСведений,
	|			Счет В ИЕРАРХИИ (&ЗакрываемыйСчет)
	|				И Счет.Забалансовый,
	|			,
	|			) КАК ХозрасчетныйОстатки
	|
	|УПОРЯДОЧИТЬ ПО
	|	ХозрасчетныйОстатки.Счет.Код,
	|	Подразделение,
	|	Субконто1,
	|	Субконто2,
	|	Субконто3";

Запрос.УстановитьПараметр("ДатаСведений", ДатаДокумента);
Запрос.УстановитьПараметр("ЗакрываемыйСчет", ЗакрываемыйСчет);
Запрос.УстановитьПараметр("РеглВалюта", Константы.ВалютаРегламентированногоУчета.Получить());
Показать

нужно заменить на новый участок кода
Запрос = Новый Запрос;
Запрос.Текст = 
	"ВЫБРАТЬ
	|	ХозрасчетныйОстатки.Счет,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.Субконто1, НЕОПРЕДЕЛЕНО) КАК Субконто1,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.Субконто2, НЕОПРЕДЕЛЕНО) КАК Субконто2,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.Субконто3, НЕОПРЕДЕЛЕНО) КАК Субконто3,
	|	ХозрасчетныйОстатки.Организация,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.Подразделение, НЕОПРЕДЕЛЕНО) КАК Подразделение,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.СуммаОстаток, 0) КАК Сумма,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.КоличествоОстаток, 0) КАК Количество,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.ВалютнаяСуммаОстаток, 0) КАК ВалютнаяСумма,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.СуммаНУОстаток, 0) КАК СуммаНУ,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.СуммаПРОстаток, 0) КАК СуммаПР,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.СуммаВРОстаток, 0) КАК СуммаВР,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.Валюта, &РеглВалюта) КАК Валюта
	|ИЗ
	|	РегистрБухгалтерии.Хозрасчетный.Остатки(
	|			&ДатаСведений,
	|			Счет В ИЕРАРХИИ (&ЗакрываемыйСчет)
	|				И Счет.Забалансовый,
	|			,
	|			Организация = &Организация) КАК ХозрасчетныйОстатки
	|
	|УПОРЯДОЧИТЬ ПО
	|	ХозрасчетныйОстатки.Счет.Код,
	|	Подразделение,
	|	Субконто1,
	|	Субконто2,
	|	Субконто3";

Запрос.УстановитьПараметр("ДатаСведений", ДатаДокумента);
Запрос.УстановитьПараметр("Организация", Организация);
Запрос.УстановитьПараметр("ЗакрываемыйСчет", ЗакрываемыйСчет);
Запрос.УстановитьПараметр("РеглВалюта", Константы.ВалютаРегламентированногоУчета.Получить());
Показать


В обработке для БП 3.0
Старый участок кода
Запрос = Новый Запрос;
Запрос.Текст = 
	"ВЫБРАТЬ
	|	ХозрасчетныйОстатки.Счет,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.Субконто1, НЕОПРЕДЕЛЕНО) КАК Субконто1,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.Субконто2, НЕОПРЕДЕЛЕНО) КАК Субконто2,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.Субконто3, НЕОПРЕДЕЛЕНО) КАК Субконто3,
	|	ХозрасчетныйОстатки.Организация,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.Подразделение, НЕОПРЕДЕЛЕНО) КАК Подразделение,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.СуммаОстаток, 0) КАК Сумма,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.КоличествоОстаток, 0) КАК Количество,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.ВалютнаяСуммаОстаток, 0) КАК ВалютнаяСумма,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.СуммаНУОстаток, 0) КАК СуммаНУ,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.СуммаПРОстаток, 0) КАК СуммаПР,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.СуммаВРОстаток, 0) КАК СуммаВР,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.Валюта, &РеглВалюта) КАК Валюта
	|ИЗ
	|	РегистрБухгалтерии.Хозрасчетный.Остатки(
	|			&ДатаСведений,
	|			Счет В ИЕРАРХИИ (&ЗакрываемыйСчет)
	|				И Счет.Забалансовый,
	|			,
	|			) КАК ХозрасчетныйОстатки
	|
	|УПОРЯДОЧИТЬ ПО
	|	ХозрасчетныйОстатки.Счет.Код,
	|	Подразделение,
	|	Субконто1,
	|	Субконто2,
	|	Субконто3";

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

нужно заменить на новый участок кода
Запрос = Новый Запрос;
Запрос.Текст = 
	"ВЫБРАТЬ
	|	ХозрасчетныйОстатки.Счет,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.Субконто1, НЕОПРЕДЕЛЕНО) КАК Субконто1,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.Субконто2, НЕОПРЕДЕЛЕНО) КАК Субконто2,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.Субконто3, НЕОПРЕДЕЛЕНО) КАК Субконто3,
	|	ХозрасчетныйОстатки.Организация,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.Подразделение, НЕОПРЕДЕЛЕНО) КАК Подразделение,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.СуммаОстаток, 0) КАК Сумма,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.КоличествоОстаток, 0) КАК Количество,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.ВалютнаяСуммаОстаток, 0) КАК ВалютнаяСумма,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.СуммаНУОстаток, 0) КАК СуммаНУ,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.СуммаПРОстаток, 0) КАК СуммаПР,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.СуммаВРОстаток, 0) КАК СуммаВР,
	|	ЕСТЬNULL(ХозрасчетныйОстатки.Валюта, &РеглВалюта) КАК Валюта
	|ИЗ
	|	РегистрБухгалтерии.Хозрасчетный.Остатки(
	|			&ДатаСведений,
	|			Счет В ИЕРАРХИИ (&ЗакрываемыйСчет)
	|				И Счет.Забалансовый,
	|			,
	|			Организация = &Организация) КАК ХозрасчетныйОстатки
	|
	|УПОРЯДОЧИТЬ ПО
	|	ХозрасчетныйОстатки.Счет.Код,
	|	Подразделение,
	|	Субконто1,
	|	Субконто2,
	|	Субконто3";

Запрос.УстановитьПараметр("ДатаСведений", Объект.ДатаДокумента);
Запрос.УстановитьПараметр("Организация", Объект.Организация);
Запрос.УстановитьПараметр("ЗакрываемыйСчет", Объект.ЗакрываемыйСчет);
Запрос.УстановитьПараметр("РеглВалюта", Константы.ВалютаРегламентированногоУчета.Получить());
Показать
4. realsevere 4 22.08.17 16:06 Сейчас в теме
До сих пор работает в БП 2.0, только автор забыл добавить отбор по организации в запросе, поэтому тем у кого больше одной организации придётся поправить код.
Оставьте свое сообщение