Как проверить на целое число в 1С 8 8.2 8.3?
Как проверить на целое число в 1С 8 8.2 8.3?
|
1 2 3 4 |
&НаСервере Функция ПроверитьЧислоНаЦелое(ПроверяемоеЧисло) Возврат ПроверяемоеЧисло = Цел(ПроверяемоеЧисло); КонецФункции |
Для «Обычных форм»
|
1 2 3 |
Функция ПроверитьЧислоНаЦелое(ПроверяемоеЧисло) Возврат ПроверяемоеЧисло = Цел(ПроверяемоеЧисло); КонецФункции |
Применение функции на практике:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 |
&НаКлиенте Процедура ПроверкаЦеныНацелое(); Для Каждого СтрокаТЧ Из Объект.ТЧ Цикл Если ПроверитьЧислоНаЦелое(СтрокаТЧ.Цена) <> Истина Тогда Сообщить("Обнаружена не точная цена: " + СтрокаТЧ.Номенклатура + " Цена: "+ СтрокаТЧ.Цена); КонецЕсли; КонецЦикла КонецПроцедуры &НаСервере Функция ПроверитьЧислоНаЦелое(ПроверяемоеЧисло) Возврат ПроверяемоеЧисло = Цел(ПроверяемоеЧисло); КонецФункции &НаКлиенте Процедура ПриОткрытии(Отказ) ПроверкаЦеныНацелое(); КонецПроцедуры |
Пример того как работает функция проверки на целое число в 1С Предприятии:
Откройте документ «Поступление товаров и услуг»
Затем откройте документ №2.
Как результат проверки числа на целое (на точную цену в табличной части документа) будет сообщение:
Как проверить на целое число в 1С 8 8.2 8.3?
