Парни такая проблемка:Хочу удалить документы из базы непосредственно по организации, написал такое:

   //выбираем документы по орагнизации
   Выборка=Документы.ПлатежноеПоручениеИсходящее.Выбрать() ;
   Пока Выборка.следующий() Цикл
       Если Выборка.Организация=ПолеВВода1 Тогда//находим документ по реквизиту Организация
           //проверяем проведен ли документ и если да помечаем на удаление, это удалит все движения по документу и удаляем его
           Если Выборка.Проведен тогда
           Док=Выборка.ПолучитьОбъект();
           Док.УстановитьПометкуУдаления(Истина);
           Док.Удалить();
           КонецЕсли;
           //Заканчиваем с пометкой удаления и собственно самим удалением
           //Сообщаем какой документ удален
                       
           Сообщить ("Удален Документ " +Выборка.Ссылка);
       
       КонецЕсли;
   КонецЦикла;

Но здесь только по одному документу. Как перебрать все документы в базе?

Для Каждого Док Из Метаданные["Документы"] Цикл
  Имя = Док.Имя;
  Выборка = Документы[Имя].Выбрать();
  бла-бла-бла

КонецЦикла;

ну как-то так, за точность не ручаюсь

Выборка.Организация=ПолеВВода1 - как это?

а непроведённые удалять не будем?

(0) Бугага, как думаешь что вернет в твоем случае Выборка.Ссылка в Сообщить?))

(2)-Реквизит на форме обработки Тип-Мправочник.Организации. Мдя, щас непроведенные доделаю...
(4)-блин, ага, ступил признаю...в цикл воткну поряньше удаления:)

(5) ЭлементыФормы.ПолеВвода1.Значение

вот исправил

   Для каждого Документ из Метаданные ["Документы"] Цикл
   Док=Документ.Имя;    
       //выбираем документы по орагнизации
   Выборка=Документы[Док].Выбрать() ;
   Пока Выборка.следующий() Цикл
       Если Выборка.Организация=ПолеВВода1 Тогда//находим документ по реквизиту Организация
           Док=Выборка.ПолучитьОбъект();
           Док.УстановитьПометкуУдаления(Истина);
           Док.Удалить();
           
           //Заканчиваем с пометкой удаления и собственно самим удалением
   
       КонецЕсли;
       КонецЦикла;
   КонецЦикла;


(6)-пучему так? там тип то стооит ссылка везде, у меня и так нормально выбирает

ап, нормально?

а что скажет Выборка.Организация, если реквизита Организация у документа не будет?

и не лучше ли обработкой пометить, а удаление помеченных стандартно сделать потом?

(9)я так думаю, что этого не будет, ну проверку поставлю на наличие реквизита. Так то код нормальный?

(11) да как-то юзать выборку вместо запроса некошерно. впрочем, если это разовая обработка, какая разница, нормальный код или нет. отработает себе и ладно ;)

да, это разовая обработка

а ещё есть групповая обработка документов, там вообще писать не надо

да, есть но там не по организации выборка идет а в общем и ставится только пометка на удаление

(15) да ну? отбирать по многим реквизитам можно. напрямую не удаляет, да, но, может, оно и не надо?

надо, нам блин базу дали работать а там орагниизаций, котоорые с ней раньше работали куча, только без них объектов, помеченных на удаление больше 300 000

а как поставить проверку на наличие этого реквизита в документе? например Документ Корректировка записей регистров этого реквизита не имеет

Имхо, базе абзац.

цитирую ОбщегоНазначения.ЕстьРеквизитДокумента():
Если МетаданныеДокумента.Реквизиты.Найти(ИмяРеквизита) = Неопределено Тогда

(18) Документ.Реквизиты.Найти("Организация")

А не проще ле взять готовую обработку. Ведь там кроме документов есть куча справочников (например договора), куча Регистр Сведений?

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

вот что получилось

после Выборка=Документы[Док].Выбрать() надо Следующий() делать

сделал...Значение не является значением объектного типа ПолучитьОбъект()

(25) плохо сделал

пздц, из копеечной задачи запутали автора в трех соснах...

(27) можешь подсказать как надо? в чем ошибка?

Для каждого Документ из Метаданные ["Документы"] Цикл
ИМЯДок=Документ.Имя;
//выбираем документы по орагнизации
Выборка=Документы[ИМЯДок].Выбрать() ;
Если Документ.Реквизиты.Найти("Организация" <> Неопределено тогда
Пока Выборка.следующий() Цикл
Если Выборка.Организация=ПолеВВода1 Тогда//находим документ по реквизиту Организация
Док=Выборка.ПолучитьОбъект();
Док.УстановитьПометкуУдаления(Истина);
Док.Удалить();
КонецЕсли;
КонецЦикла;
КонецЕсли;
КонецЦикла;



вот так сделал..вроде нормально..прогоняется

резервную копию сделал хоть?

Для каждого Документ из Метаданные ["Документы"] Цикл
  ИМЯДок=Документ.Имя;
  //выбираем документы по орагнизации

  Выборка=Документы[ИМЯДок].Выбрать() ;
  Пока Выборка.следующий() Цикл
      Попытка
         Орг = Выборка.Организация;
      Исключение
         Прервать;
      КонецПопытки;
      Если Выборка.Организация=ПолеВВода1 Тогда

          Док=Выборка.ПолучитьОбъект();
          Док.УстановитьПометкуУдаления(Истина);
          Док.Удалить();
       КонецЕсли;
  КонецЦикла;
КонецЦикла;

(31) Писец
Ты бы еще вместо проверки на 0 перед делением, само деление в попытку заключал

(31)
код в (29) на порядок грамотней, чем твой