o mesmo parâmetro 2 vezes

Como faço para passar o mesmo parâmetro 2 vezes em uma estrutura master/detail?
ex:

Select I.Qtd, I.Cod_pm, I.Cod_produto, I.STATUS, P.Descricao, P.UF
From Itens I, produtos P
Where
I.cod_produto = P.cod_produto
P.Cod_pm = :COD_PM

UNION ALL

Select I.Qtd, I.Cod_pm, I.Cod_produto, I.STATUS, P.Descricao, P.UF
From Itens I, produtos P
Where
I.cod_produto = P.cod_produto
P.Cod_pm = :COD_PM

a parte de baixo não retorna valor, se eu executar num editor de sql retorna, mas via delphi não funciona o 2º parametro.
desde jáh obg galera.