INSPECT

INSPECT 文に対する ACUCOBOL-GT 拡張

書き方 1 および 2

書き方 1 および 2 は、MF COBOL と同じです。「Micro Focus COBOL 言語リファレンス」セクションまたは『ACUCOBOL-GT リファレンス』マニュアルを参照してください。

INSPECT source

    [ TALLYING counter FOR TRAILING comp-value ] 
    [ REPLACING TRAILING target BY replace ]

TRAILING は ACUCOBOL-GT の拡張です。これは、ソースデータ項目内で最も右側にある出現または連続した一連の出現を見つけるために使用されます。TRAILING の出現が見つかった場合、ソースデータ項目の右から左へのスキャンを行い、連続した出現を探します。

TRAILING 指定が存在している場合、REPLACING オプションは、連続する target すべての出現を replace で置き換えます。その際に、これらの出現はソースの最も右側の文字位置で終了するものと想定されています。

source および comp-value の用途は DISPLAY とします。

comp-value、target、および replace は、文字リテラルまたは 1 文字の英数字データ項目とします。