Changeset 72b77ba in tol

Timestamp:

Nov 19, 2008, 8:53:00 AM (18 years ago)

Author:

Víctor de Buen <vdebuen@…>

Branches:

1941-docker-image-to-test, devel, master

Children:

016bb96

Parents:

8640fff

Message:

New method SqlSelectDual

git-svn-id: ​https://www.tol-project.org/svn/tolp/trunk@191 be4846ae-f051-483a-831f-b64e7d08527f

File:

• tol/stdlib/data/db/engine/_sql.tol (modified) (5 diffs)

tol/stdlib/data/db/engine/_sql.tol

@@ -349 +349 @@
 //////////////////////////////////////////////////////////////////////////////
 
+//////////////////////////////////////////////////////////////////////////////
+Text SqlFormatDating(
+  Text field,  // Nombre del campo de tipo fecha en la BBDD
+  Text fecOri, // Granularidad de las fechas del campo
+  Text fecDes, // Granularidad de las fechas de la expresión resultante
+  Real gestor) // Gestor en el que va la expresión
+//////////////////////////////////////////////////////////////////////////////
+{
+ ""
+};
 
 //////////////////////////////////////////////////////////////////////////////
@@ -431 +441 @@
     EQ(gestor, GesOra), "to_char("+ txt +")",
     EQ(gestor, GesMys), "cast("+ txt +" as char)",
-    EQ(gestor, GesPos), "to_char("+ txt +")",
+    EQ(gestor, GesPos), "cast("+ txt +" as char varying)",
     EQ(gestor, GesTer), "rtrim(cast("+ txt +" as char(255)))",    
     EQ(gestor, GesAcc), "SqlConvertText. Access. Opción por implementar."
@@ -469 +479 @@
      Gestor==GesMic, "STDEV("+Field+")",
      Gestor==GesMys, "STD("+Field+")",
-         Gestor==GesPos, "STDDEV("+Field+")",
+     Gestor==GesPos, "STDDEV("+Field+")",
      1,              "To Implement"
    )
@@ -487 +497 @@
      Gestor==GesPos, "MOD("+Divider+", "+Divisor+")",
      Or(Gestor==GesMic, Gestor==GesMys), Divider+" % "+Divisor,
+     Gestor==GesTer, "MOD("+Divider+", "+Divisor+")",
      1,              "To Implement"
    )
@@ -1705 +1716 @@
 //////////////////////////////////////////////////////////////////////////////
 
+//////////////////////////////////////////////////////////////////////////////
+Text SqlSelectDual(Real gestor)
+//////////////////////////////////////////////////////////////////////////////
+{
+  Text Case
+  (
+    EQ(gestor, GesMic), "", // não implementado
+    EQ(gestor, GesOra), " FROM DUAL",
+    EQ(gestor, GesMys), "",
+    EQ(gestor, GesPos), "", // não implementado
+    EQ(gestor, GesTer), "", // não implementado
+    EQ(gestor, GesAcc), "" // não implementado
+  )
+};
+//////////////////////////////////////////////////////////////////////////////
+PutDescription(
+"Retorna a senteça de tabela default.
+", SqlSelectDual);
+//////////////////////////////////////////////////////////////////////////////
+
+//////////////////////////////////////////////////////////////////////////////
+Text SqlCastExprAsReal(Text expr, Real gestor)
+//////////////////////////////////////////////////////////////////////////////
+{
+  Text Case
+  (
+    EQ(gestor, GesMic), "SqlCastExprAsReal. MSSql. Opción por implementar.",
+    EQ(gestor, GesOra), "to_number("+expr+") ",
+    EQ(gestor, GesMys), "POWER("+expr+",1.0) ",
+    EQ(gestor, GesPos), "SqlCastExprAsReal. PostGres. Opción por implementar.",
+    EQ(gestor, GesTer), "SqlCastExprAsReal. Teradata. Opción por implementar.",
+    EQ(gestor, GesAcc), "SqlCastExprAsReal. Access. Opción por implementar."
+  )
+};
+//////////////////////////////////////////////////////////////////////////////
+PutDescription(
+"Retorna la sentencia que hace una conversión de una expresión (puede ser 
+un número o una combinación de columnas hacia un número.
+", SqlCastExprAsReal);
+//////////////////////////////////////////////////////////////////////////////