Truncar cadena texto

[[Héctor Randolph]]

Si utilizas Firebird, puedes aprovechar las UDF (Funciones definidas por el usuario); tienes que crear una bilbioteca DLL con las funciones que deseas ejecutar, en este caso puedes hacer en Delphi la función que elimine el prefijo 'MODELO' y generar una DLL. Después esta función la decalaras en Firebird para que la reconozca y listo.

La principal ventaja de las UDF es que puedes llamarlas dentro de las sentencias SQL, por ejemplo

Código SQL [-]
  SELECT EliminaPrefijoModelo(mi_campo) FROM mi_tabla;

Firebird tiene algunos ejemplos de estas funciones en la carpeta examples y en la carpeta UDF, en el foro también puedes encontrar información.

Un saludo.

[dsa10]

Claro, pero el problema es que no se que función utilizar para truncar esa cadena de texto. He leído por ahí que con la funcion SUBSTR se puede hacer.

[[Héctor Randolph]]

Espera un momento, tienes razón; entre las funciones UDF que trae Firebird está substr

Empezado por archivo ib_udf.sql

/*****************************************
*
* s u b s t r
*
*****************************************
*
* Functional description:
* substr(s,m,n) returns the substring
* of s which starts at position m and
* ending at position n.
* Note: This function is NOT limited to
* receiving and returning only 80 characters,
* rather, it can use as long as 32767
* characters which is the limit on an
* INTERBASE character string.
* Change by Claudio Valderrama: when n>length(s),
* the result will be the original string instead
* of NULL as it was originally designed.
*
*****************************************/

Solamente tienes que ejecutar el script ib_udf.sql en FireBird para registrar la función y poder utilizarla

Saludos