Расчет налога на добавленную стоимость (НДС) — одна из самых востребованных задач при автоматизации бухгалтерского учета в 1С:Предприятие. Даже если типовые конфигурации (1С:Бухгалтерия 3.0, 1С:ERP, 1С:УТ 11) уже содержат встроенные механизмы для работы с НДС, программистам и аналитикам часто требуется кастомизировать логику под специфические бизнес-процессы: от корректировки ставок до интеграции с внешними системами.

В этой статье разберем, как программно посчитать сумму НДС в 1С 8.3/8.2 с учетом разных сценариев: от простых вычислений в документах до сложных алгоритмов для отчетов. Особое внимание уделим нуансам округления, работе с разными ставками (20%, 10%, 0%, без НДС) и оптимизации кода для крупных массивов данных.

Если вы только начинаете осваивать встроенный язык 1С, не переживайте — мы начнем с базовых примеров и постепенно перейдем к продвинутым техникам. Для опытных разработчиков приготовили неочевидные лайфхаки, которые экономят время при работе с НДС в больших базах.

Базовые формулы расчета НДС в 1С

Прежде чем писать код, важно понимать математическую основу расчета НДС. В 1С используются три ключевые формулы, зависящие от того, что известно:

1. Расчет НДС от суммы без налога (начисление): 

СуммаНДС = СуммаБезНДС * (СтавкаНДС / 100)
Пример: Для суммы 10 000 ₽ и ставки 20% НДС составит 10000 * 0.20 = 2000 ₽.

2. Выделение НДС из суммы с налогом (обратный расчет): 

СуммаНДС = (СуммаСНДС * СтавкаНДС) / (100 + СтавкаНДС)
Пример: Из 12 000 ₽ (включая 20% НДС) налог равен (12000 * 20) / 120 = 2000 ₽.

3. Расчет суммы без НДС: 

СуммаБезНДС = СуммаСНДС / (1 + СтавкаНДС / 100)
Пример: Для 12 000 ₽ (с 20% НДС) сумма без налога: 12000 / 1.20 = 10000 ₽.

В 1С эти формулы реализованы через встроенные функции, но их знание поможет избежать ошибок при ручной правке кода.

📊 Какую ставку НДС вы чаще всего используете в работе?
20%
10%
0%
Без НДС
Другую

Встроенные функции 1С для работы с НДС

Платформа 1С:Предприятие предоставляет готовые методы для расчета НДС, которые учитывают округление до копеек и особенности российского законодательства. Основные функции:

  • 🔹 НДСВыделить(Сумма, Ставка) — выделяет НДС из суммы с налогом.
  • 🔹 НДСНачислить(Сумма, Ставка) — рассчитывает НДС от суммы без налога.
  • 🔹 НДСВключен(Сумма, Ставка) — проверяет, включен ли НДС в сумму.
  • 🔹 Окр(Значение, Точность) — округление (важно для НДС, где требуется точность до копеек).

Пример использования в коде: 

СуммаСНДС = 12000;

СтавкаНДС = 20;



// Выделяем НДС из суммы


СуммаНДС = НДСВыделить(СуммаСНДС, СтавкаНДС);


// Результат: 2000



// Начисляем НДС на сумму без налога


СуммаБезНДС = 10000;


СуммаНДС = НДСНачислить(СуммаБезНДС, СтавкаНДС);


// Результат: 2000

Важно: функции НДСВыделить и НДСНачислить автоматически округляют результат до копеек по правилам бухгалтерского учета (метод "банковского округления"). Это избавляет от ручной обработки погрешностей, которые часто возникают при работе с плавающими числами.

💡

Если вам нужно получить НДС без округления (например, для аналитических отчетов), используйте ручные формулы из первого раздела статьи.

Обратите внимание, что ставка НДС передается в функции как число (20, 10, 0), а не как процентный объект. Это упрощает интеграцию с внешними системами, где ставки могут храниться в разных форматах.

Расчет НДС в документах 1С: примеры кода

Наиболее частый сценарий — программный расчет НДС при проведении документов (Реализация товаров и услуг, Поступление, Счет-фактура). Рассмотрим типичные задачи:

1. Расчет НДС для строки табличной части

