Erro Em Procedure

[Treinee]

Prezados

Estou executando a procedure abaixo para apagar registros de várias tabelas. Na execução dá um erro, que eu não consigo identificar a origem.

Peço a todos ajuda para resolvê-lo.

create procedure apagar as

declare variable id_prod integer;

begin

for

select produto from produtos where cod_produto = '402' and tipo_prod = 'AC'

into :id_prod

do

begin

delete from altprecos where produto= :id_prod;

delete from atualiza_custo where produto=:id_prod;

delete from codigo_barras where produto= :id_prod;

delete from cor_prod where produto=:id_prod;

delete from espec_produtos where produto= :id_prod;

delete from estampa_prod where produto= :id_prod;

delete from estoques where produto= :id_prod;

delete from fechamento_estoque where produto= :id_prod;

delete from fichas_custo where produto= :id_prod;

delete from fichas_tecnicas where produto= :id_prod;

delete from followup_pedidos where produto= :id_prod;

delete from fornec_produto where produto= :id_prod;

delete from fotos where produto= :id_prod;

delete from impostos_produtos where produto= :id_prod;

delete from i_precos where produto= :id_prod;

delete from item_coletor where produto= :id_prod;

delete from item_fechamento_estoque where produto= :id_prod;

delete from local_estoque where produto= :id_prod;

delete from metas_produtos where produto= :id_prod;

delete from movimento_producao where produto= :id_prod;

delete from mov_estoque where produto= :id_prod;

delete from niveis_estoque where produto= :id_prod;

delete from obs_item where produto= :id_prod;

delete from precos where produto= :id_prod;

delete from produtos_eventos where produto = :id_prod;

delete from produtos_inventarios where produto = :id_prod;

delete from produto_pedidoc where produto= :id_prod;

delete from produto_pedidov where produto= :id_prod;

delete from produto_prefat where produto= :id_prod;

delete from tam_prod where produto= :id_prod;

delete from produtos where produto=:id_prod;

end

end

O erro é o seguinte:

********* Error:

Column does not belong to referenced table.

Dynamic SQL Error.

SQL error code = -206.

Column unknown.PRODUTO.

unknown ISC error 336397208.

Obrigado, desde já, pela ajuda.

[quintelab]

Cara não sei exatamente em qual linha, mas em algumas dessas tabelas que você executa o delete ou na do select não existe esta coluna PRODUTO.

[Treinee]

Kadosh, muito grato pela ajuda. Era esse mesmo o problema.

[Dr. House]

rapaz, pelo q parece é algum campo que não pertence à tabela... o problema é que ele não diz a linha onde ta o erro......

tente anular linha por linha pra verificar se paassa

usa /* texto*/ pra poder anular cada liinha da procedure pra ver se passa... espero q ajude...