Операции принятия решения

Перечисленные ниже операторы необходимо вводить в код программы для каждой операции принятия решения:

OP_TYPE = DECISION.

Если в строке, содержащей эту операцию, будет указан другой тип правила, на этапе проверки система выдаст сообщение об ошибке.

Если в строке имеется более одной операции принятия решения, это приведет к ошибке.

Это не относится к типу правила S. Поскольку в переменном ключе не сделано никаких записей, может присутствовать более одной операции принятия решения.

ARG_TYPE = x.

x = допустимый тип спецификации

ARG_LEN = y.

y = максимальная длина спецификации

 

Длину можно сократить операциями VAOFF и VALEN. По этой причине, необходимо позже вызывать соответствующую программу для определения длины спецификации в переменном ключе.

PERFORM DETERMINE_LENGTH USING ARG_LEN VAOFF VALEN

Вышесказанное не относится к операциям AMT, NUM, и RTE. Для этих операций cмещение и длина задаются прямо как параметры, так что программный код может иметь следующий вид:

PERFORM DETERMINE_LENGTH USING ARG_LEN

                                                  OPERATION+ofs1(len1)

                                                  OPERATION+ofs2(len2).

Для обработки ошибки запрашивается ее номер, например:

IF ERROR GT 0. EXIT. ENDIF.

Подпрограмма проверяет, допустим ли диапазон, определенный операциями VAOFF и VALEN. Поскольку переменный ключ может содержать только определенное количество символов, новая характеристика может в него не войти.

Подпрограмма также проверяет, соответствует ли переменный ключ операции принятия решения.