trigger e store procedure via codigo na aplicação

Carissimos boa noite   Tenho uma aplicação em delphi 7 FB 2.0 ZEOS 6.6.5 stable multicamada   Antes de iniciar o Data Module, coloquei uma funcão na aplicação a qual verifica se o banco de dados que estou abrindo falta algum campo, bem, se falta então mando criar um campo, criar uma tabela, alterar um tamanho de campo.  até ai está uma maravilha. Meu problema esta nas store procedures e trigger criadas diretamente no banco.  Essa benditas eu não consigo alterar via codigo.  Copia exatamente igual esta funcionando no banco e na hora de rodar a aplicação ou seja ela teria que fazer o seguinte:   DROP trigger Comprado1 DROP procedure SdComprado   RECREATE PROCEDURE SDCOMPRADO (
 PCODIGO VARCHAR(13))
AS
 DECLARE VARIABLE VSALDO FLOAT;
BEGIN
  BEGIN
    SELECT SUM(PEDIDOCSUB.QUANTIDADE-PEDIDOCSUB.FATURADO) AS VSALDO
    FROM
    PEDIDOCSUB
    INNER JOIN PEDIDOC ON (PEDIDOCSUB.PEDIDO=PEDIDOC.PEDIDO)
    WHERE
    (PEDIDOC.SITUACAO = '1') AND
    (PEDIDOCSUB.CODIGO = :pcodigo)
    GROUP BY PEDIDOCSUB.CODIGO
    INTO:VSALDO;
  END   UPDATE ESTOQUE
  SET ESTOQUE.COMPRADO=:VSALDO
  WHERE ESTOQUE.CODIGO=:pcodigo;
  BEGIN
  SUSPEND;
  END
END   em seguida deveria recriar a trigger conforme abaixo   CREATE TRIGGER COMPRADO1 FOR PEDIDOCSUB
ACTIVE AFTER INSERT POSITION 0
AS
BEGIN
  EXECUTE PROCEDURE SDCOMPRADO(NEW.CODIGO);
END   No entanto quando começa a criar a procedure ela dá um erro -104 e diz que na linha 1 coluna 313 tem algo que não foi identificado.  Então eu cheguei até a coluna 313 e percebi que ele diz que o sinal de ":" não esta sendo reconhecido ou é invalido.  O interessante é que esta exatamente igual no banco e funcionando faz 11 meses. Não mudei versão de banco nem de componente nada. Gostaria de saber se alguem se habilita a responder? Até um tempo atras eu tentei fazer isso mas como estava com pouco tempo acabei abandonando, mas naquela epoca, havio lido algo do tipo que quando se escreve um procedure ou uma trigger via codigo, parece que tem que eliminar o cabeçalho da mesma, não consigo me lembrar, portanto estou pedindo ajuda.
Mas vejam bem o codigo acima esta funcionando no banco hoje.  e se eu criar a mesma coisa com nome diferente diretamente no aplicativo de gerenciador de BD ele funciona normal.  Só não funciona quando eu tento criar via codigo no delphi.   obrigado a quem puder ajudar