Допустим, у вас есть документ РеализацияТоваровУслуг, и нужно посчитать НДС для каждой строки табличной части Товары: 

Процедура РассчитатьНДС(СтрокаТабличнойЧасти)

Если НЕ ЗначениеЗаполнено(СтрокаТабличнойЧасти.СтавкаНДС) Тогда


Возврат;


КонецЕсли;



СуммаБезНДС = СтрокаТабличнойЧасти.Сумма;


СтавкаНДС = СтрокаТабличнойЧасти.СтавкаНДС;



СтрокаТабличнойЧасти.СуммаНДС = НДСНачислить(СуммаБезНДС, СтавкаНДС);


СтрокаТабличнойЧасти.СуммаСНДС = СуммаБезНДС + СтрокаТабличнойЧасти.СуммаНДС;


КонецПроцедуры

Этот код можно вызвать в обработчике события ПриИзменении для полей Сумма или СтавкаНДС, либо в процедуре ОбработкаПроведения.

2. Перерасчет НДС для всего документа

Если ставка НДС изменилась глобально (например, с 18% на 20%), может потребоваться массовый перерасчет: 

Процедура ПересчитатьНДСВоВсехСтроках()

Для Каждого Строка Из Товары Цикл


РассчитатьНДС(Строка);


КонецЦикла;



// Обновляем итоги документа


РассчитатьИтоги();


КонецПроцедуры

Сверьте ставки НДС с классификатором (справочник "Ставки НДС")|

Убедитесь, что суммы округляются до копеек|

Проверьте логику расчета для строк с ставкой 0%|

Тестируйте на документах с большим количеством строк (1000+)

-->

Для документов с раздельным учетом НДС (например, при экспорте и внутренних продажах) логика усложняется. В этом случае может потребоваться:

  • 🔹 Разбивка сумм по ставкам (20%, 10%, 0%).
  • 🔹 Формирование отдельных записей в книге продаж/покупок.
  • 🔹 Учет особых случаев (например, НДС с авансов).
Что будет если не округлять НДС до копеек?

При накоплении погрешностей округления (например, в документах с тысячами строк) итоговая сумма НДС может отличаться от правильной на несколько рублей. Это приводит к расхождениям в декларациях и претензиям от налоговой. Встроенные функции 1С (НДСНачислить, НДСВыделить) уже учитывают округление, но при ручных расчетах его нужно реализовывать самостоятельно.

Работа с разными ставками НДС

В 1С ставки НДС хранятся в справочнике СтавкиНДС, где каждая запись имеет уникальный идентификатор и процентное значение. Чтобы избежать ошибок при программном расчете, следует:

1. Получать ставку из справочника, а не жестко прописывать в коде: 

СтавкаНДС = Справочники.СтавкиНДС.НайтиПоНаименованию("20%");

Если СтавкаНДС = Неопределено Тогда


Сообщить("Ставка НДС 20% не найдена!");


Возврат;


КонецЕсли;

2. Учитывать специальные ставки:

Ставка Описание Пример использования
20% Основная ставка (с 2019 года) Большинство товаров и услуг
10% Льготная ставка Продукты питания, детские товары
0% Экспортные операции Товары, вывезенные за пределы ЕАЭС
Без НДС Освобождение от налога Услуги по аренде муниципального имущества

3. Обрабатывать случаи, когда ставка не указана: 

Если НЕ ЗначениеЗаполнено(СтавкаНДС) Тогда

// По умолчанию используем 20%, но лучше вывести предупреждение


СтавкаНДС = 20;


ЗаписатьЛог(НСтр("ru = 'Не указана ставка НДС в строке: %1'"), Строка.Номенклатура);


КонецЕсли;

Для документов с несколькими ставками (например, в одном счете-фактуре есть товары с 20% и 10%) придется группировать строки по ставкам и рассчитывать НДС отдельно для каждой группы. Это актуально для формирования книги продаж и декларации по НДС.

💡

Всегда проверяйте актуальность ставок НДС в справочнике! Законодательство может меняться (например, переход с 18% на 20% в 2019 году), и жестко прописанные значения в коде приведут к ошибкам.

Оптимизация расчетов НДС для больших баз данных

