#! /usr/bin/awk -f
{
        FS=","
}
END     {
                for (K in u)
                        if (u[K] > 1)
                                print d[K]
        }
{
        k = $5 SUBSEP $6 SUBSEP $7;
        u[k]++;
        d[k] = d[k] ? d[k] RS $0: $0

}