SQL Width

Quem trabalha com ODBC e JDBC sabe as dificuldades com o SQL Width, segue um exemplo que mostra o width de cada campo de uma determinada tabela.

Código:

FOR EACH _file 
   WHERE _file._file-name = "mytable"
   NO-LOCK:
   FOR EACH _field OF _file 
   NO-LOCK:     
      DISPLAY _field._field-name
              _field._width.
   END.
END.

Para corrigir o width é preciso rodar o DB-TOOL.