with T1 as
(
select distinct pays, type_milieu_a,count(no_menage) as occur
from total.liste_site inner join total.v_liste_menage using(no_site,pays)

where  date_enquete_m is not null
group by pays, type_milieu_a
)
,T2 as
(select distinct type_milieu_a,sum(occur) as tot1 from T1 group by type_milieu_a order by tot1 desc limit 5)
,T3 as
(select distinct pays,case when T2.type_milieu_a is null then 'Autres' else T2.type_milieu_a end as type_milieu_a,sum(occur) as occur
from T1 left join T2 using(type_milieu_a) group by pays,T2.type_milieu_a )
,T4 as
(select distinct pays,sum(occur) as tot_occur from T1 group by pays)

select distinct pays as ABSCISSE,type_milieu_a as GROUPE,occur/ tot_occur*100 as TOTAL from T3
inner join T4 using(pays)
order by ABSCISSE