Hola,
Estoy comenzando a probar SQL para ir abandonando el uso de DBF's.
Para realizar pruebas tengo instalado un servidor mysql en una raspberry.
Pero no se por donde empezar ADORDDD, Tdolphin ....
驴Alguna sugerencia?
Hola,
Estoy comenzando a probar SQL para ir abandonando el uso de DBF's.
Para realizar pruebas tengo instalado un servidor mysql en una raspberry.
Pero no se por donde empezar ADORDDD, Tdolphin ....
驴Alguna sugerencia?
Te aconsejo
TDolphin En el foro hay bastante ayuda.
Saludos,
Adhemar
Hola,
Mi kit incluye:
Xampp
TDolphin
HeidiSql
Aconsejable tambien MySql Workbench.
Espero te sirva
gracias
Google translator:
Si desea convertir las aplicaciones que utilizan DBF to SQL:
ADS
SQLRDD
ADORDD
ADORDD es el que garantiza el 100% de compatibilidad con el c贸digo de su aplicaci贸n.
No es necesario cambiar una sola l铆nea de c贸digo y DBF desde cargado a SQL en cuesti贸n de minutos.
Usando RDD puede cambiar f谩cilmente entre RDDS
ADORDD Soporta todos los principales motores de bases de datos con el mismo c贸digo.
ADORDD funciona como cualquier otro RDD pero tambi茅n se puede utilizar SQL o ambos. No hay l铆mites.
La principal imitaci贸n d ADORDD es que s贸lo funciona en Windows, ya que requiere MS ADO.
Todas las dem谩s soluciones son muy buenas, pero significa que cambian por completo el c贸digo de su apica莽茫o que a menudo es imposible.
Puede comprobar el FAQ ADORDD el foro en Ingl茅s.
cBusca := "SELECT "
cBusca += "productos.registro, " 聽 聽 聽 聽 聽// 聽1
cBusca += "productos.cod_producto, " 聽 聽 聽// 聽2
cBusca += "productos.producto, " 聽 聽 聽 聽 聽// 聽3
cBusca += "productos.unidad, " 聽 聽 聽 聽 聽 聽// 聽4
cBusca += "productos.codbar1, " 聽 聽 聽 聽 聽 // 聽5
cBusca += "productos.cod_proveedor, " 聽 聽 // 聽6
cBusca += "productos.cod_marca, " 聽 聽 聽 聽 // 聽7
cBusca += "productos.cod_grupo, " 聽 聽 聽 聽 // 聽8
cBusca += "productos.puntos, " 聽 聽 聽 聽 聽 聽// 聽9
cBusca += "proveedor.razon_social, " 聽 聽 聽// 聽10
cBusca += "marca.detalle AS cmarca, " 聽 聽 // 聽11
cBusca += "grupo.detalle AS cgrupo, " 聽 聽 // 聽12
cBusca += "productos.percepcion, " 聽 聽 聽 聽// 聽13
cBusca += "productos.impuesto_p, " 聽 聽 聽 聽// 聽14
cBusca += "productos.observaciones, " 聽 聽 // 聽15
cBusca += "IFNULL((SELECT registro FROM imagenes WHERE imagenes.cod_producto = productos.cod_producto),0) AS imagen " 聽// 16
cBusca += "FROM productos "
cBusca += "LEFT JOIN proveedor ON productos.cod_proveedor = proveedor.ruc_dni "
cBusca += "LEFT JOIN marca ON productos.cod_marca = marca.codigo "
cBusca += "LEFT JOIN grupo ON productos.cod_grupo = grupo.codigo "
IF !EMPTY(cProve) .OR. !EMPTY(cMarca) .OR. !EMPTY(cGrupo)
聽 cBusca += "WHERE "
EndIf
cBusca += IF(!EMPTY(cProve), "productos.cod_proveedor = '" + cProve + "' ", "")
If !EMPTY(cProve) .AND. !EMPTY(cMarca)
聽 cBusca += " AND "
EndIf
cBusca += IF(!EMPTY(cMarca), "productos.cod_marca = '" + cMarca + "' ", "")
If !EMPTY(cMarca) .AND. !EMPTY(cGrupo)
聽 cBusca += " AND "
EndIf
cBusca += IF(!EMPTY(cGrupo), "productos.cod_grupo = '" + cGrupo + "' ", "")
cBusca += "GROUP BY productos.cod_producto " 聽 聽 聽 聽 聽 // importante para que no se dispare el join
If nOrden = 1
聽 聽cBusca += "ORDER BY productos.producto "
聽 ElseIF nOrden = 2
聽 聽cBusca += "ORDER BY productos.utilidad_p "
聽 ElseIF nOrden = 3
聽 聽cBusca += "ORDER BY productos.puntos "
EndIf
oProduc := SQLQry(oMySQL, oProduc, cBusca) 聽 聽 聽 聽// la informaci贸n "mezclada" de 5 tablas en un objeto de datos
aProduc := SQLQryA(oMySQL, aProduc, cBusca) 聽 聽 聽 聽// los mismos datos en un array