Имя: Пароль:
1C
1C 7.7
v7: Удалить документ(1) интерактивно
0 G-Re
 
18.10.11
19:41
Уважаемые коллеги!
В строго определенных случаях потребовалось физически удалить документ интерактивно. Пишу

//********************************************************************
Процедура ПриУдаленииДокумента(Док, Режим)
//...
// Здесь разные контроли и заборы
//...
   Если Вопрос("Удалять насовсем?","Да+Нет")="Да" Тогда  
            Режим=1;
   Иначе      
        Режим=0;
   КонецЕсли;    
КонецПроцедуры
//********************************************************************

Не реагирует.
Как правильно сделать?
(Отдаю себе отчет, что в принципе НЕПРАВИЛЬНО таким образом физически удалять документ).
1 Ёпрст
 
гуру
18.10.11
19:43
(0)
:))))))))))))
2 zak555
 
18.10.11
19:43
???????????
3 Ёпрст
 
гуру
18.10.11
19:44
>>>Не реагирует.

а с какого перепугу вообще должен ?!
4 Ёпрст
 
гуру
18.10.11
19:45
Либо разрешаешь непосредственное удаление объектов, либо принудительно удаляешь объект через Удалить()
5 zak555
 
18.10.11
19:47
Удалить.Док(Режим);
6 Оболтус
 
18.10.11
19:53
А может ну его? Удаление это?
7 G-Re
 
18.10.11
20:00
(4,5) Согласен, но... Док.Удалить(1) естественно не проходит. А

дДок=СоздатьОбъект("Документ."+Док.Вид());
дДок.НайтиДокумент(Док);
дДок.Удалить(1);

тоже(объект конечно же заблокирован)

(6) Вот ты прав, так не хочется этого делать, а Клиент настаивает.
8 FN
 
18.10.11
20:07
Рисуй свою кнопку "Удалить насовсем" с кучей вопросиков "А вы уверены?", "А подумать?", "А сколько будет 2+2?" и тп
:)
9 Злопчинский
 
18.10.11
20:09
(7) не проходит где?
объект заблокирован кем?
10 Ёпрст
 
гуру
18.10.11
20:11
(7) :))

в пред определенной проце делай статусвозврата(0) + удаление через СоздатьОбъект и привет
11 andrewks
 
18.10.11
20:12
(8) лучше каптчу прикрутить
12 Злопчинский
 
18.10.11
20:13
(10) удаление через сО - прямо в предопределенной и прокатит..? ну ты шаман однако!
13 G-Re
 
18.10.11
20:38
(9) Я нахожусь в сфере действия ПредПроцедуры ПриУдаленииДокумента() со всемы вытекающими ограничениями.

(10) Не пройдет, я сначала должен уйти из этой процедуры, а потом уже сО.

(8,11) Ничего прикручивать нельзя,(в принципе можно Del перехватить, но нажатия кнопочки и выбор из меню???), нужно через стандартные действия. Конечно же, несколько раз прошу подтвержения.
14 Злопчинский
 
18.10.11
20:42
(13) ну запусти ОбработкуОжидания на исполнение процедуры удаления
15 G-Re
 
18.10.11
20:48
(14) Это идея, попробую, спасибо. Перехватить окончание этой процедуры(со статусом возврата(0), а можно и без него), а уж затем сО и прочее...
Глупец, лишенный способности посмеяться над собой вместе с другими, не сможет долго выносить программирование. Фредерик Брукс-младший