文字列の最大長を返します。
MAXLENGTH(x)
x は計算型の式としなければなりませんが、文字列型にできるようにもする必要があります。そうなっていない場合は、文字に変換されます。
結果の精度は、-bifprec コンパイラ オプションでオーバーライドしない限り、Fixed Binary(15) です。
dcl s char (40) varying;
    dcl t char (40) ;
    s = 'The Lawn, 22-30 Old Bath Road';
    put skip list ('maxlength(s) is: ', maxlength(s));   /* char var */
    put skip list ('maxlength(t) is: ', maxlength(t));   /* char       */
 
               		次のように表示されます。
maxlength(s) is: 40 maxlength(t) is: 40
なし。