コンパイル時にサブストリングの左端位置またはその長さを知らない場合、参照修飾子の中で組み込み関数を使用できます。
例えば、以下のコード・フラグメントにより、Customer-Record のサブストリングがデータ項目 WS-name に移動されます。サブストリングは、実行時に決定されます。
05 WS-name Pic x(20). 05 Left-posn Pic 99. 05 I Pic 99. . . . Move Customer-Record(Function Min(Left-posn I):Function Length(WS-name)) to WS-name
整数関数を使わなければならない位置で非整数関数を使用したい場合、 INTEGER または INTEGER-PART 関数を使用して結果を整数に変換できます。 以下に、その例を示します。
Move Customer-Record(Function Integer(Function Sqrt(I)): ) to WS-name
関連参照
INTEGER
(「COBOL for Windows 言語解説書」)
INTEGER-PART
(「COBOL for Windows 言語解説書」)