Quick Tips : Dicas de Firebird

Olá galera, nesta Quick Tips, irei mostrar algumas dicas de FireBird, veja abaixo :

--DESCOBRINDO AS CHAVES PRIMARIAS DE UMA TABELA

SELECT RDB$FIELD_NAME

FROM

RDB$RELATION_CONSTRAINTS C,

RDB$INDEX_SEGMENTS S

WHERE C.RDB$RELATION_NAME = 'FUNCIONARIO'

  AND C.RDB$CONSTRAINT_TYPE = 'PRIMARY KEY'

  AND S.RDB$INDEX_NAME = C.RDB$INDEX_NAME

ORDER BY RDB$FIELD_POSITION

--DESCOBRINDO AS CHAVES ESTRANGEIRAS DE UMA TABELA

SELECT RDB$FIELD_NAME , C.RDB$RELATION_NAME

FROM

RDB$RELATION_CONSTRAINTS C,

RDB$INDEX_SEGMENTS S

WHERE C.RDB$RELATION_NAME = 'CLIENTE'

  AND C.RDB$CONSTRAINT_TYPE = 'FOREIGN KEY'

  AND S.RDB$INDEX_NAME = C.RDB$INDEX_NAME

ORDER BY RDB$FIELD_POSITION

--PEGANDO A DATA DO SERVIDOR

SELECT CURRENT_DATE FROM RDB$DATABASE;

--ZERANDO UM GENERATOR

SET GENERATOR GEN_Cliente_ID TO 0;

Fico por aqui ate à próxima Quick Tips.

Um abraço

Wesley Y

wyamazack@rwsolution.com.br