fazend FK usando trigger

Firebird

10/02/2005

Galera...

eu non achei nada no forum sobre isso... talvez tenha procurado errado...

bom eh o seguinte

To fazendo as FKs do bd td pelas trigger pq os indices criados pelas Fks estavam mto ineficases

    if (not exists (select o.cod_emp
                from tabemp o
                where o.cod_emp=new.cod_emp
             )
     ) then
     exception fk_integridadereferencial;


isso funca... mas eu queria fazer c msgs personalisadas e vi na revista clube delphi 56 q o FB permite fazer assim

    if (not exists (select o.cod_emp
                from tabemp o
                where o.cod_emp=new.cod_emp
             )
     ) then
     exception fk_integridadereferencial
     ´Erro no campo Código Empresa ´ || new.cod_emp;


mas dae gera o seguinte erro
Dynamic exception messages arent´t supported


estou usando Fb 1.5 no linux
delphi 6
e Ibexertp 2003.11.06

alguem tem alguma solucao?
Obrigado


Osocram

Osocram

Curtidas 0
POSTAR