Имя: Пароль:
1C
1С v8
пойдет ли удаление документов?
,
0 LivingStar
 
05.07.12
12:00
&НаСервере
Процедура УдалениеДокументов()
       Док = Документы.ВводПоказанийСчетчиков.СоздатьДокумент();
       // удаление документов ->
       Запрос = Новый Запрос;
       Запрос.Текст = "
           |ВЫБРАТЬ
           |    ВводПоказанийСчетчиков.Ссылка,
           |    ВводПоказанийСчетчиков.Комментарий
           |ИЗ
           |    Документ.ВводПоказанийСчетчиков КАК ВводПоказанийСчетчиков
           |ГДЕ
           |    ВводПоказанийСчетчиков.Комментарий = &Комментарий";
       Запрос.УстановитьПараметр("Комментарий","[создан обработкой показаний абонентов]");    
       Рез = Запрос.Выполнить().Выбрать();
       Пока Рез.Следующий() Цикл
           Док.Удалить(Рез.Ссылка);
       КонецЦикла;
       // <-
КонецПроцедуры
1 Cube
 
05.07.12
12:01
(0) Не пойдет
2 DrShad
 
05.07.12
12:03
это что за бред такой?
3 DrShad
 
05.07.12
12:03
ДокументОбъект.<Имя документа> (DocumentObject.<Имя документа>)
Удалить (Delete)
Синтаксис:

Удалить()
Описание:

Удаляет документ из базы данных.
Важно! В отличие от метода УстановитьПометкуУдаления, данный метод производит непосредственное удаление документа без возможности восстановления и без проверки ссылочной целостности. Использовать данный метод нужно крайне осмотрительно.

Доступность:

Сервер, толстый клиент, внешнее соединение.
Пример:

ТекстВопроса = "Удалить документ без возможности восстановления";
Ответ = Вопрос(ТекстВопроса, РежимДиалогаВопрос.ДаНет);
Если Ответ = КодВозвратаДиалога.Да Тогда
   РасходнаяНакладная.Удалить();
КонецЕсли;
4 1C_OOLer
 
05.07.12
12:05
семерочник?

это даже не взлетит)
5 Жан Пердежон
 
05.07.12
12:07
7 лет, 4 мес.
жесть
6 DrShad
 
05.07.12
12:07
оно даже синтаксический контроль не должно пройти
7 Ненавижу 1С
 
гуру
05.07.12
12:15
(0) да, пойдет, на куй
8 mirosh
 
05.07.12
12:19
(0) Непонятно, что должен делать этот код. Но думаю, он этого не делает в любом случае.
9 Любопытная
 
05.07.12
12:25
Док = Документы.ВводПоказанийСчетчиков.СоздатьДокумент(); - вот это зачем?
10 Любопытная
 
05.07.12
12:27
Пока Рез.Следующий() Цикл
           Док.Удалить(Рез.Ссылка);
       КонецЦикла;

Пока Рез.следующий() Цикл
    Док = Рез.Ссылка.ПолучитьОбъект();
    Док.Удалить();
КонецЦикла;
11 Steel_Wheel
 
05.07.12
12:29
(0) А если пользователь документ откроет в режиме предприятия, когда ты удалять будешь?
12 LivingStar
 
05.07.12
13:16
(10) более похоже на правду да?
13 LivingStar
 
05.07.12
13:34
(10) спасибо!
14 Eugene_life
 
05.07.12
13:37
(13) Копию базы делай срочно!!
15 Serg_1960
 
05.07.12
13:39
(0) Удаление только что созданного и не записанного в базу документа "в цикле" - прикольный алгоритм :)
16 abitfrosty
 
05.07.12
13:39
(14) Поздно - между (12) и (13) 18 минут и "спасибо")
17 Serg_1960
 
05.07.12
13:41
Если автор воспользовался советом Любопытная - приготовьте попкорн:))
18 szhukov
 
05.07.12
13:43
Ждем следующую ветку, типа:
"Как восстановить удаленные документы без бэкапа"... сходить за попкорном что ли!? :)
19 Eugene_life
 
05.07.12
13:44
(18) Скорее уже "Неспешно ищу работу"
20 Любопытная
 
05.07.12
15:05
Ну и? ТС уже убит начальством или просто углубился в проблему по самые ушки?
21 PiVa123
 
05.07.12
15:18

       УдалитьОбъекты(Запрос.Выполнить().Выгрузить().ВыгрузитьКолонку("Ссылка"));
Ошибка? Это не ошибка, это системная функция.