ILE-RPGの組込み関数 %LENはフィールド内の含まれるブランクでない
文字数を調べる関数であるがそのままでは正しく動作しない場合がある。
例えば 80バイトのフィールド: VALUE に対して
/FREE
VALUE = 'TEST';
LEN = %LEN(VALUE);
/END-FREE
とすると LEN の値は TEST を示す 4ではなく 80 となってしまう。
%LEN を正しく機能させるには %TRIMR を使って
/FREE
VALUE = 'TEST';
LEN = %LEN(%TRIMR(VALUE));
/END-FREE
とすると LEN には正しく 4 という値が入る。
