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