Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
16 сен 2021, 19:06

Изменить программно счет в журнале проводок.

Автор 3030, 02 июл 2014, 16:42

0 Пользователей и 1 гость просматривают эту тему.

3030

Добрый день! В общем, такой вопрос: необходимо в журнале проводок изменить счет кт (с 19.08.02 на 19.08.02.01). Проблема в том, что у имеющегося счета 3 субконто, а у нового счета – 2 субконто. Менять в плане счетов нельзя.
Я пытался присвоить значение неопределенно этому третьему субконто, все равно выдает ошибку. Есть ли способ как-либо сделать это?

Наудаление = РегистрыБухгалтерии.Хозрасчетный.СоздатьНаборЗаписей();
  Наудаление.Отбор.Регистратор.Установить(Изделие);
  Наудаление.Прочитать();


Для Каждого Запись из Наудаление Цикл
Запись.СубконтоКт.Очистить();
                //присвоили этому третьему субконто значение не "справочникссылка", а "неопределено"
Запись.СубконтоКт.гаВидыНДС = Неопределено;
                //записываем субконто 1 и субконто 2
Контрагент = Справочники.Контрагенты.НайтиПоКоду("299      ");
Запись.СубконтоКт.СФПолученные = Документ;
Запись.СубконтоКт.Контрагенты = Контрагент;
                //пишем счет
       Счет = ПланыСчетов.Хозрасчетный.НайтиПоРеквизиту("КодБыстрогоВыбора", "1908021");
Запись.СчетКт = Счет;
        Наудаление.Записать();
КонецЦикла;

На картинках = ошибка, которая выдается, и те два счета с субконто.

3030

Решил проблему.
Надо оставить только
Запись.СубконтоКт.Очистить();
а вот эта строчка - не нужна:
Запись.СубконтоКт.гаВидыНДС = Неопределено;

LordWizard

Что-то как-то круто - судя по логике вещей 19.08.02 должна быть группой для 19.08.02.01, т.е у вас в проводках фигурирует группа?? :xfbnsdfb:
Правильно ведите учет или пишите программы и вам воздастся!...

(Кстати - кнопочку Сказать Спасибо - никто не отменял)

Теги:

Похожие темы (5)

Рейтинг@Mail.ru Rambler's Top100

Поиск