Здравствуйте!
Надо программно подставить пустые значения в проводки по 70 счету по документу, но чтоб они были типа справочника "физлица". Вот код, чето не так. Но что.
Набор = РегистрыБухгалтерии.Хозрасчетный.СоздатьНаборЗаписей();
Набор.Отбор.Регистратор.Установить(Док);
Набор.Прочитать();
Для Каждого Движение Из Набор Цикл
Если Строка(Движение.СчетДт) = "70" Тогда
Движение.СубконтоДт[1] = Справочники.ФизическиеЛица.ПустаяСсылка();
КонецЕсли;
Если Строка(Движение.СчетКт) = "70" Тогда
Движение.СубконтоКт[1] = Справочники.ФизическиеЛица.ПустаяСсылка();
КонецЕсли;
Набор = РегистрыБухгалтерии.Хозрасчетный.СоздатьНаборЗаписей();
Набор.Отбор.Регистратор.Установить(Док);
Набор.Прочитать();
Для Каждого Движение Из Набор Цикл
Если Строка(Движение.СчетДт) = "70" Тогда
Движение.СубконтоДт[ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.РаботникиОрганизации] = Справочники.ФизическиеЛица.ПустаяСсылка();
КонецЕсли;
Если Строка(Движение.СчетКт) = "70" Тогда
Движение.СубконтоКт[ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.РаботникиОрганизации] = Справочники.ФизическиеЛица.ПустаяСсылка();
КонецЕсли;
КонецЦикла;
Набор.Записать();
Сообщить("Успешно записано");
Основная теорема систематики: Новые системы плодят новые проблемы.