Девальвация в Беларуси. Новое округление розничных цен или как взять на работу программиста

27.10.11

Задачи пользователя - Адаптация типовых решений

Эта статья рассчитана на тех, кто работает с "белорусской" розницей и только начинает свой путь в качестве программиста в 1с. Но будет полезна и специалистам более высокого класса. Особенно если вы хотите нанять 1с программиста на работу. В любом случае я не претендую на исключительную полезность этой статьи, но хотелось бы поделиться простым решением тривиальной задачи.

Как известно, в Беларуси  произошла девальвация рубля. В связи с этим Нацбанк решило вывести из обращения мелкие купюры достоинством 10 рублей и 20 рублей. Поэтому пару дней назад  вышло новое постановление Минторга об округлении розничных цен

Розничная цена (тариф) округляется за принятую единицу измерения (штуку, десяток, метр, килограмм, литр и т.п.). Так, значения в сумме до Br25 отбрасываются, от Br25 включительно до Br75 округляются до Br50, от Br75 рублей включительно и выше округляются до Br100.

 

Таким образом возникла задача: "Срочно сделать округление розничных цен по новым правилам в прейскурантах на товары"

 Ранее было округление до 10 рублей, что решается так 

ОркЦена = ОКР(РозничнаяЦена,-1)

 

Но здесь задача немного усложнилось:

  •  Если последние две цифры в цене меньше 25 рублей (т.е. 24 и менее), то округляем до 0 рублей  (ОКР(РозничнаяЦена,-2))
  •  Если последние две цифры в цене 25 рублей и более, то округляем до 50 рублей
  •  Если последние две цифры в цене меньше 75 рублей, то округляем до 50 рублей
  •  Если последние две цифры в цене 75 рублей и более, то округляем до 100 рублей

 

Можно решать задачу в лоб:

Получить две последние цифры розничной Цены. Проверить по условиям и прибавить опять результат к  Цене

 

 


 

Но есть вариант проще.

Достаточно переформулировать задачу и она решается в две строки (ну или даже в одну Laughing).

 

Известно, что минимальная цена будет округляться до 50 рублей, а это можно считать базовым значением. В итоге получаем:

Цену нужно поделить на 50, затем округлить, а затем умножить на 50.

Вот такая простая формула.

 Функцию можно  создать в глобальном модуле

Функция ОкруглениеРозничнойЦены(РозничнаяЦена) Экспорт
ОкрЦена = Окр(РозничнаяЦена/50);
Возврат ОкрЦена*50;
КонецФункции

 

Или ещё проще:

Функция ОкруглениеРозничнойЦены(РозничнаяЦена) Экспорт
Возврат Окр(РозничнаяЦена/50)*50;
КонецФункции

 

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

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

 

 

 

См. также

Адаптация типовых решений Платформа 1С v8.3 1С:Документооборот Россия Платные (руб)

Расширение конфигурации для «1С:Документооборот КОРП», редакция 3.0. позволяет: 1.использовать произвольные табличные части в качестве дополнительных реквизитов к документу; 2 использовать произвольные табличные части в шаблонах в формате docx для автоматического заполнения таблиц.

29400 руб.

29.06.2023    5630    14    5    

24

Логистика, склад и ТМЦ Адаптация типовых решений Пользователь Платформа 1С v8.3 1С:Управление нашей фирмой 1.6 1С:Управление нашей фирмой 3.0 Россия Управленческий учет Платные (руб)

Чтобы не допустить путаницы с обещаниями клиентам и для четкого контроля исполнения заказов мы используем резервирование товаров. Мы доработали УНФ, чтобы она автоматически отменяла старые резервы и не мешала эффективно продавать.

7200 руб.

02.08.2023    3895    11    0    

29

Адаптация типовых решений Программист Пользователь Платформа 1С v8.3 1С:ERP Управление предприятием 2 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Абонемент ($m)

Каждый из нас сталкивается с ситуацией, когда какой-нибудь менеджер показывает свой Excel и рассказывает, как он что-то из 1С копирует в него, снабжает пояснениями, выделяет цветом и т.д. и т.п. Заканчивается все просьбой сделать вот чтобы также было в 1С. И оказывается такой человек (почти с гарантией) либо лучшим продажником, либо каким-то важным, за все отвечающим, - на ком все держится.

2 стартмани

22.04.2024    5078    dimanich70    15    

21

БСП (Библиотека стандартных подсистем) Адаптация типовых решений Программист Платформа 1С v8.3 1С:ERP Управление предприятием 2 Бесплатно (free)

Понадобилось в подменю "Создать на основании" добавить свою команду, которая открывает обработку. В процессе доработок появилась проблема двух подменю "Создать на основании". В статье о том, как решились проблемы.

01.03.2024    5400    dimanich70    9    

18
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. wer_alex 28.10.11 13:50 Сейчас в теме
У меня это решилось изменением константы Кратность = Константа.КратностьОкругления;
ЦенаР = Окр(П_ЦенаР / Кратность, 0,1)*Кратность; Алгоритм тото же
2. rumik007 01.11.11 16:34 Сейчас в теме
а может лучше в типе цены указать округлять к 50 по арифметическим правилам ))).
3. igor_1c 18 28.11.11 18:06 Сейчас в теме
rumik007 пишет:

а может лучше в типе цены указать округлять к 50 по арифметическим правилам ))).

ну это если они есть и используются в конфигурации
4. headMade 144 15.07.12 21:56 Сейчас в теме
спс, сення пригодилось
5. Darida 24.09.12 12:07 Сейчас в теме
спс - взяла сегодня на заметку)
Оставьте свое сообщение