Запретить удаление документа

1С v8

28.01.22

✎

10:11

В модуле

Процедура ПередЗаписью(Отказ)
    Если этотобъект.ПометкаУдаления=Истина Тогда
      сообщить("Запрещено удалять");
      Отказ = Истина;
    КонецЕсли;
КонецПроцедуры

Отрабатывает нормально, но Shif + Delete удаляет. Как запретить?

1 1Сергей

28.01.22

✎

10:14

Процедура ПередУдалением(Отказ)

2 Ryzeman

28.01.22

✎

10:15

А почему пользователям в принципе разрешено интерактивное удаление?...

3 Snail

28.01.22

✎

10:17

Есть несколько пользователей с админ правами и один из этих организмов совсем тупой :(
И дать другую роль - не вариант

4 1Сергей

28.01.22

✎

10:17

продам СП дорого

5 Snail

28.01.22

✎

10:19

1Сергей, спасибо!

6 Мимохожий Однако

28.01.22

✎

10:19

(4) отбиваешь хлеб у Дениса )

7 1Сергей

28.01.22

✎

10:20

(6) Не всё жи питерским, пора и москвичам подзаработать :)

8 Guk

28.01.22

✎

10:21

совсем тупой с админскими правами... прелестно...

9 Snail

28.01.22

✎

10:25

Это друг директора...

10 Kigo_Kigo

28.01.22

✎

10:33

(9) Пиздец у него друзья, печалька...

11 vde69

28.01.22

✎

10:43

(8) (9) я и для админов всегда запрещаю непосредственное удаление, только через пометку....

12 El_Duke

гуру

28.01.22

✎

10:51

(9) Друг директора будет тебе потом базу чинить ?

13 Dmitrii

гуру

28.01.22

✎

10:52

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

14 Базис

naïve

28.01.22

✎

10:53

Выведи владельцу базы из ЖР список удалённых объектов и согласуй запрет интерактивного удаления.

15 Snail

28.01.22

✎

10:56

Это самописка. Дело в том, что для админов нужно непосредственное удаление..
El_Duke, в конфигуратор доступ только у СуперАдмина )

16 El_Duke

гуру

28.01.22

✎

11:02

(15) И как это спасет от битых ссылок при непосредственном удалении ?

17 Snail

28.01.22

✎

11:05

Там документы на прописаны в регистрах, это какие-то заготовки, я хз, что они там делают. С этих заготовок создают другие документы..

18 Snail

28.01.22

✎

11:11

19 1Сергей

28.01.22

✎

11:17

У каждой ошибки есть имя и фамилия ©

20 Kigo_Kigo

28.01.22

✎

11:18

Процедура ПередУдалением(Отказ)
    Пользователь = ПользователиИнформационнойБазы.ТекущийПользователь();
    Если Пользователь  = "Тупой друг" Тогда
    Отказ = Истина;
    КонецЕсли;
Сообщение = Новый СообщениеПользователю();
Сообщение.Текст = "Вам отказано в непосредственном удалении объекта, жалобы, претензии, пожелания  принимают по адресу www.sportloto.ru! ";
Сообщение.Сообщить();
КонецПроцедуры

21 Kigo_Kigo

28.01.22

✎

11:19

*//КонецЕсли;
Сообщение.Сообщить();
КонецЕсли;

22 Snail

28.01.22

✎

11:20

))))))))))

23 Ryzeman

28.01.22

✎

11:21

(20) Сообщение.Текст = "Производим рекогносцировку возможности выполнения операции";
Сообщение.Сообщить();
ОбщегоНазначенияБТС.Пауза(600);

24 Kassern

28.01.22

✎

11:21

(20) Лучше уж вместо "Если Пользователь = "Тупой друг" Тогда"-> Если РольДоступна("ТупойЮзвер") Тогда ))

25 vde69

28.01.22

✎

11:22

(15)>>>Дело в том, что для админов нужно непосредственное удаление..

вранье, непосредственное удаление это 100% зло

26 Ryzeman

28.01.22

✎

11:24

(25) +
Пользователю в принципе не надо иметь возможность непосредственно удалять. Никакому. Только по служебке только с контролем целостности ссылок раз в квартал или сколько там нужно.

27 Kigo_Kigo

28.01.22

✎

11:33

(25) да ладно, есть ситуации когда проще непосредственно удалить и зачистить ссылки в ТиИ, чем задрачивать КиУдПО

28 Guk

28.01.22

✎

12:15

(25) семерошникам про это не говори...