[jachguate]

Y otra vuelta de tuerca mas.. :D

Código SQL [-]
for select empresa, cod_postal, codigo_cliente, num_direccion,
           cast( substring(cod_postal FROM 1 FOR 2) as integer)
      from cli_direcciones
      into :empresa, :codigo_postal, :cliente, :direccion, :provincia do
begin
  /*lo que haya que hacer!*/

Hasta luego.

;)