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)
-   -   obtener los campos y tipos de datos en una tabla (https://www.clubdelphi.com/foros/showthread.php?t=86055)

ingabraham 11-06-2014 21:30:37

obtener los campos y tipos de datos en una tabla
 
buenas tardes,


- necesito un sql para obtener los campos y tipos de datos en una tabla en firebird 2.0

gracias,

ecfisa 11-06-2014 22:23:54

Hola.

Código SQL [-]
SELECT RF.RDB$FIELD_NAME AS FIELD_NAME,
       CASE FL.RDB$FIELD_TYPE
         WHEN   7 THEN 'SMALLINT'
         WHEN   8 THEN 'INTEGER'
         WHEN   9 THEN 'QUAD'
         WHEN  10 THEN 'FLOAT'
         WHEN  11 THEN 'D_FLOAT'
         WHEN  12 THEN 'DATE'
         WHEN  13 THEN 'TIME'
         WHEN  14 THEN 'CHAR'
         WHEN  16 THEN 'INT64'
         WHEN  27 THEN 'DOUBLE'
         WHEN  35 THEN 'TIMESTAMP'
         WHEN  37 THEN 'VARCHAR'
         WHEN  40 THEN 'CSTRING'
         WHEN 261 THEN 'BLOB'
         ELSE 'UNKNOWN'
       END AS FIELD_TYPE,
       FL.RDB$FIELD_LENGTH AS FIELD_LENGTH,
       COALESCE(CS.RDB$CHARACTER_SET_NAME,'') AS FIELD_CHARSET
FROM RDB$RELATION_FIELDS RF
LEFT JOIN RDB$FIELDS FL ON RF.RDB$FIELD_SOURCE = FL.RDB$FIELD_NAME
LEFT JOIN RDB$CHARACTER_SETS CS ON FL.RDB$CHARACTER_SET_ID = CS.RDB$CHARACTER_SET_ID
WHERE RF.RDB$RELATION_NAME= :TABLE_NAME
ORDER BY RF.RDB$FIELD_POSITION

Saludos :)

ingabraham 11-06-2014 22:50:58

uff amigo me ahorrastes muchas lineas de codigo
ya que no la encontraba, la armare como una vista para ahorrar un poco de codigo desde delphi.

muchas gracias


La franja horaria es GMT +2. Ahora son las 03:50:07.

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