$q = 'SELECT l.ID,
         c.ID AS CHLG_ID, c.season, c.YEAR,
         g.date, g.opp_team,
         a.NAME AS ANAME,
         ch.NAME AS CHNAME,
         p.AMOUNT,
         u.screenname AS SPONSOR
         FROM game g, accomp_type a, logro l
         LEFT JOIN challenge c ON l.ACC_TYPE_ID=c.ACC_TYPE_ID
         LEFT JOIN patrocinio p ON c.ID=p.CHLNG_ID
         LEFT JOIN charity ch ON c.CHAR_ID=ch.ID
         LEFT JOIN patron pn ON p.PTRN_ID=pn.ID
         LEFT JOIN usuario u ON pn.USER_ID=u.ID
         WHERE l.GAME_ID=?
         AND l.status=?
         AND g.ID=l.GAME_ID
         AND YEAR(g.DATE)=c.YEAR
         AND MONTH(g.date) IN (?, ?, ?)
         AND l.ACC_TYPE_ID=a.ID';
        
$sth = $dbh->prepare($q);
         $sth->execute($self->{_game_id}, $self->{_logro_status}, @$season_mo[0], @$season_mo[1], @$season_mo[2]);
         my $pats_ref = $sth->fetchall_hashref('ID');