Код для заполнения аналитики у счета 68.01 (конифгурация ЗУП 2.5)

[forumlarin]

Помогите разобраться , в документе отражение зарплаты в регл учете формируется проводка Дт 76.05 Кр 68.01 , на счете 68.01 подразделение не проставляется, ниже привожу код, который бы якобы должен проставлять подразделение , но отрабатывается, подскажите где допущена ошибка



---------------Дб 76.05 Кр 68.01
Процедура КнопкаВыполнитьНажатие(Кнопка)
Док = ВыбДок.ПолучитьОбъект();

Для Каждого Строка Из Док.ОтражениеВУчете Цикл
Если Строка.СчетДт.Код = "76.5" и Строка.СчетКт.Код = "68.01" Тогда
ФизЛицо = Строка.СубконтоДт1.Ссылка;
Сотрудник = Справочники.СотрудникиОрганизаций.НайтиПоРеквизиту("Физлицо" ,ФизЛицо);
Подразделение = Сотрудник.ТекущееПодразделениеОрганизации.Ссылка;
Строка.ПодразделениеКт = Подразделение;
КонецЕсли;
КонецЦикла;
Док.Записать();

КонецПроцедуры
------------------------------

[1Cnastroika]

Посмотрите в отладчике значения переменных при выполнении программы.

[oltie]

ваш код работоспособный. подразделение подставляется. однако, есть два замечания. я бы подразделение искала бы через запрос
Строка.ПодразделениеКт = ПолучитьПодразделение(Строка.СубконтоДт1.Ссылка);

Запрос.Текст =    "ВЫБРАТЬ
                   |   СотрудникиОрганизаций.ТекущееПодразделениеОрганизации.Ссылка
                   |ИЗ
                   |   Справочник.СотрудникиОрганизаций КАК СотрудникиОрганизаций
                   |ГДЕ
                   |   СотрудникиОрганизаций.Физлицо = &ФизЛицо"   ;
   Запрос.Параметры.Вставить("ФизЛицо", Физлицо);

а во-вторых, если у вас в БП стоит галочка "учет ведется во внешней программе", то у вас просто нет данных для заполнения, т.е. подразделения не проставлены будут, т.к. кадровые документы в ЗУПе, соответственно и подразделение будет возвращаться как пустая ссылка, которую он и подставит