Правильное условие

Тема в разделе "Lotus - Программирование", создана пользователем Chron, 20 ноя 2010.

  1. Chron

    Chron Well-Known Member

    Регистрация:
    16 авг 2010
    Сообщения:
    49
    Симпатии:
    0
    Доброго времени суток.. У меня такой вопрос... Есть поле в документе ПОЛЕ_1 - оно многозначное, может принимать к примеру значения A,B,C. Также есть второе поле ПОЛЕ_2, однозначное... В зависимости от значений поля ПОЛЕ_1, ПОЛЕ_2 может принимать значения ДА или НЕТ... Хочу добиться вот чего:
    1. Если все значения ПОЛЕ_1 равно А, то ПОЛЕ_2=ДА;
    2. Если среди значений ПОЛЕ_1 присутствует хотя бы одно В, то ПОЛЕ_2 остается равным НЕТ;
    3. Если значения ПОЛЕ_1 равны только А и С, то ПОЛЕ_2 = ДА

    Пробовал вот этот кусок кода, но он ведет себя странно - ПОЛЕ_2 становится равным ДА уже при наличии хотя бы одного значения А в ПОЛЕ_1

    Код (Text):
    pr = False
    For i = 0 To N             
    If ПОЛЕ_1(i) = "А" or ПОЛЕ_1(i) = "C" Then
    pr =True

    Exit For
    End If
    Next

    If pr = True Then
    Call doc.ReplaceItemValue ("ПОЛЕ_2", "ДА")
    End If
     
  2. hosm

    hosm * so what *

    Регистрация:
    18 май 2009
    Сообщения:
    2.450
    Симпатии:
    7
    NotesItem.Contains не проще для этой задачи?

    Добавлено: 1. проверить наличие B
    Если там нет никаких особенностей, то достаночно
    2. Проверить пустоту поля. Непонятно, какое значение тогда у поля...
     
  3. Chron

    Chron Well-Known Member

    Регистрация:
    16 авг 2010
    Сообщения:
    49
    Симпатии:
    0
    Про contains как раз и не знал... Спасибо... Вопрос исчерпан
     
Загрузка...

Поделиться этой страницей