Имя: Пароль:
1C
1С v8
Есть ли такая обработка
,
0 Быдло замкадное
 
13.12.11
10:00
Типа консоли запросов но с кнопкой "Удалить" )
Нужно выбирать движения регистров и удалять их...
1 ДенисЧ
 
13.12.11
10:00
напиши - будет...
2 Stim213
 
13.12.11
10:01
за такую обработку надо отрывать руки
3 Креатив
 
13.12.11
10:03
(0)+ до кучи не забудь кнопку "Удалить ВСЁ"
4 Быдло замкадное
 
13.12.11
10:03
(1)+(2) и я без рук
5 ДенисЧ
 
13.12.11
10:03
(4) напиши клювом.
6 Быдло замкадное
 
13.12.11
10:03
блин так лениво писать(
7 DSatan
 
13.12.11
10:13
ищи консоль с обработчиком, но советую помолиться перед использованием :)
8 DrShad
 
13.12.11
10:21
(7) +1
только сразу же сатане
9 DSatan
 
13.12.11
10:25
(0)кстати, просьба в будущем называть ветки более осмысленно
10 DSatan
 
13.12.11
10:26
(8) я что - такой страшный? :)
11 Azverin
 
13.12.11
10:29
видел такую в пятницу
12 DrShad
 
13.12.11
10:35
(10) а ты это он!?
13 Быдло замкадное
 
13.12.11
10:53
Мне нужно движения по организации удалить.

Что если удалить Организацию насильно, а потом ТИИ запустить ?!)) Чтоб оно движения удалило
14 Быдло замкадное
 
13.12.11
10:55
пффф на недружественном ресурсе куча обработок таких.. вопрос снят
15 Быдло замкадное
 
13.12.11
10:57
ан нет( там регистры накопления не чистятся(
16 Kraft
 
13.12.11
10:58
внатуре - быдло
17 Быдло замкадное
 
13.12.11
10:58
(17) про себя ? иди снег чисти
18 Kraft
 
13.12.11
11:00
(17) бггг
19 Быдло замкадное
 
13.12.11
11:31
все, удалил к чертям..

может кому понадобится потом:

Процедура КнопкаВыполнитьНажатие(Кнопка)
   Запрос = Новый Запрос;
   Запрос.Текст = "ВЫБРАТЬ
   |    КорректировкаЗаписейРегистров.Ссылка
   |ИЗ
   |    Документ.КорректировкаЗаписейРегистров КАК КорректировкаЗаписейРегистров";
   Выгрузка = Запрос.Выполнить().Выгрузить();
   Для Каждого Док Из Выгрузка Цикл
       ДвиженияДока = Док.Ссылка.ПолучитьОбъект().Движения;
       Для Каждого НаборДвижений Из ДвиженияДока Цикл
           НаборДвижений.Прочитать();
           ТЗ = НаборДвижений.Выгрузить();
           Если ТЗ.Колонки.Найти("Организация") <> Неопределено Тогда
               КолВо = ТЗ.Количество()-1;
               Пока КолВо > -1 Цикл
                   Если ТЗ[КолВо].Организация = Организация Тогда
                       ТЗ.Удалить(КолВо);    
                   КонецЕсли;
                   КолВо = КолВо - 1;    
               КонецЦикла;
           КонецЕсли;
           НаборДвижений.Загрузить(ТЗ);
           НаборДвижений.Записать();
       КонецЦикла;
   КонецЦикла;
КонецПроцедуры