Проверка параметров операции

Для проверки параметров существует две программы. Программа CHECK_TYPE контролирует, принадлежат ли символы, стоящие в проверяемых позициях, тому или иному типу. Если контрольные позиции определены как числовые, то программа CHECK_RANGE проверяет, находится ли соответствующее значение в пределах заданного диапазона.

Обращение к этим программам должно производиться следующим образом:

PERFORM CHECK_TYPE USING OPERATION+ofs(len) type SPACE.

или

PERFORM CHECK_TYPE USING OPERATION+ofs(len) SPECIAL string.

PREFORM CHECK_RANGE USING OPERATION+ofs(len) low high.

Значения меток-заполнителей:

ofs, len

Позиции, подлежащие проверке

type

Допустимый тип за исключением типа SPECIAL

string

Список всех допустимых символов

low

Наименьшее допустимое значение

high

Наибольшее допустимое значение

 

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

Еслти после вызова программы возникло сообщение об ошибке, вы обязаны закончить обработку (например, с помощью команды EXIT).