Защита документа от смены организации при загрузке из Мой Склад в 1С

13.02.23

Интеграция - Внешние источники данных

Защита документов другой организации при загрузке документов в 1С из Мой склад. Потому что 1С ищет документы по номеру, без учета организации

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

Наименование Файл Версия Размер
Защита документа от смены организации при загрузке из Мой Склад в 1С:
.cfe 7,39Kb
0
.cfe 7,39Kb Скачать

К сожалению, 1С при загрузке документов из файла Enterprise Data, ищет документы только по номеру, игнорируя организацию. Поэтому, если в БП3 ведется несколько организаций, возможна ситуация, когда документ организации будет заменен документом другой организации, даже если он находится в уже глубоко закрытом квартале.

Конечно, такое может быть не часто, но у одного из моих клиентов такая ситуация очень удачно «выстрелила», хорошо, что нашелся архив. Выживают только параноики, поэтому если вы загружаете данные из Мой склад, чтобы спать спокойно, нужно использовать расширение, которое контролирует попытки заменить организацию документа и пресекает их.

При попытке изменить организацию будет сгенерирована ошибка, как при загрузке из файла, так и при изменении пользователем:

 

 

Код расширения простой:

Процедура зоио_ПередЗаписьюПередЗаписью(Источник, Отказ, РежимЗаписи, РежимПроведения) Экспорт
	Ссылка = Источник.Ссылка;      
	СО_Текущая = Новый Структура("Организация",);
	СО_Предыдущая = Новый Структура("Организация",);
	
	Если ЗначениеЗаполнено(Ссылка) Тогда 
		ЗаполнитьЗначенияСвойств(СО_Текущая, Источник);
		ЗаполнитьЗначенияСвойств(СО_Предыдущая, Ссылка);
		Если 
			ЗначениеЗаполнено(СО_Текущая.Организация) и 
			ЗначениеЗаполнено(СО_Предыдущая.Организация) И
			СО_Текущая.Организация <> СО_Предыдущая.Организация Тогда
			Текст = "Отклонена попытка изменить организацию документа: " +  Ссылка + " с: " + СО_Предыдущая.Организация + " на: " + СО_Текущая.Организация; 
			Сообщить(Текст);
			ВызватьИсключение Текст;
		КонецЕсли;
	КонецЕсли;
КонецПроцедуры

 

Нужно заметить, что расширение будет работать только в последних релизах 1С, т.к. в расширении добавлена подписка на событие, а это не поддерживается старыми релизами БП3 из-за режима совместимости.

Среда: БП 3.0.128.10. Платформа: 8.3.22.1709.

См. также

SALE! 25%

Автоматическая многопоточная выгрузка данных 1С 8.3 в БД Clickhouse (для работы с данными 1С в BI-системах)

Внешние источники данных Платформа 1С v8.3 Управляемые формы Анализ и прогнозирование Конфигурации 1cv8 Узбекистан Беларусь Кыргызстан Молдова Россия Казахстан Платные (руб)

Готовое решение для автоматизированной выгрузки данных из 1С 8.3, а также MS Excel в базу данных ClickHouse для работы с данными 1С в Yandex Datalens, Visiology, Apache Superset (и не только) - "Экстрактор данных 1С в BI". Решение отлично работает со всеми типовыми (и не только) конфигурациями 1С 8.3 для управляемых форм. Gозволяет автоматизировать работу бизнес-аналитика по ежедневной выгрузке данных из 1С в БД ClickHouse для последующей работы с этой БД в Yandex Datalens/ Система полностью автоматизирует работу с хранилищем данных в БД Clickhouse. Не надо быть программистом, чтобы одной кнопкой получать любые данные из 1С в Yandex Datalens

160000 120000 руб.

15.11.2022    11236    9    47    

22

SALE! 20%

Перенос данных из Парус 8 в ЗГУ ред.3

Зарплата Внешние источники данных Бюджетный учет Платформа 1С v8.3 Сложные периодические расчеты 1С:Зарплата и кадры государственного учреждения 3 Государственные, бюджетные структуры Россия Бухгалтерский учет Бюджетный учет Платные (руб)

Обработка позволяет перенести кадровую информацию и данные по заработной плате, фактических удержаниях, НДФЛ, вычетах, страховых взносах из базы Парус 8 учреждений в конфигурацию 1С:Зарплата и кадры государственного учреждения ред. 3 (ЗГУ) и начать с ней работать с любого месяца года.

84000 67200 руб.

19.08.2020    21092    15    0    

18

SALE! 20%

Перенос данных из Парус 8 в ЗУП ред.3

Зарплата Внешние источники данных Платформа 1С v8.3 Сложные периодические расчеты 1С:Зарплата и Управление Персоналом 3.x Россия Бухгалтерский учет Платные (руб)

Обработка позволяет перенести кадровую информацию и данные по заработной плате, фактических удержаниях, НДФЛ, вычетах, страховых взносах из базы Парус 8 организаций в конфигурацию 1С:Зарплата и управление персоналом, ред. 3 (ЗУП) и начать с ней работать с любого месяца года.

84000 67200 руб.

07.06.2021    12319    1    0    

2

SALE! 20%

Перенос данных из Парус 10 в ЗГУ ред.3

