FiveTech Software tech support forums

Code: Select all  Expand view

cCadsql1 := "SELECT campo1,campo2,campo3 FROM tala1 INNER JOIN tabla2 ON ;
tabla1.campo1 = tabla2.campo2 INNER JOIN tabla2 ON tabla2.campo21 = tabla3.campo4  ;
WHERE (tabla1.campo3<>'') AND (tabla3.campo2 < '3') and tabla2.campo3>0 ;
order by tabla1.campo3"

mariordz wrote:Estimados amigos del foro, despues de meses en que la empresa compró la actualización de FWH (ahora tenemos la 16.04) por fin le estoy dando uso, y se me presenta este pequeño detalle, con la versión anterior de fivewin definia una variable en multiples líneas asi:

Code: Select all  Expand view

cCadsql1 := "SELECT campo1,campo2,campo3 FROM tala1 INNER JOIN tabla2 ON ;
tabla1.campo1 = tabla2.campo2 INNER JOIN tabla2 ON tabla2.campo21 = tabla3.campo4  ;
WHERE (tabla1.campo3<>'') AND (tabla3.campo2 < '3') and tabla2.campo3>0 ;
order by tabla1.campo3"

En esta nueva versión no me esta respeytando el ";" como indicador de salo de línea, tienen alguna idea de como corregir este detalle? La verdad es que hay muchas llamadas a SQL desde el sistema que estoy migrando y modificar todas ellas me llevaría un buen tiempo, además de que no me es practico tener la sentencia en una sola línea que sería demasiado larga.

Saludos.

Code: Select all  Expand view

local cCadsql1 := "SELECT campo1,campo2,campo3 FROM tala1 INNER JOIN tabla2 ON " + ;
"tabla1.campo1 = tabla2.campo2 INNER JOIN tabla2 ON tabla2.campo21 = tabla3.campo4 " + ;
"WHERE (tabla1.campo3<>'') AND (tabla3.campo2 < '3') and tabla2.campo3>0 " + ;
"order by tabla1.campo3"
 

Code: Select all  Expand view

TEXT INTO cCadsql1

ENDTEXT
 

Code: Select all  Expand view

cCadsql1 := "SELECT campo1,campo2,campo3 FROM tala1 INNER JOIN tabla2 ON " + ;
"tabla1.campo1 = tabla2.campo2 INNER JOIN tabla2 ON tabla2.campo21 = tabla3.campo4 " +;
"WHERE (tabla1.campo3<>'') AND (tabla3.campo2 < '3') and tabla2.campo3>0 " +;
"order by tabla1.campo3"
 

Code: Select all  Expand view

   cSql := "SELECT db.id_referencia_bancaria, db.cedula_cliente, db.cedula_dueno, "
   cSql += "td.tipo_dato_td, db.id_banco, bc.banco, db.id_tipo_cuenta, db.pax "

   cSql += "FROM tbl_datos_bancarios AS db "

   cSql += "LEFT JOIN tbl_tipos_datos_td  AS td ON db.id_tipo_dato_td = td.id_tipo_dato_td "

   cSql += "WHERE db.cedula_cliente = " + ClipValue2SQL( aVarCtt[1] ) + " "

   cSql += "ORDER BY db.cuenta_nombre_titular"

   TRY
      oQry := TDolphinQry():New( cSql, oDatos:oConex )
   CATCH oError
      ShowError( oError, cSql )
   END
 

Code: Select all  Expand view

    oRsPay:Source               := "SELECT " +;
                                            "*," +;
                                            "Puestos.*," +;
                                            "Departamentos.*," +;
                                            "Bancos.*," +;
                                            "Tipos.* " +;
                                        "FROM " +;
                                            "Empleados " +;
                                        "LEFT JOIN " +;
                                            "Puestos " +;
                                        "ON " +;
                                            "Empleados.EMP_CIA = Puestos.PUE_CIA " +;
                                        "AND " +;
                                            "Empleados.EMP_PUE = Puestos.PUE_PUE " +;
                                        "LEFT JOIN " +;
                                            "Departamentos " +;
                                        "ON " +;
                                            "Empleados.EMP_CIA = Departamentos.DEP_CIA " +;
                                        "AND " +;
                                            "Empleados.EMP_DEP = Departamentos.DEP_DEP " +;
                                        "LEFT JOIN " +;
                                            "Bancos " +;
                                        "ON " +;
                                            "Empleados.EMP_CIA = Bancos.BAN_CIA " +;
                                        "AND " +;
                                            "Empleados.EMP_BAN = Bancos.BAN_BAN " +;
                                        "LEFT JOIN " +;
                                            "Tipos " +;
                                        "ON " +;
                                            "Empleados.EMP_CIA = Tipos.TIP_CIA " +;
                                        "AND " +;
                                            "Empleados.EMP_TIN = Tipos.TIP_TIP " +;
                                        "ORDER BY " +;
                                            "EMP_AYN"