В крупных компаниях документы могут содержать тысячи строк, и неоптимизированный код расчета НДС будет тормозить систему. Чтобы ускорить работу:

1. Используйте массовые операции вместо построчного перебора: 

Запрос = Новый Запрос;

Запрос.Текст =


"ВЫБРАТЬ


|   Товары.Ссылка КАК Ссылка,


|   НДСНачислить(Товары.Сумма, Товары.СтавкаНДС) КАК СуммаНДС


|ИЗ


|   Документ.РеализацияТоваровУслуг.Товары КАК Товары


|ГДЕ


|   Товары.Ссылка = &СсылкаНаДокумент";



Запрос.УстановитьПараметр("СсылкаНаДокумент", ДокументОбъект.Ссылка);


Результат = Запрос.Выполнить();

2. Кэшируйте часто используемые ставки НДС: 

СтавкиКэш = Новый Соответствие;

Если НЕ СтавкиКэш.СодержитКлюч(СтавкаНДС.УникальныйИдентификатор) Тогда


СтавкиКэш.Вставить(СтавкаНДС.УникальныйИдентификатор, СтавкаНДС.Процент);


КонецЕсли;

3. Отключайте временно проверки и события: 

НачалоТранзакции();

Попытка


// Отключаем проверку заполнения и события для ускорения


ДокументОбъект.Проведение.ОтключитьПроверкуЗаполнения(Истина);


ДокументОбъект.Проведение.ОтключитьОбработчикиСобытий(Истина);



// Массовый перерасчет НДС


ПересчитатьНДСВоВсехСтроках();



ЗафиксироватьТранзакцию();


Исключение


ОтменитьТранзакцию();


Сообщить(ОписаниеОшибки());


КонецПопытки;

Для распределенных информационных баз (РИБ) или клиент-серверного варианта 1С рекомендуется выносить тяжелые расчеты НДС на сервер, используя фоновые задания.

💡

Если вам нужно пересчитать НДС в тысячах документов, используйте регламентные задания или обработки с прогресс-баром, чтобы не блокировать работу пользователей.

Типичные ошибки при программном расчете НДС

Даже опытные разработчики 1С иногда допускают ошибки, которые приводят к некорректным декларациям или расхождениям в учете. Рассмотрим самые распространенные:

  • ❌ Игнорирование округления: Использование формул без Окр() или встроенных функций НДСНачислить/НДСВыделить приводит к копеечным расхождениям.
  • ❌ Жесткое задание ставок: Прописывание в коде СтавкаНДС = 20 вместо обращения к справочнику чревато ошибками при изменении законодательства.
  • ❌ Неучет валюты: Если документ в иностранной валюте, НДС должен рассчитываться в рублях по курсу ЦБ на дату операции.
  • ❌ Путаница с включением/не включением НДС: Неверное использование НДСВыделить вместо НДСНачислить (и наоборот).

Пример ошибки с валютой: 

// НЕПРАВИЛЬНО: расчет НДС в валюте документа

СуммаНДС = Документ.СуммаДокумента * 0.20;



// ПРАВИЛЬНО: переводим в рубли по курсу


СуммаВРублях = Документ.СуммаДокумента * Документ.КурсВалюты;


СуммаНДС = НДСНачислить(СуммаВРублях, 20);

Пример ошибки с округлением: 

// НЕПРАВИЛЬНО: ручной расчет без округления

СуммаНДС = СуммаБезНДС * 0.20;



// ПРАВИЛЬНО: используем встроенную функцию


СуммаНДС = НДСНачислить(СуммаБезНДС, 20);

Еще одна частая проблема — несоответствие сумм в документе и книге продаж. Это происходит, если НДС рассчитывается в документе, но не переносится в регистры накопления. Проверяйте, что после расчета НДС вызывается метод ЗаписатьНДС() (или аналогичный для вашей конфигурации).

Почему сумма НДС в декларации не сходится с данными из 1С?

Наиболее вероятные причины:

1. В некоторых документах НДС рассчитан неверно (например, не учтена ставка 0% для экспорта).

2. Есть расхождения между данными в регистрах накопления и документами (например, не проведено движение по регистру "НДС Продажи").

3. Не учтены авансы или корректировочные счета-фактуры.

