Обход документов

// 1c7

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