Как проверить на четное число в 1С 8 8.2 8.3?
1 2 3 4 5 |
&НаСервере Функция ПроверитьЧетноеЧисло(ПроверяемоеЧисло) Число = ПроверяемоеЧисло%2=0; Возврат Число; КонецФункции |
Ниже пример использования функции на четное число.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 |
&НаКлиенте Процедура СтрокиПроверитьНаЧет(); Для Каждого СтрокаТЧ Из Объект.ТЧ Цикл // ПроверитьЧетноеЧисло(СтрокаТЧ.НомерСтроки); //Сообщить(ПроверитьЧетноеЧисло(СтрокаТЧ.НомерСтроки)); Если ПроверитьЧетноеЧисло(СтрокаТЧ.НомерСтроки) = Истина Тогда Сообщить("Четное :" + СтрокаТЧ.НомерСтроки); КонецЕсли; КонецЦикла КонецПроцедуры // Сама функция проверки на четное число, остальное лишь пример использования &НаСервере Функция ПроверитьЧетноеЧисло(ПроверяемоеЧисло) Число = ПроверяемоеЧисло%2=0; Возврат Число; КонецФункции &НаКлиенте Процедура ПриОткрытии(Отказ) СтрокиПроверитьНаЧет(); КонецПроцедуры |
Пример того как можно применить данную функцию изложен в *dt файле, можете скачать бесплатно ниже по ссылке.
Скачать пример (*dt) проверки на четное нечетное число >>
При открытии любого документа “Поступление товаров и услуг” сработает функция и проверит на четное не четное табличную часть документа его строки.
Согласно условию, если строка по номеру четная, выведет сообщение “Четная + номер строки”.
Если Вы хотите больше узнать о программировании в 1С, тогда регистрируйтесь на курс: 1С 8.3 Старт >>>