4. Ошибки округления при массовых операциях.

Для диагностики используйте отчет "Анализ состояния налогового учета по НДС" в 1С:Бухгалтерии.

Продвинутые сценарии: НДС в отчетах и обработках

Иногда требуется рассчитать НДС не в документе, а в отчете или внешней обработке. Например, для формирования аналитики по контрагентам или проверки корректности учета. Рассмотрим ключевые подходы:

1. Расчет НДС в отчете (СКД)

Если вы используете систему компоновки данных (СКД), НДС можно рассчитать прямо в запросе: 

ВЫБРАТЬ

РеализацияТоваровУслуг.Контрагент КАК Контрагент,


СУММА(РеализацияТоваровУслугТовары.Сумма) КАК СуммаБезНДС,


СУММА(НДСНачислить(РеализацияТоваровУслугТовары.Сумма, РеализацияТоваровУслугТовары.СтавкаНДС)) КАК СуммаНДС


ИЗ


Документ.РеализацияТоваровУслуг КАК РеализацияТоваровУслуг


ВНУТРЕННЕЕ СОЕДИНЕНИЕ Документ.РеализацияТоваровУслуг.Товары КАК РеализацияТоваровУслугТовары


ПО РеализацияТоваровУслуг.Ссылка = РеализацияТоваровУслугТовары.Ссылка


ГДЕ


РеализацияТоваровУслуг.Дата МЕЖДУ &НачалоПериода И &КонецПериода


СГРУППИРОВАТЬ ПО


РеализацияТоваровУслуг.Контрагент

2. Расчет НДС во внешней обработке

Для сложных расчетов (например, реструктуризация долга с НДС) удобно создавать отдельные обработки. Пример кода для массового перерасчета: 

Процедура ПересчитатьНДСВОбработке(МассивДокументов)

Для Каждого Документ Из МассивДокументов Цикл


ДокОбъект = Документ.ПолучитьОбъект();



// Перерасчет НДС в каждой строке


Для Каждого Строка Из ДокОбъект.Товары Цикл


Строка.СуммаНДС = НДСНачислить(Строка.Сумма, Строка.СтавкаНДС);


КонецЦикла;



ДокОбъект.Записать(РежимЗаписиДокумента.Проведение);


КонецЦикла;


КонецПроцедуры

3. Интеграция с Excel

Если нужно выгрузить данные с НДС в Excel, используйте ЗначениеВСтрокуВнутр() для корректного отображения чисел: 

ТаблицаExcel.Ячейка(Строка, 1).Значение = ЗначениеВСтрокуВнутр(СуммаНДС, "ЧДЦ=2; ЧРД=; ЧГ=0");

Для сложных отчетов (например, сводной декларации по НДС с разбивкой по ставкам) может потребоваться многопоточная обработка или выгрузка данных в SQL-базу для ускорения расчетов.

💡

При работе с большими отчетами по НДС всегда тестируйте производительность на копии базы! Некоторые запросы с группировкой по ставкам могут выполняться десятки минут.

Автоматизация проверки корректности НДС

Чтобы избежать ошибок в декларациях, полезно автоматизировать проверку расчетов НДС. Вот несколько подходов:

1. Сравнение сумм в документе и регистрах: 

Запрос = Новый Запрос;

Запрос.Текст =


"ВЫБРАТЬ


|   СУММА(Документ.РеализацияТоваровУслуг.ИтогоНДС) КАК НДСВДокументе,


|   СУММА(РегистрНакопления.НДСПродажи.СуммаНДС) КАК НДСВРегистре


|ИЗ


|   Документ.РеализацияТоваровУслуг КАК Документ


|       ЛЕВОЕ СОЕДИНЕНИЕ РегистрНакопления.НДСПродажи КАК РегистрНакопления


|       ПО Документ.Ссылка = РегистрНакопления.Регистратор


|ГДЕ


|   Документ.Дата МЕЖДУ &НачалоПериода И &КонецПериода";



Результат = Запрос.Выполнить();


Если Результат.Выбрать().НДСВДокументе <> Результат.НДСВРегистре Тогда


Сообщить("Расхождение в суммах НДС! Документы: " + Результат.НДСВДокументе + ", Регистр: " + Результат.НДСВРегистре);


