VAR-LENGTH Directive
This directive forces an alphanumeric COBOL field to be defined as VARCHAR in the database.
$EFD VAR-LENGTH
or
*(( EFD VAR-LENGTH ))
or
*>(( EFD VAR-LENGTH ))
Example
$EFD VAR-LENGTH
  03 CUS-NAME PIC X(32).
This directive is not supported by c-tree SQL.