SQL - filtro bem loco

Filtro bem loco

---------------

 Select        Cliente.Codigo

 from        Produto, Cliente, Venda

 where        Produto.Codigo = Venda.CodigoProduto AND

         Venda.CodigoCliente = Cliente.Codigo AND

         Produto.Codigo IN (P1,P2,P3,P4...Pn)

 group by Cliente.Codigo

 having        count(*) = n