КонецЕсли;

2. Проверка округления:

Создайте обработку, которая ищет документы с копеечными расхождениями: 

Процедура ПроверитьОкруглениеНДС()

Запрос = Новый Запрос;


Запрос.Текст =


"ВЫБРАТЬ


|   Товары.Ссылка КАК Документ,


|   Товары.СуммаНДС - НДСНачислить(Товары.Сумма, Товары.СтавкаНДС) КАК Разница


|ИЗ


|   Документ.РеализацияТоваровУслуг.Товары КАК Товары


|ГДЕ


|   Товары.СуммаНДС <> НДСНачислить(Товары.Сумма, Товары.СтавкаНДС)";



Результат = Запрос.Выполнить();


Если Результат.Количество() > 0 Тогда


Сообщить("Найдены документы с некорректным округлением НДС!");


КонецЕсли;


КонецПроцедуры

3. Контроль актуальности ставок:

Напишите обработку, которая проверяет, все ли документы используют действующие ставки НДС на дату операции: 

Процедура ПроверитьАктуальностьСтавок()

Запрос = Новый Запрос;


Запрос.Текст =


"ВЫБРАТЬ РАЗЛИЧНЫЕ


|   Товары.СтавкаНДС КАК СтавкаНДС,


|   Товары.Ссылка.Дата КАК ДатаДокумента


|ИЗ


|   Документ.РеализацияТоваровУслуг.Товары КАК Товары


|ГДЕ


|   Товары.СтавкаНДС <> (


|       ВЫБРАТЬ ПЕРВЫЕ 1


|       Периоды.СтавкаНДСПериод.СтавкаНДС КАК СтавкаНДС


|       ИЗ


|           РегистрСведений.СтавкиНДСПериоды КАК Периоды


|       ГДЕ


|           Периоды.Период МЕЖДУ &ДатаДокумента И ДобавитьМесяц(&ДатаДокумента, 1)


|   )";



// Выполняем запрос для каждого месяца в периоде


// ...


КонецПроцедуры

Такие проверки полезно запускать ежемесячно перед сдачей декларации или интегрировать в регламентные задания.

FAQ: Частые вопросы по расчету НДС в 1С

❓ Как посчитать НДС 20% от суммы в 1С, если ставка хранится как объект справочника?

Если ставка НДС — это ссылка на справочник (например, Справочники.СтавкиНДС.НайтиПоНаименованию("20%")), сначала получите ее процентное значение: 

СтавкаНДСОбъект = Справочники.СтавкиНДС.НайтиПоНаименованию("20%");

СтавкаНДСПроцент = СтавкаНДСОбъект.Процент; // или СтавкаНДСОбъект.Значение


СуммаНДС = НДСНачислить(СуммаБезНДС, СтавкаНДСПроцент);

В некоторых конфигурациях процент ставки можно получить через реквизит Процент или Значение — уточните в метаданных вашей базы.

❓ Почему в 1С НДС рассчитывается неверно для документов в иностранной валюте?

НДС в России всегда рассчитывается в рублях, даже если документ оформлен в другой валюте. Типичная ошибка — расчет НДС от валютной суммы без перевода в рубли. Правильный подход: 

СуммаВРублях = СуммаВВалюте * КурсВалюты;

СуммаНДС = НДСНачислить(СуммаВРублях, СтавкаНДС);

Курс валюты берите из справочника Валюты на дату документа.

❓ Как в 1С посчитать НДС "сверху" (включенный в сумму) и "снизу" (начисляемый)?

Используйте разные функции:

  • 🔹 НДС "снизу" (начисляемый): НДСНачислить(СуммаБезНДС, Ставка) — когда НДС добавляется к сумме.
  • 🔹 НДС "сверху" (включенный): НДСВыделить(СуммаСНДС, Ставка) — когда НДС уже входит в сумму.

Пример: 

// Начисляем НДС на сумму 10 000 ₽ (ставка 20%)

СуммаНДС_Снизу = НДСНачислить(10000, 20); // Результат: 2000 ₽



// Выделяем НДС из суммы 12 000 ₽ (включая 20%)


СуммаНДС_Сверху = НДСВыделить(12000, 20); // Результат: 2000 ₽