Listar las llaves primarias de una tabla FireBird
 

Esta consulta SQL muestra los campos que conforman la llave primaria de una tabla FireBird...

Código SQL [-]
select s.rdb$field_name from rdb$indices i
INNER JOIN rdb$index_segments s ON(i.rdb$unique_flag=1 and
i.rdb$relation_name=:tabla and s.rdb$index_name=i.rdb$index_name)

Esta consulta me sirvió para hacer un aplicativo que actualizaba información de una BD a otra, para la cual era necesario usar la sentencia UPDATE.

Como ven la consulta tiene un parametro llamado :tabla, el cual es el nombre de la tabla.

Saludos a todos!. He adoptado como caballo de batalla el InterBase, pero hube de limitarme a la versión 5.5 pues con la 6 ya tenía problemas de bloqueo del PC, y tengo entendido que el FireBird es un perfeccionamiento del InterBase, realizado por programadores "libres" por lo que planeo "migrar" a esta base de datos.

Quisiera agregar algo, ya que la sentencia anterior regresa todos los indices del tipo UNIQUE para obtener solamente los campos de la llave primaria podemos utilizar la siguiente sentencia SQL

Código SQL [-]
select s.*
from (rdb$indices i INNER JOIN rdb$index_segments s ON (i.rdb$unique_flag=1 and i.rdb$relation_name=:tabla and s.rdb$index_name=i.rdb$index_name)) INNER JOIN rdb$relation_constraints A
      ON s.rdb$index_name=a.rdb$index_name and rdb$constraint_type = 'PRIMARY KEY'

Indices Primarios
 

IGUAL ADIONANDO LA ULTIMA LINEA

Código SQL [-]
select s.rdb$field_name, I.* from rdb$indices i
INNER JOIN rdb$index_segments s ON(i.rdb$unique_flag=1 and
i.rdb$relation_name=:tabla and s.rdb$index_name=i.rdb$index_name)
WHERE I.RDB$INDEX_ID = 1

GRACIAS JHONNY, KIPOW :)

"Parecemos" novatos, escribiendo todo en mayúsculas, no poniendo las etiquetas para el código... ;)