Внешние источники данных Кадровый учет Файловый обмен (TXT, XML, DBF), FTP Обмен между базами 1C Платформа 1С v8.3 Сложные периодические расчеты 1С:Зарплата и кадры государственного учреждения 3 Государственные, бюджетные структуры Россия Бухгалтерский учет Бюджетный учет Платные (руб)

Обработка позволяет перенести кадровую информацию и данные по заработной плате, фактических удержаниях, НДФЛ, вычетах, страховых взносах из базы Парус 10 учреждений в конфигурацию 1С:Зарплата и кадры государственного учреждения ред. 3 (ЗГУ) и начать с ней работать с любого месяца года.

60000 48000 руб.

05.10.2022    8610    5    8    

8

SALE! 20%

Перенос данных из Парус 7.хх в ЗГУ ред.3

Внешние источники данных Зарплата Бюджетный учет Платформа 1С v8.3 Сложные периодические расчеты 1С:Зарплата и кадры государственного учреждения 3 Государственные, бюджетные структуры Россия Бухгалтерский учет Бюджетный учет Платные (руб)

Обработка позволяет перенести кадровую информацию и данные по заработной плате, фактических удержаниях, НДФЛ, вычетах, страховых взносах из базы Парус 7.хх учреждений в конфигурацию 1С:Зарплата и кадры государственного учреждения ред. 3 (ЗГУ) и начать с ней работать с любого месяца года.

24000 19200 руб.

24.04.2017    47463    91    153    

83

SALE! 20%

Перенос данных из Парус 10 (Торнадо) в ЗГУ ред.3 через Excel

Внешние источники данных Загрузка и выгрузка в Excel Зарплата Бюджетный учет Платформа 1С v8.3 Сложные периодические расчеты 1С:Зарплата и кадры государственного учреждения 3 Государственные, бюджетные структуры Россия Бухгалтерский учет Бюджетный учет Платные (руб)

Обработка позволяет перенести кадровую информацию и данные по заработной плате из Парус 10(Торнадо) учреждений через файлы Excel в конфигурацию 1С:Зарплата и кадры государственного учреждения ред. 3 (ЗГУ). В принципе, обработка может быть использована для загрузки из файлов Excel, полученных из любых информационных систем.

24000 19200 руб.

16.11.2018    29512    18    31    

19

Загрузка данных из F3 TAIL 3 (еФарма 2) в 1С: Бухгалтерия 3.0 (базовая, ПРОФ, КОРП)

Розничная торговля Внешние источники данных Файловый обмен (TXT, XML, DBF), FTP Бухгалтерский учет 1С:Бухгалтерия 3.0 Фармацевтика, аптеки Россия Бухгалтерский учет Платные (руб)

Внешняя обработка загрузки данных из файла-выгрузки, сформированного в программе F3 TAIL версии 3.4 (и выше) или еФарма версии 2.1, в базу конфигурации 1С: Бухгалтерия предприятия 8, ред. 3.0 (базовая, ПРОФ, КОРП).

13200 руб.

19.12.2016    44299    81    101    

66

SALE! 20%

Перенос данных из Парус 7.хх в ЗУП ред.3

Зарплата Внешние источники данных Платформа 1С v8.3 Сложные периодические расчеты 1С:Зарплата и Управление Персоналом 3.x Россия Бухгалтерский учет НДФЛ ФОМС, ЕФС Платные (руб)

Обработка позволяет перенести кадровую информацию и данные по заработной плате, фактических удержаниях, НДФЛ, вычетах, страховых взносах из базы Парус 7.хх организаций в конфигурацию 1С:Зарплата и управление персоналом, ред. 3 (ЗУП) и начать с ней работать с любого месяца года.

24000 19200 руб.

07.06.2021    13294    2    13    

3
Комментарии
В избранное Подписаться на ответы Сортировка: Древо развёрнутое
Свернуть все
1. Indgo 327 13.02.23 11:11 Сейчас в теме
Процедура зоио_ПередЗаписьюПередЗаписью(Источник, Отказ, РежимЗаписи, РежимПроведения) Экспорт
	Ссылка = Источник.Ссылка;      
	СО_Текущая = Новый Структура("Организация",);
	СО_Предыдущая = Новый Структура("Организация",);
	
	Если ЗначениеЗаполнено(Ссылка) Тогда 
		ЗаполнитьЗначенияСвойств(СО_Текущая, Источник);
		ЗаполнитьЗначенияСвойств(СО_Предыдущая, Ссылка);
		Если 
			ЗначениеЗаполнено(СО_Текущая.Организация) и 
			ЗначениеЗаполнено(СО_Предыдущая.Организация) И
			СО_Текущая.Организация <> СО_Предыдущая.Организация Тогда
			Текст = "Отклонена попытка изменить организацию документа: " +  Ссылка + " с: " + СО_Предыдущая.Организация + " на: " + СО_Текущая.Организация; 
			Сообщить(Текст);
			ВызватьИсключение Текст;
		КонецЕсли;
	КонецЕсли;
КонецПроцедуры
Показать

Надо бы дописать условия:
1. то что документ находится в запрещенном периоде
2. то что проведен.

Вдруг понадобится - поменять организацию в открытом периоде.
2. fixin 4217 13.02.23 11:33 Сейчас в теме
(1) Не понадобится. Не видел ни одного случая на практике, когда нужно было менять организацию документа.
Но если вдруг надо - то отключаете расширение, меняете, потом включаете.
Обычно попытка сменить организацию документа - это сигнал об ошибке.
Оставьте свое сообщение