После проведения документа,  в операциях не показывает субконто Кт и Дб, кроме первой! помогите пожалуйста!

Пока ПолучитьСтроку() = 1 Цикл
       Операция.НоваяПроводка();
       Операция.Дебет.Счет = Сотрудник.Подразделение.Получить(ДатаДок).СчетЗатрат;
       
       Спр.ВыбратьЭлементы();
       Пока Спр.ПолучитьЭлемент()=1 Цикл
           Если Спр.Текущийэлемент().Наименование = "Начислена зарплата" Тогда
               Операция.Дебет.ЭлементыЗатрат = Спр.ТекущийЭлемент();
           //    Иначе Операция.Дебет.ЭлементыЗатрат = Справочники.ЭлементыЗатрат;
           КонецЕсли;
       КонецЦикла;
       
       Операция.Кредит.Счет = Сотрудник.Подразделение.Получить(ДатаДок).СчетЗП;
       Операция.Кредит.Сотрудники = Сотрудник;
       Операция.Кредит.Подразделения = Сотрудник.Подразделение.Получить(ДатаДок);
       Операция.Сумма = Начислено;
       Операция.СодержаниеПроводки = "Начислено";
       Операция.НомерЖурнала = "ЗП";  
       
       Операция.НоваяПроводка();
       Операция.Кредит.Сотрудники = Сотрудник;
       Операция.Кредит.Подразделения = Сотрудник.Подразделение.Получить(ДатаДок);
       Операция.Дебет.Счет = СчетПоКоду(681.2);
       Операция.Кредит.Счет = СчетПоКоду(653.1);
       Операция.Сумма = ОПВ;
       Операция.СодержаниеПроводки = "ОПВ";
       Операция.НомерЖурнала = "ЗП";
       
       Операция.НоваяПроводка();
       Операция.Кредит.Сотрудники = Сотрудник;
       Операция.Кредит.Подразделения = Сотрудник.Подразделение.Получить(ДатаДок);
       Операция.Дебет.Счет = СчетПоКоду(681.2);
       Операция.Кредит.Счет = СчетПоКоду(862);
       Операция.Сумма = СуммаШтрафа;
       Операция.СодержаниеПроводки = "СуммаШтрафа";
       Операция.НомерЖурнала = "ЗП";
   КонецЦикла;

Операция.Записать()

Ыщъ
нееет!
вот это нужно сделать
Операция.НоваяПроводка();
       Операция.Кредит.Сотрудники = Сотрудник;
       Операция.Кредит.Подразделения = Сотрудник.Подразделение.Получить(ДатаДок);
       Операция.Дебет.Счет = СчетПоКоду(681.2);
       Операция.Кредит.Счет = СчетПоКоду(653.1);
       Операция.Сумма = ОПВ;
       Операция.СодержаниеПроводки = "ОПВ";
       Операция.НомерЖурнала = "ЗП";

так может сначал следует присвоить счета, а уж потОм субконто?

miki
сделал после но
Ссылается на 653,1 счет!
{Документ._09_НачислениеЗПОфисАУП.Модуль Документа(30)}: Для счета 653.1 вид субконто Сотрудники неопределен!

(4) чего-ж ты хочешь тогда??

Я хочу что б в операциях выводила сотрудников и подразделение, а не <...>

(6) может книжки почитать?

(6)

как оно у тебя может выводить
если "Для счета 653.1 вид субконто Сотрудники неопределен!"

?

:(

Какие субконто на 653.1?

добавь в конфигураторе для счета 653,1 - новое субконто (смотри по счету)Сотрудники  - со ссылкой на спр Сотрудники.
Потом твой код заработает.

Только там еще
Операция.Записать()

(11) Это даже не гланды через попу. Это круче.

lamme спасибо большое за помощь! сделал...