数値クラス・テストの実行方法

数値クラス・テストによってデータの妥当性検査を行うことができます。 たとえば、

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' になっているかどうか、 また符号位置が有効な符号値かどうか (独立か非独立か) を検査することになります。