Создание проводок.

Тема в разделе "1C и всё что с ней связано", создана пользователем Velliar, 10 июн 2009.

  1. Velliar

    Velliar Гость

    Доброго времени суток всем.
    Пытаюсь создать проводку программно.
    Док = Документы.ОперацияБух.СоздатьДокумент();
    Док.Дата = ТекущаяДата();
    Док.Организация = Организация;
    НовПроводка = Док.Движения.Хозрасчетный.Добавить();
    НовПроводка.Период = Док.Дата;
    НовПроводка.СчетДт = ПланыСчетов.Хозрасчетный.НайтиПоКоду("013");
    НовПроводка.СубконтоДт.Вставить(ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные
    ["Материалы"],спр.Затрата);
    Пишет поле материал не наденно.Если смотреть в режиме пользователя, то такое субконто как "материалы" есть, через конфигуратор его не видно.Может это из за того что это субконто было нами созданно.Если да, то как сделать так что бы его было видно через конфигуратор.
     
  2. KiR

    KiR НЕ шибка опытный програмер)
    1C Team

    Регистрация:
    11 сен 2007
    Сообщения:
    1.581
    Симпатии:
    0
    вообще-то по хорошему стоит в конфигураторе делать различные правки для плана счетов...
     
  3. Velliar

    Velliar Гость

    Это я уже понял.Но поздно.Что теперь можно сделать?Как записать субконто?
     
  4. KiR

    KiR НЕ шибка опытный програмер)
    1C Team

    Регистрация:
    11 сен 2007
    Сообщения:
    1.581
    Симпатии:
    0
    по идее нада сделать обработку которая все остатки с 13го счета с определенным субконто спишет на какой-нить другой счет. потом создать субконто по человекчески (в конфигураторе) и написать подправить обработку, которая уже с этого какого-нить другого счета остатки повесит куда нужно. процесс геморный и возможно с точки зрения ведения учета не совсем верный, но другой в голову пока не приходит
     
  5. unknown181538

    unknown181538 НеГуру
    1C Team

    Регистрация:
    28 дек 2008
    Сообщения:
    1.418
    Симпатии:
    0
    Док = Документы.ОперацияБух.СоздатьДокумент();
    Док.Дата = ТекущаяДата();
    НовПроводка = Док.Движения.Хозрасчетный.Добавить();
    НовПроводка.Период = Док.Дата;
    НовПроводка.СчетДт = ПланыСчетов.Хозрасчетный.НайтиПоКоду("013");
    НовПроводка.СубконтоДт.Вставить(ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные
    .НайтиПоНаименованию("Материалы"),Спр.Затрата);
     
  6. Velliar

    Velliar Гость

    Большое спасибо!!!!!!!Сработало.
     
Загрузка...

Поделиться этой страницей