SELECT T.GRUPO
FROM TESTE T
LEFT JOIN
(
SELECT DISTINCT T1.OBJECTO,
(SELECT COUNT(DISTINCT T2.OBJECTO)
FROM TESTE T2
WHERE T2.GRUPO = T1.GRUPO) TOTAL
FROM TESTE T1
WHERE T1.GRUPO = 1. --filtras aqui o grupo
) SS
ON SS.OBJECTO = T.OBJECTO
GROUP BY T.GRUPO
HAVING COUNT(DISTINCT T.OBJECTO) = COUNT(DISTINCT CASE WHEN SS.OBJECTO IS NOT NULL THEN SS.OBJECTO END)
AND COUNT(DISTINCT T.OBJECTO) = MAX(TOTAL)
;A lógica por trás desta query é a seguinte:
A subquery
SELECT DISTINCT T1.OBJECTO,
(SELECT COUNT(DISTINCT T2.OBJECTO)
FROM TESTE T2
WHERE T2.GRUPO = T1.GRUPO) TOTAL
FROM TESTE T1
WHERE T1.GRUPO = 1
tem como objectivo retornar todos os objectos do grupo 1. Esta é a base para o processo. Inicialmente, esta instrução apenas retornava os objectos, foi necessário alterar para retornar também o número total de objectos.
Com este resultado temos tudo o que é necessário para procurar os restantes grupos que têm exactamente os mesmos elementos. Isso é feito através das seguintes instruções:
HAVING COUNT(DISTINCT T.OBJECTO) = COUNT(DISTINCT CASE WHEN SS.OBJECTO IS NOT NULL THEN SS.OBJECTO END)
AND COUNT(DISTINCT T.OBJECTO) = MAX(TOTAL)
A primeira significa, "todos os elementos do grupo (COUNT(DISTINCT T.OBJECTO)) têm que estar no grupo 1 (COUNT(DISTINCT CASE WHEN SS.OBJECTO IS NOT NULL THEN SS.OBJECTO END))"
Finalmente, a instrução COUNT(DISTINCT T.OBJECTO) = MAX(TOTAL) guarante que o grupo tem que possuir o mesmo número de elementos que o grupo 1. Esta instrução é fundamental para excluir os grupos que, como no teu exemplo, apenas têm laranja. Laranja está no grupo 1 mas está fantando a maçã.
O MAX é necessário porque na instrução HAVING apenas podemos usar funções de agregação ou constantes.
Se quiseres obter os objectos para cada um dos grupos (os objectos serão sempre iguais), basta usar a query anterior para filtrar os resultados, por exemplo assim
SELECT T.GRUPO,
T.OBJECTO
FROM TESTE T
INNER JOIN
(
SELECT T.GRUPO
FROM TESTE T
LEFT JOIN
(
SELECT DISTINCT T1.OBJECTO,
(SELECT COUNT(DISTINCT T2.OBJECTO)
FROM TESTE T2
WHERE T2.GRUPO = T1.GRUPO) TOTAL
FROM TESTE T1
WHERE T1.GRUPO = 1. --filtras aqui o grupo
) SS
ON SS.OBJECTO = T.OBJECTO
GROUP BY T.GRUPO
HAVING COUNT(DISTINCT T.OBJECTO) = COUNT(DISTINCT CASE WHEN SS.OBJECTO IS NOT NULL THEN SS.OBJECTO END)
AND COUNT(DISTINCT T.OBJECTO) = MAX(TOTAL)
) X
ON T.GRUPO = X.GRUPO
ORDER BY 1, 2