[peace-yes]

Начну с самого начала:
Пытались перенести данные из 1С 7,7 в 8,2 и при переносе наплодилось много контрагентов без заполненого ЕГРПОУ
и теперь нельзя ставить пометку на удаление потому что выдает ошибку "Невозможно записать, не заполнен ЕГРПОУ"
соответственно груповое удаление не могу сделать, а контрагентов то ООЧЕНЬ много
значит нужно всем заполнить ЕГРПОУ

Облазил инет не нашел решения проблемы, решил делать обработку
(я пока учусь, строго не судите)
вылазит ошибка
{Обработка.Заполн_егрпоу.Форма.Форма.Форма(9)}: Итератор для значения не определенДля Каждого КодПоЕДРПОУ ИЗ док Цикл

Вот код обработки:

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

Для Каждого КодПоЕДРПОУ ИЗ док Цикл      
Если             
док.КодПоЕДРПОУ = 0       
Тогда              
док.КодПоЕДРПОУ = "123456789";                        
док.Записать(РежимЗаписиДокумента.Проведение); 
Сообщить ("Записал");  
КонецЕсли;
КонецЦикла;;
КонецЦикла;;
КонецПроцедуры

Помогите пожалуйста!

[sava1]

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

//Для Каждого КодПоЕДРПОУ ИЗ док Цикл      
Если            
док.КодПоЕДРПОУ = 0      
Тогда              
док.КодПоЕДРПОУ = "123456789";                        
док.Записать();
Сообщить ("Записал");  
КонецЕсли;
КонецЦикла;;
//КонецЦикла;;
КонецПроцедуры

[Домовик]

Автор, я точной кострукции не подскажу в восьмой версии. Но лучше поискать готовое решение в типовых обработках вашей конфигурации. Должно быть что-то вроде обработок проведения документов скопом или подобное. Там можно посмотреть код по обходу документов в цикле.
второй вариант - приглашать программиста 1С.
да, сейчас гугл в помощь. все кому не лень расчитывают траектории падения самолетов, пишут коды на 1С, ставят себе диагнозы, достают исторические и юридические справки, и тп, но , наверное, кроме количества информации нужно еще время для ее систематизации в голове, практических тренировок, и только потом...

Сообщение отредактировал Домовик - 29.06.15, 18:23

[Vofka]

Выборка = Справочники.Контрагенты.Выбрать();
Пока Выборка.Следующий() Цикл
   Если ЗначениеЗаполнено(Выборка.КодПоЕДРПОУ) Тогда
      Продолжить;
   КонецЕсли;
   Объект = Выборка.Ссылка.ПолучитьОбъект();
   Объект.КодПоЕДРПОУ = "123456789";
   Объект.Записать();
   Сообщить("Записан конрагент "+Выборка.Код);
КонецЦикла;

Сообщение отредактировал Vofka - 30.06.15, 8:19