Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Firebird e Interbase (https://www.clubdelphi.com/foros/forumdisplay.php?f=19)
-   -   Como puedo crear una UDF para Firebird???? (https://www.clubdelphi.com/foros/showthread.php?t=34718)

AGAG4 18-08-2006 17:59:51

Como puedo crear una UDF para Firebird????
 
Buen día, alguien me puediera dar algunos tip's de como crear una UDF para firebird, lo que quiero hacer es agregar Ceros a la Izquierda en un campo Varchar ustedes se preguntarán porque no los guardo con ceros, lo que pasa es que el campo es de tipo Integer, quiero agregarles los ceros dentro del where de un Select por ejemplo:
Código SQL [-]
SELECT ....
WHERE
  REFERENCIA = TIPOMOV||FOLIO
En donde deseo la función para agregar ceros en es el campo FOLIO en referencia tiene FX008022 y en el campo TIPOMOV = FX y en el Campo FOLIO = 8022, aqui lo puedo resolver haciendo la inversa
Código SQL [-]
SELECT ....
WHERE
  TIPOMOV = SUBSTRING(REFERENCIA FROM 1 FOR 2) AND
   FOLIO  = CAST( SUBSTRING(REFERENCIA FROM 3 FOR 6) AS INTEGER )
El motivo de que no uso esta última sentencia, es que tengo un Indice por el campo REFERENCIA, lo quiero aprovechar para no crear otro INDICE por los 2 campos (TIPOMOV y FOLIO )

Espero haberme explicado
Agradezco cualquier sugerencia.

AGAG4 18-08-2006 18:30:23

Cambio de Estrategía
 
Gracias por lo menos haber leído el hilo, pero mejor voy a cambiar de estrategía, en el campo referencia de tipo varchar(8) voy a grabar sin Ceros para evitarme estos problemas....

Que tengan buen día.


La franja horaria es GMT +2. Ahora son las 22:00:04.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi