Rational Developer for System z
Enterprise COBOL for z/OS バージョン 4.1 言語解説書


図の説明: INSPECT ステートメント

この図は、次の INSPECT ステートメントの処理ステップを示します。

INSPECT ID-1 TALLYING ID-2 FOR ALL "**" REPLACING ALL "**" BY ZEROS.
  1. 初期データ値を、以下に示します。
    • ID-1。***0** を含む英数字カテゴリーのデータ項目です。
    • ID-2。0 を含む数値データ項目です。
  2. INSPECT ステートメントは左から右へ ID-1 をスキャンします。
  3. 「**」の最初のオカレンスは ID-1 の冒頭で検出されます。文字「**」は「00」によって置換されます。カウンター ID-2 は 1 ずつ増分されます。
  4. 「**」の次のオカレンスは ID-1 の最後で検出されます。この場合も、「**」は「00」によって置換され、カウンターが増分されます。
  5. INSPECT ステートメントの処理を終了します。 データ値を、以下に示します。
    • 00*000 を含む ID-1
    • 2 を含む ID-2

図の説明の終わり。


ご利用条件 | フィードバック

このインフォメーション・センターでは Eclipse テクノロジーが採用されています。(http://www.eclipse.org)