Функция округляет число в большую сторону:
|
1 2 3 4 |
&НаСервере Функция ОкруглитьВбольшуюСторну(Сумма) Возврат Сумма = Окр(Сумма+0.5,0,0); КонецФункции |
Применение функции округления в большую сторону 1С Предприятие:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 |
&НаКлиенте Процедура ОкруглитьСумму(); Для Каждого СтрокаТЧ Из Объект.ТЧ Цикл Если ОкруглитьВбольшуюСторну(СтрокаТЧ.Сумма) <> Истина Тогда Сумма = СтрокаТЧ.Сумма; Сообщить("Стоит округлить сумму: " + СтрокаТЧ.Номенклатура + " Рекомендация: " + Окр(Сумма+0.5,0,0)); КонецЕсли; КонецЦикла КонецПроцедуры // Пример функции округлить (Пример №1) // Например число 7.1 к 8 (Целому в большую сторону) &НаСервере Функция ОкруглитьВбольшуюСторну(Сумма) Возврат Сумма = Окр(Сумма+0.5,0,0); КонецФункции &НаКлиенте Процедура ПриОткрытии(Отказ) ОкруглитьСумму(); КонецПроцедуры //Для округления чисел в 1С используем функцию 1С - Окр(12.55) //1С вернет 12 //С помощью 1С ОКР можно проводить округление дробной части чисел 1С (все то, что идет после запятой), например до сотых двух знаков): //РезультатФункции = Окр(15.2233, 2); //15.22 //С помощью 1С ОКР можно проводить округление целой части чисел 1С (то, что идет до запятой), например до тысяч (трех знаков): //РезультатФункции = Окр(12333, -3); //12000 |
Пример того как работает функция округления в большую сторону смотрите пример в *dt
Открываем второй документ “ПоступлениеТоваровИУслуг” и тут же сработает условие (проверка, нуждается ли сумма в округлении). И если да, тогда Вы получите сообщение какой товар (сумму) нужно округлить.
Для округления чисел в 1С используем функцию 1С – Окр(12.55)
1С вернет 12
С помощью 1С ОКР можно проводить округление дробной части чисел 1С (все то, что идет после запятой), например до сотых двух знаков):
РезультатФункции = Окр(15.2233, 2);
15.22
С помощью 1С ОКР можно проводить округление целой части числа 1С (то, что идет до запятой), например до тысяч (три знака):
РезультатФункции = Окр(12333, -3); //12000
Если Вы хотите больше узнать о программировании в 1С, тогда регистрируйтесь на курс: 1С 8.3 Старт >>>