RPG

24.文字列の中の有効な文字数を調べるには?

文字フィールドの中には実際、何文字が入っているのかを調べたいときがある。
CHEKR を使えば、わずか 1行で実際の文字列の長さを抽出できる。
また、動的に定義されているフィールドの現在の長さは%SIZE 関数によって知ることができる。

ソースコード
0001.00      C****************************************************
0002.00      C*   文字列 STRING 内の有効な文字数は LEN である。
0003.00      C****************************************************
0004.00      C           ' '       CHEKRSTRING    LEN     40
0005.00      C****************************************************
0006.00      C*   STRING の定義されている長さは SIZLEN である。
0007.00      C****************************************************
0008.00      C                     EVAL SIZLEN = %SIZE(STRING)