TALLYING 句 (形式 1 と 3)

ID-2
カウント・フィールド。 PICTURE 文字ストリングに記号 P を指定せずに定義した数字基本項目でなければなりません。 INSPECT ステートメントの実行前に ID-2 を初期設定しなければなりません。
ID-3 またはリテラル-1
計数オペランド (オカレンスが数えられる項目)。 計数オペランドが表意定数である場合、これは 1 文字の非数字リテラルと見なされます。
BEFORE 句も AFTER 句も指定されていない場合には、INSPECT TALLYING ステートメントの実行時に次の処置が取られます。
  • ALL 句が指定されている場合には、 左端の文字位置から右端まで続いて 検査される項目中に重複しない計数オペランドが現れるたびに、カウ ント・フィールドに 1 が加えられます。
  • LEADING 句が指定されている場合には、 検査される項目中に連続する重複し ない計数オペランドが現れるたびにカウント・フィールドに 1 が加えられます。 ただしこれは、そのような左端のオカレンスが比較の開始点であり、 該当する計数オペランドが関与できる最初の比較サイクルにこの開始点が あることを前提にしています。
  • CHARACTERS 句が指定されている場合には、 検査される項目中の各文字 (スペース文字を含む) ごとにカウント・フィールド に 1 が加えられます。したがって、INSPECT TALLYING ステートメントの実行によって、 検査される項目中の文字数の値がカウント・フィールドの値に加えられます。