Помогите создать бухгалтерскую операцию через com соединение
ДокументЗакрытия = мСоединение.Документы.ОперацияБух.СоздатьДокумент();
...
ДокументЗакрытия.Записать(мСоединение.РежимЗаписиДокумента.Запись);
НаборЗаписейДокЗ = мСоединение.РегистрыБухгалтерии.Хозрасчетный.СоздатьНаборЗаписей();
НаборЗаписейДокЗ.Отбор.Регистратор.Установить(ДокументЗакрытия.Ссылка);
НаборЗаписейДокЗ.Прочитать();
НоваяЗапись = НаборЗаписейДокЗ.Добавить();
НоваяЗапись.Период = ДокументЗакрытияПИ.Дата;
НоваяЗапись.Регистратор = ДокументЗакрытия.Ссылка;
НоваяЗапись.Активность = Ложь;
НоваяЗапись.СчетДт = мСоединение.ПланыСчетов.Хозрасчетный.ПрочиеРасходы;
НоваяЗапись.СубконтоДт.Вставить(НоваяЗапись.СчетДт.ВидыСубконто.Получить(
0).ВидСубконто,мСоединение.Справочники.ПрочиеДоходыИРасходы.НайтиПоНаименованию("Доход (расходы)..");
НоваяЗапись.СчетКт = мСоединение.ПланыСчетов.Хозрасчетный.НайтиПоКоду("76.02");
НоваяЗапись.ПодразделениеКт = Выборка.ПодразделениеСсылка;
НоваяЗапись.СубконтоКт.Вставить(НоваяЗапись.СчетКт.ВидыСубконто.Получить(
0).ВидСубконто,ВыборкаПереноса.Контрагент);
НоваяЗапись.СубконтоКт.Вставить(НоваяЗапись.СчетКт.ВидыСубконто.Получить(
1).ВидСубконто,ВыборкаПереноса.Договор);
НоваяЗапись.Сумма = Выборка.ОД;
НаборЗаписейДокЗ.Записать();
Ошибка при выполнении обработчика - 'ПередЗаписью'
Попытка передачи с клиента на сервер мутабельного значения 1-го параметра метода ПроверкаНаДоступностьСчетаПередЗаписьюДвиженийХПС ().