Расчет пени (неустойки) доработанный + печать претензии для клиента в шаблоне MS Word.






Отчет расчет пени (неустойки) для предоставления в суд + печать претензии для клиента в шаблоне MS Word.
Внешний отчет для 1С: Предприятие 8.2 Бухгалтерия предприятия 2.0 (_РасчетПени новый.erf) + внешняя печатная форма (ПретензияПоШаблонуWordДляВнешнегоОтчета8.2.epf) + Шаблоны MS Word (ПретензияШаблон.dot, ПретензияШаблон.dotx)

Отчет получает взаиморасчеты с покупателями по счету 62.01 в разрезе документов с учетом авансовых платежей и на основании этих данных выполняет расчет пени. (Заполнить по данным бухгалтерского учета)

Главное окно отчета


Формула расчета: Пени = ПроцентПени/100*СуммаДолга*КоличествоДнейПросрочкиПлатежа. Если  Долг > 0, то считаем пени, иначе — это переплата и Пени = 0. КоличестоДнейПросрочкиПлатежа — это разница в днях между соседними документами. (Печать)

Также в программе учитывается сальдо на начало периода при рассчете пени. (Сальдо на Дата и сумма Пени)

Расчет неустойки за просрочку платежей

Для печати Претензии по шаблону Word, необходимо зарегистрировать внешнюю печатную форму (ПретензияПоШаблонуWordДляВнешнегоОтчета8.2.epf)

Параметры внешней печатной формы


Желательно не менять наименование Внешней печатной формы при регистрации в справочнике «Внешние обработки», так как  при печати по шаблону Word поиск обработки идет по имени «Претензия по шаблону Word«. Если вы все же переименовали Внешюю печатную форму, то ее можно выбрать во Внешнем отчете «_РасчетПени новый.erf» (Расчет неустойки за просрочку платежей) в поле «Печ. форма:».  

Параметры, выделенные красным цветом,  автоматически заполняются на основании файла шаблона (ПретензияШаблон.dotx). Результаты заполнения, выделенные черным цветом, автоматически подставлются из макета параметры Шаблона (можно посмотреть в режиме Конфигуратор в файле Претензия по шаблону Word для внешнего отчета):

Обработчики заполнения по-умолчанию

Если присмотреться, то можно увидеть Параметры (например: ДатаНачала,ОснКонЛицоКонтр и др.), которые не попали к нам в обработку при регистрации Внешней печатной формы. Это происходит потому, что эти параметры не используюстя в шаблоне ПретензияШаблон.dotx, но их можно использовать в др. шаблонах.

Параметры можно редактировать в режиме Предприятия через специальную форму:

 Обработчик заполнения параметра

После того как внешняя печатная форма будет зарегистрирована в справочкике «Внешние обработки», можно будет печатать Претензию  (Печать — Претензия по шаблону Word):

Претензия по шаблону Word

В отчете по кнопке «Сохранить значения» сохраняются следующие элементы формы: Организация, Процент пени, Печ. форма.

Нестандартные парамтры могут быть доработаны в Модуле Объекта внешнего отчета. Пример нестандартных параметров из Функции ПечатьПоШаблону():

ПараметрыПредметаИсчисления = «целая, целых, целых, ж, десятая процента, десятые процента, десятых процента, ж, 1»;
ФорматнаяСтрока = «Л=ru_RU; ДП=Истина»;
ПроцентПениПрописью = ЧислоПрописью(ПроцентПени, ФорматнаяСтрока, ПараметрыПредметаИсчисления);
СтруктураДолга = РассчитатьДолг();
СуммаПени = СтруктураДолга.СуммаПениИтог;
СуммаДолга = СтруктураДолга.Долг;
ОбщаяСуммаДолга = СтруктураДолга.Долг + СтруктураДолга.СуммаПениИтог;

Также можно сделать так, чтобы документ Word сохранялся в определенный каталог на диске для этого нужно заменить след фрагмент кода из Функции ПечатьПоШаблону():

 

//Если Прав(ПолноеИмяФайлаДокумента,1) = «x» Тогда
// Расш=».docx»;
//Иначе
// Расш=».doc»;
//КонецЕсли;
//Док=»C:ПретензииПретензия»+ДоговорКонтрагента.Номер+Расш;
//Документ.SaveAs(Док);
//Сообщить(«Создан документ «+Док);
Документ.SaveAs(ПолноеИмяФайлаДокумента);

// Закрытие документа и приложения
Документ.Close(0);
ЗавершитьРаботуПриложенияWord();

//ЗапуститьПриложение(Док);
ЗапуститьПриложение(ПолноеИмяФайлаДокумента);

на следующий фрагмент: 

Если Прав(ПолноеИмяФайлаДокумента,1) = «x» Тогда
Расш=».docx»;
Иначе
Расш=».doc»;
КонецЕсли;
Док=»C:ПретензииПретензия»+ДоговорКонтрагента.Номер+Расш; //Каталог куда будет сохраняться файл
Документ.SaveAs(Док);
Сообщить(«Создан документ «+Док);

// Закрытие документа и приложения
Документ.Close(0);
ЗавершитьРаботуПриложенияWord();

ЗапуститьПриложение(Док);

/////////////////////////////////////////////////////////////////////

При разработке отчета использовался стандартный документ АктСверкиВзаиморасчетов, а также публикация: //infostart.ru/public/125652/

PS Отчет будет доработан в документ с возможностью печати Претензии для передачи контрагенту с таблицей расчета пени.

23 Comments

  1. Tanis

    Добрый день!

    По описанию, как раз очень нужная обработка, сейчас буду проверять.

    Но если я правильно понял, то она только рассчитывает проценты, и выводит их в отчет, но проводок по начислению не делает?

    Если доработать еще и создание проводок, то будет вообще, замечательная вещь!

    Reply
  2. Tanis

    Добрый день!

    Автор, обработка писалась под частный случай? а то не понятно почему дни просрочки считаются между документами. Обычно просрочка считается до даты платежа. А здесь получается даже между двумя и более реализациями.

    Reply
  3. Sanya1984

    Добрый день, да, обработка писалась под частный случай и расчет дней просрочки считается так, как хотел заказчик

    Reply
  4. bnw

    Надо упростить подключение документа Ворд!

    Reply
  5. Sanya1984

    Так как это внешний отчет, то подключение документа Word проще сделать нельзя, если у Вас есть идеи, напишите.

    Reply
  6. bnw

    Я думаю, что печатные формы надо вставить в отчет, как Макеты

    Reply
  7. astra94
    Так как это внешний отчет, то подключение документа Word проще сделать нельзя, если у Вас есть идеи, напишите.

    Спасибо за предложенный отчет !

    Слегка изменила его : вставила печать документа в word, в саму обработку. Изменила текст в Претензии.

    http://infostart.ru/public/306655/

    Reply
  8. kildonn

    Добрый день!

    А для Бухгалтерии 3.0 аналогичный отчет очень актуален.

    Reply
  9. Sanya1984

    К сожалению у меня нет времени заняться этим отчетом для редакции 3.0, по крайнем мере до Нового года точно, а там посмотрим, если кто-то сделает, буду раз разместить у себя ссылку на разработку

    Reply
  10. Rustig

    (0) Sanya1984, спасибо за обработку.

    Коллеги, я добавил расчет просрочек по банковским дням (то есть не по календарным) http://infostart.ru/public/338386/

    Reply
  11. miv

    Нужна обработка для 1С БП 8.3 и Оррен Офис

    Reply
  12. 27272

    Ещё бы кто-нить сделал бы для Бухгалтерия государственного учреждения, редакция 1.0 такой расчёт. Да что-бы по П О С Т А Н О В Л Е Н Ию правительства РФ

    от 25 ноября 2013 г. № 1063

    Reply
  13. bas_nsk

    Неплохо было бы еще добавить кол-во дней отсрочки по договору.

    Но это мелочь, сам допилю.Спасибо!!!

    Reply
  14. user1023212

    В версии 1с 8.3.8 вообще нет такой возможности расчета пени?

    Нужно создавать с нуля или как-то по-другому можно?

    Reply
  15. Sanya1984

    (14) У меня нет версии для БП 3.0, надо делать с нуля. Здесь есть вот такая разработка (не моя): Расчет пени для предоставления в суд, БП 3.0 и 2.0, единственное код закрыт.

    Reply
  16. user1023212

    Спасибо за ссылки.

    Решил проблему следующим способом, нашел БД где есть Начисление пени, скопировал и вставил в базу где нет, по сейчас борюсь с ошибками такого плана:

    ВидДокументаОстатка(СтрокаОстатков)

    Если БухгалтерскийУчетПовтИсп.СчетВИерархии(СтрокаОстатков.Счет, ПланыСчетов.Хозрасчетный.РасчетыПоПретензиям)

    ИЛИ БухгалтерскийУчетПовтИсп.СчетВИерархии(СтрокаОстатков.Счет, ПланыСчетов.Хозрасчетный.РасчетыПоПретензиямВал)

    ИЛИ БухгалтерскийУчетПовтИсп.СчетВИерархии(СтрокаОстатков.Счет, ПланыСчетов.Хозрасчетный.РасчетыПоПретензиямУЕ) Тогда

    ПредставлениеВида = НСтр(«ru=’Претензия'»);

    Reply
  17. user1023212

    Нашел решение, модулей не было пришлось и их подтянуть.

    Сейчас пробую запустить.

    Если кому интересно расскажу как я решил проблему.

    Reply
  18. user1023212

    не получилось, а я уже в ладоши бью.

    Проблема с подключениями модулей еще пришлось решить и обновлением базы, вот только установкиотключениябезопасногорежима параметр там был такой я его закоментил, думаю он не столь важен.

    Reply
  19. user1023212

    Ошибка инициализации модуля: ОбщийМодуль.ПодключаемыеКомандыПовтИсп.Модуль

    по причине:

    {ОбщийМодуль.ПодключаемыеКомандыПовтИсп.Модуль(9,2)}: Процедура или функция с указанным именем не определена (УстановитьОтключениеБезопасногоРежима)

    <<?>>УстановитьОтключениеБезопасногоРежима(Истина);

    {ОбщийМодуль.ПодключаемыеКомандыПовтИсп.Модуль(34,2)}: Процедура или функция с указанным именем не определена (УстановитьОтключениеБезопасногоРежима)

    <<?>>УстановитьОтключениеБезопасногоРежима(Ложь)

    как убрать эту ошибку?

    Reply
  20. Sanya1984

    (19) Обработка не предназначена для БП 3.0, надо многое в ней переделывать. В БП 2.0 обычные формы, в БП 3.0 управляемые формы, просто закомментировать или переименовать функции не получится, так что не мучайтесь.

    Reply
  21. Sanya1984

    (19) Когда обработку качали и под каким пользователем?

    Reply
  22. Sanya1984

    (19) Судя по ветке форума, обработка не моя: Создание начисление пеней в 8.3 1с

    Reply
  23. user1023212

    Начисление пени и модулю с обработками взяты с другой базы версии 8.3.10, там все работает, чтобы не писать с 0, я просто хочу попробовать, можно ли ее скопировать и перенести в базу версии 8.3.8, вроде можно я думаю, но может быть только проблема с глобальными настройками я думаю.

    Reply

Leave a Comment

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