From ac5ba3fa10ae4202295b071105df0d54cd21169e Mon Sep 17 00:00:00 2001
From: tiagosoares <tiagosoares@b08c6af1-5177-4d33-ba66-4b1c6b8b522a>
Date: Tue, 17 Jan 2006 18:07:06 +0000
Subject: [PATCH] MyDDAS: Changed translate/3 only for a particular case, for
 April

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1520 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
---
 library/MYDDAS/myddas_prolog2sql.yap | 17 +++++++++--------
 1 file changed, 9 insertions(+), 8 deletions(-)

diff --git a/library/MYDDAS/myddas_prolog2sql.yap b/library/MYDDAS/myddas_prolog2sql.yap
index 873a5340f..70ad85ac1 100644
--- a/library/MYDDAS/myddas_prolog2sql.yap
+++ b/library/MYDDAS/myddas_prolog2sql.yap
@@ -1016,8 +1016,9 @@ query_atom(query(Select,From,Where),QueryList,Diff):-
 query_atom(agg_query(Function,Select,From,Where,Group),QueryList,Diff):-
    clause_atom('SELECT',Function,Select,',',QueryList,X1),
    clause_atom('FROM',From,',',X1,X2),
-   clause_atom('WHERE',Where,'AND',X2,X3),
-   clause_atom('GROUP BY',Group,',',X3,Diff).
+   clause_atom('WHERE',Where,'AND',X2,Diff).
+%ILP : PARA NAO POR OS GROUP BYS. FAZER FLAG PARA ISTO
+   %clause_atom('GROUP BY',Group,',',X3,Diff).
 
 query_atom(negated_existential_subquery(Select,From,Where),QueryList,Diff):-
    column_atom('NOT EXISTS(',QueryList,X1),   
@@ -1056,12 +1057,12 @@ clause_atom(Keyword,[Column|RestColumns],Junctor,QueryList,Diff):-
 
 %DISTINCT
 clause_atom(Keyword,'COUNTDISTINCT',[Column],Junctor,QueryList,Diff):-!,
-   column_atom(Keyword,QueryList,X1),
-   column_atom(' ',X1,X2),
-   column_atom('COUNT',X2,X3),
-   column_atom('(DISTINCT ',X3,X4),
-   clause_atom([Column],Junctor,X4,X5),
-   column_atom(') ',X5,Diff).
+	column_atom(Keyword,QueryList,X1),
+	column_atom(' ',X1,X2),
+	column_atom('COUNT',X2,X3),
+	column_atom('(DISTINCT ',X3,X4),
+	clause_atom([Column],Junctor,X4,X5),
+	column_atom(') ',X5,Diff).
 
 clause_atom(Keyword,Function,[Column],Junctor,QueryList,Diff):-
    column_atom(Keyword,QueryList,X1),