НаборЗаписей = РегистрыСведений.ПервоначальныеСведенияОС.СоздатьНаборЗаписей();     
    НаборЗаписей.Отбор.Регистратор.Установить(Документ.Ссылка);     
    НаборЗаписей.Прочитать();
    
    
    Для Каждого Запись Из НаборЗаписей Цикл
        
        А=0;
    КонецЦикла;    
    
    НаборЗаписей.Записать();

По отладчику записей нет...

Причина - выбран был не тот регистр, поэтому и записей не было...