Как программно запретить копирование документов ?

Форум Программирование Общие вопросы программирования (Dev)

Платформа 1С v8.3

6. Светлый ум 454 15.07.13 21:12 Сейчас в теме

Для журналов

ПередНачаломДобавления(Элемент, Отказ, Копирование)

Отказ = Истина;

Если Копирование Тогда
КонецЕсли;

По теме из базы знаний

Ответы

Подписаться на ответы Инфостарт бот

Свернуть все

7. KonstB 180 15.07.13 21:56 Сейчас в теме

(6) Светлый ум, да... главное вовремя

10. Gendalf_beliy 10.01.14 19:02 Сейчас в теме

(6) Светлый ум, подскажите, пожалуйста, где это писать надо, чтоб ограничение действовало лишь на определенную роль. Мне необходимо, чтоб определенная группа пользователей немогла добавлять копированием документ "заказ покупателя" и элементы справочника "номенклатура". Ограничение надо прописывать на действие добавление или в шаблоны ограничений?

11. WKBAPKA 215 11.01.14 11:51 Сейчас в теме

(10) Gendalf_beliy,
а если магию попробывать? белую!

12. fzt 27.02.14 19:39 Сейчас в теме

(10) Gendalf_beliy, если я вас верно понял, шаблон ограничений сработает если у вас RLS включен.
А если не включен то функция

Если Не РольДоступна("Менеджер") Тогда
    Сообщить("Просмотр заявок от покупателей не разрешен!");
КонецЕсли;

37. hmao94931 04.10.23 12:22 Сейчас в теме

Спасибо

8. Светлый ум 454 16.07.13 13:04 Сейчас в теме

Мало ли, может кто-то наткнется и ему поможет.

9. Gendalf_beliy 10.01.14 18:55 Сейчас в теме

(4) bogdan, а где этот код прописать необходимо, если данное ограничение необходимо написать лишь для одной роли?

13. Gendalf_beliy 11.03.14 11:44 Сейчас в теме

Большое спасибо за подсказку.

14. Белка13 13 02.10.14 12:45 Сейчас в теме

Если ЗначениеЗаполнено(ПараметрОбъектКопирования) Тогда 
Отказ = Истина;	
Предупреждение("Функция копирования не доступна!"); 
Возврат; 
КонецЕсли;

15. bogdansirko 14 27.08.09 16:45 Сейчас в теме

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

16. Душелов 4021 27.08.09 16:48 Сейчас в теме

См. параметры в событии объекта "ПередЗаписью".

17. bogdansirko 14 27.08.09 17:06 Сейчас в теме

Нашел ответ но всеравно не работает

Процедура ПередОткрытием(Отказ, СтандартнаяОбработка)
	Если ЭтаФорма.ПараметрОбъектКопирования = Истина    Тогда
	Отказ = Истина;	
	КонецЕсли;
КонецПроцедуры

18. bogdansirko 14 27.08.09 17:21 Сейчас в теме

Отвечаю сам себе

Процедура ПередОткрытием(Отказ, СтандартнаяОбработка)
	Если ЭтаФорма.ПараметрОбъектКопирования  = Неопределено    Тогда
		/// 
	Иначе
		Отказ = Истина;
	КонецЕсли;
КонецПроцедуры

19. WKBAPKA 215 27.08.09 18:15 Сейчас в теме

а зачем писать ЭтаФорма? просто пишите ПараметрОбъектКопирования.

А как узнать перед записью, что объект скопирован? ;)

есть еще событие "ПриКопировании", тоже можно использовать

20. SaschaL 28.08.17 09:55 Сейчас в теме

Работает на КА и УПП 1.6 вот так

Процедура ВыработкаПередНачаломДобавления(Элемент, Отказ, Копирование)
	Если Копирование тогда
		
		Отказ =Истина;
		Возврат;

	КонецЕсли;
КонецПроцедуры

Показать

21. OlegAr 27 28.08.17 09:59 Сейчас в теме

уже давно пора 1С отказаться от копирования документов и включить данный запрет в типовые решения.

22. Fox-trot 164 28.08.17 10:08 Сейчас в теме

(21) не умеешь готовить?

23. OlegAr 27 28.08.17 10:09 Сейчас в теме

(22)бешбармак ? нет не умею, хочу все и сразу.

24. Fox-trot 164 28.08.17 10:10 Сейчас в теме

(23) аминь

25. maqsud_1c 16.10.18 14:59 Сейчас в теме

Если ЭтоНовый() тогда
Если ЗначениеЗаполнено(ПараметрОбъектКопирования) тогда

Отказ=Истина;

КонецЕсли;
КонецЕсли;

26. WKBAPKA 215 17.10.18 08:48 Сейчас в теме

(25) достаточно проверить на значение ПараметрОбъектКопирование, ЭтоНовый() вызывать не обязательно

27. Vlad87 06.08.21 13:53 Сейчас в теме

Самое надежное и на все случаи: в модуле объекта в обработчике "ПриКопировании":

Процедура ПриКопировании(ОбъектКопирования)
	ВызватьИсключение "Не допускается копирование документов";	
КонецПроцедуры

Ответить

28. insurgut 208 03.03.22 13:29 Сейчас в теме

Для управляемых форм - в процедуре ПриСозданииНаСервере формы документа:

Если ЗначениеЗаполнено(Параметры.ЗначениеКопирования) Тогда
		Отказ = Истина;
		Сообщить("Копирование запрещено!");
		Возврат;
	КонецЕсли;

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

29. ActionBlog 03.03.22 16:40 Сейчас в теме

А может, пусть его копируют? Просто очищать при создании на сервере все реквизиты?

30. OlegAr 27 18.10.22 17:18 Сейчас в теме

Вот к чему приводит копирование и легкое поведение менеджеров по продаже.

Отгружаем в Прошлом.

а потом ищем ошибки создания доставки.

Прикрепленные файлы:

31. user1620955 18.01.23 14:18 Сейчас в теме

а для пользователя подскажете как копировать информацию из таблицы, если разрешено копировать только одну ячейку за раз?

33. user613191_olgargor 18.01.23 15:10 Сейчас в теме

(31) выгрузить таблицу целиком в табличный документ, и копировать из него, как вариант

32. user613191_olgargor 18.01.23 15:09 Сейчас в теме

можно копировать, а потом править, зачем же запрещать то? Дату можно программно подчистить, чтоб она требовала ввода, и вообще все такие ключевые поля. А все стирать , вам операторов не жалко?

34. user1620955 18.01.23 15:41 Сейчас в теме

(32)

для пользователя (оператора)!!!

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

печать, сохранить, копировать запрещено.

Теперь делаем всё в ручную,

35. user613191_olgargor 18.01.23 15:57 Сейчас в теме

(34)

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

печать, сохранить, копировать запрещено.

есть вариаерт сфоткать экран и преобразовать фотку в таблицу например с помощью OfficeMobile

но это изврат :)

36. user1863362 18.01.23 16:43 Сейчас в теме

(34)

Но админ поправил конфиги

Ну так и все вопросы к нему, не? Это ж не просто так сделано, а вы нас на соучастие в должностном преступлении подбиваете.

Оставьте свое сообщение

E-mail: