Уведомление о смене банковских реквизитов в счете на оплату. Альфа-авто 5
Клиент попросил уведомлять в счете на оплату выделенным текстом, что реквизиты счета поменялись. Мне было вдвойне приятно делать эту задачу, что у клиента был Точка-банк, и у меня одновременно с ним тоже поменялись реквизиты. Я хотел сделать себе расширение для БП3, чтобы можно было включать подобное уведомление для клиентов. Но посчитал, что лично для меня такое расширение писать мелко.
У клиента серьезно измененная конфигурация. Поэтому правлю прямо в модуле документа «Счет на оплату», в конце процедуры ПечатьСчетНаОплату:
//Осипов 2023-07-04 уведомление о смене реквизитов Если ТекущаяДата() < '20230714' И СокрЛП(РасчетныйСчетОрганизации.НомерСчета) = "4080......." Тогда ТабДокумент.Область(4,1).Текст = "ВНИМАНИЕ! РЕКВИЗИТЫ ДЛЯ ОПЛАТЫ ПОМЕНЯЛИСЬ - БИК и БАНК ИЗМЕНИЛИСЬ, НОМЕР СЧЕТА НЕ ИЗМЕНИЛСЯ. ПРОСЬБА ОПЛАЧИВАТЬ ПО НОВЫМ РЕКВИЗИТАМ ИЗ ЭТОГО СЧЕТА"; ТабДокумент.Область(4,1, 4, 8).Объединить(); ТабДокумент.Область(4,1).Шрифт = Новый Шрифт(ТабДокумент.Область(4,1).Шрифт,,9,истина); ТабДокумент.Область(4,1).ГоризонтальноеПоложение = ГоризонтальноеПоложение.ПоШирине; КонецЕсли;
В печатной форме счета выглядит так:
Среда: Альфа-Авто: Автосалон+Автосервис+Автозапчасти ПРОФ, редакция 5.1 (5.1.10.09). Объем: 0.8 час.
Свежие комментарии