Журнал учета полученных и выставленных счетов-фактур по постановлению 1137 от 26.12.2011

Журнал учета полученных и выставленных счетов-фактур по постановлению 1137 от 26.12.2011  для конфигурации Бухгалтерия 1.6 (платформа 8.1). Макет взят из Бухгалтерии 2.0

Журнал учета полученных и выставленных счетов-фактур по постановлению 1137 от 26.12.2011  для конфигурации Бухгалтерия 1.6 (платформа 8.1). Макет взят из Бухгалтерии 2.0. Является внешним отчетом.

11 Comments

  1. Оля_

    tain, Документы «Корректировка поступления» и «Корректировка реализации» для Бухгалтерии 1.6 не делали?

    Reply
  2. tain

    Нет, необходимости не было

    Reply
  3. M-Mark-76

    В целом неплохо, однако были проблемы с рядом документов и ТЧ которые в данном отчете не учитывались, и итоге пришлось секцию

    // Если Документ.ДокументОснование.УчитыватьНДС тогда

    // СуммаНДС=Документ.ДокументОснование.Товары.Итог(«СуммаНДС») + Документ.ДокументОснование.Услуги.Итог(«СуммаНДС»);

    // Секция.Параметры.СуммаНДС=?(СуммаНДС>0,Формат(СуммаНДС, «ЧЦ=19; ЧДЦ=2″),»-«);

    // КонецЕсли;

    Заменить на :

    СписокТЧ = Новый СписокЗначений;

    СписокТЧ.Добавить(«Товары»);

    СписокТЧ.Добавить(«Услуги»);

    СписокТЧ.Добавить(«Прочее»);

    МетаданныеДокумента = Документ.ДокументОснование.Метаданные();

    СуммаНДС = 0;

    Для каждого ИмяТЧ ИЗ МетаданныеДокумента.ТабличныеЧасти Цикл

    Если НЕ СписокТЧ.НайтиПоЗначению(ИмяТЧ.Имя) = Неопределено Тогда

    ТабЧасть = МетаданныеДокумента.ТабличныеЧасти.Найти(ИмяТЧ.Имя);

    СуммаНДС = СуммаНДС + Документ.ДокументОснование[ТабЧасть.Имя].Итог(«СуммаНДС»);

    КонецЕсли;

    КонецЦикла;

    Секция.Параметры.СуммаНДС=?(СуммаНДС>0,Формат(СуммаНДС, «ЧЦ=19; ЧДЦ=2″),»-«);

    возможно не 100% правильно, но по ошибкам не сыпется

    Reply
  4. Death_eye

    Спасибо, оказалась полезна

    Reply
  5. Para_1987

    по поводу корректировка реализации/поступления, я делал еще с ранних версий 2.0, когда появились документы Корр.СФ выданный и полученный. и из них уже бух печатал форму корр.счета фактуры. Когда окончательно утвердилось 1137, то 1С убрали эти документы и весь функционал перешел на почти аналогичные доки по корр.поступлению/реализации. ИМХО, почти тоже самое. У меня мои до сих пор пользуются документами, которые реализовал еще из ранних версий 2.0, корр.сф полученный и выданный. Только пришлось добавить коды способов выставления все…

    Reply
  6. Оля_

    (5) Para_1987,

    я делал еще с ранних версий 2.0, когда появились документы Корр.СФ выданный и полученный.

    Я правильно понимаю, что корретировочные счета-фактуры можно перенести из 2.0 в 1.6, в книги учёта счетов-фактур они попадут? И если можно уточните ранние версии 2.0 это какие релизы?

    Reply
  7. Гость

    Еще выскакивает ошибка на

    СуммаНДС=Документ.СчетФактура.ДокументОснование.Товары.Итог(«СуммаНДС») + Документ.СчетФактура.ДокументОснование.Услуги.Итог(«СуммаНДС»);

    Подскажите пожалуйста, как исправить?

    Reply
  8. Гость
    Еще выскакивает ошибка на

    СуммаНДС=Документ.СчетФактура.ДокументОснование.Товары.Итог(«СуммаНДС») + Документ.СчетФактура.ДокументОснование.Услуги.Итог(«СуммаНДС»);

    Подскажите пожалуйста, как исправить?

    Все понятно. Вопрос снят.

    Reply
  9. YalanchidiO

    Выскакивает ошибка

    {ОбщийМодуль.ОбщегоНазначения(4693)}: Поле объекта не обнаружено (новнаяОрганизация)

    ЗначениеИзПараметраСеанса = ПараметрыСеанса[Сред(ИмяПараметра, 3)];

    Как исправить?

    Reply
  10. _n26__

    Спасибо, очень нужно

    Reply
  11. asimusii

    Здравствуйте

    Если эту форму запускать у меня от ноября то выходит ошибка:

    {ВнешнийОтчет.ЖурналУчетаСчетовФактур(710)}: Поле объекта не обнаружено (Товары)

    СуммаНДС=Документ.ДокументОснование.Товары.Итог(«СуммаНДС») + Документ.ДокументОснование.Услуги.Итог(«СуммаНДС»);

    а если за август то выходит ошибка:

    {ВнешнийОтчет.ЖурналУчетаСчетовФактур(245)}: Поле объекта не обнаружено (Услуги)

    СуммаНДС=Документ.СчетФактура.ДокументОснование.Товары.Итог(«СуммаНДС») + Документ.СчетФактура.ДокументОснование.Услуги.Итог(«СуммаНДС»);

    Подскажите пожалуйста, как исправить?

    Reply

Leave a Comment

Ваш адрес email не будет опубликован. Обязательные поля помечены *