数値クラス・テストによってデータの妥当性検査を行うことができます。 たとえば、
LINKAGE SECTION. 01 COUNT-X PIC 999. . . . PROCEDURE DIVISION USING COUNT-X. IF COUNT-X IS NUMERIC THEN DISPLAY "DATA IS GOOD". . . .
数値クラス・テストは、データ項目の内容が、 そのデータ項目の特定の PICTURE および USAGE に対して有効な値になっているかどうかをチェックすることです。 たとえば、パック 10 進数項目の場合、16 進数の桁位置が X'0' 〜 X'9' になっているかどうか、 また符号位置が有効な符号値かどうか (独立か非独立か) を検査することになります。
(C) Copyright IBM Corporation 1992, 2006. All Rights Reserved.