SQLWIN - RDD libre para SQL
postgres.ch (Rossine)
Hola Rossine,
puedes poner el include "postgres.ch" ?
Muchas gracias.
Saludos,
Felix
puedes poner el include "postgres.ch" ?
Muchas gracias.
Saludos,
Felix
Olá Felix,
o arquivo POSTGRES.CH se encontra em "\XHARBOUR\contrib\pgsql\postgres.ch".
Conteúdo de POSTGRES.CH
o arquivo POSTGRES.CH se encontra em "\XHARBOUR\contrib\pgsql\postgres.ch".
Conteúdo de POSTGRES.CH
Code: Select all
/*
* $Id: postgres.ch,v 1.1 2004/04/30 18:25:01 rodrigo_moreno Exp $
*/
#define CONNECTION_OK 0
#define CONNECTION_BAD 1
#define CONNECTION_STARTED 2
#define CONNECTION_MADE 3
#define CONNECTION_AWAITING_RESPONSE 4
#define CONNECTION_AUTH_OK 5
#define CONNECTION_SETENV 6
#define CONNECTION_SSL_STARTUP 7
#define CONNECTION_NEEDED 8
#define PGRES_EMPTY_QUERY 0
#define PGRES_COMMAND_OK 1
#define PGRES_TUPLES_OK 2
#define PGRES_COPY_OUT 3
#define PGRES_COPY_IN 4
#define PGRES_BAD_RESPONSE 5
#define PGRES_NONFATAL_ERROR 6
#define PGRES_FATAL_ERROR 7
#define PQTRANS_IDLE 0
#define PQTRANS_ACTIVE 1
#define PQTRANS_INTRANS 2
#define PQTRANS_INERROR 3
#define PQTRANS_UNKNOWN 4
Obrigado, Regards, Saludos
Rossine.
xHarbour comercial (xAcc) -> Testando harbour + bcc / msvc
fwh 9.05
Windows XP SP2
Rossine.
xHarbour comercial (xAcc) -> Testando harbour + bcc / msvc
fwh 9.05
Windows XP SP2
- Antonio Linares
- Site Admin
- Posts: 37481
- Joined: Thu Oct 06, 2005 5:47 pm
- Location: Spain
- Contact:
César,
La mayoría confunde los desarrollos de código abierto como "dénmelo todo hecho, gratis y cuanto antes".
Un proyecto "open source" es un proyecto cooperativo y para que la gente coopere tienen que estar interesados y ayudar. Si no hay interés, no cooperan, y sino se coopera, se para el desarrollo.
La cuestión es cooperar, no esperar a que "otros" magicamente hagan el trabajo y encima lo regalen. Mientras no nos mentalicemos de esto, no comprenderemos el verdadero significado y potencial de un proyecto de código abierto.
La mayoría confunde los desarrollos de código abierto como "dénmelo todo hecho, gratis y cuanto antes".
Un proyecto "open source" es un proyecto cooperativo y para que la gente coopere tienen que estar interesados y ayudar. Si no hay interés, no cooperan, y sino se coopera, se para el desarrollo.
La cuestión es cooperar, no esperar a que "otros" magicamente hagan el trabajo y encima lo regalen. Mientras no nos mentalicemos de esto, no comprenderemos el verdadero significado y potencial de un proyecto de código abierto.
- Antonio Linares
- Site Admin
- Posts: 37481
- Joined: Thu Oct 06, 2005 5:47 pm
- Location: Spain
- Contact:
César,
ADORDD, SQLWIN y ahora el IDE, se estan desarrollando como "open source". Son desarrollos cooperativos en donde la comunidad decide la vida ó no de estos proyectos, gracias a su participación..
De la misma forma que FiveTech fundó Harbour y ahora gracias a Harbour y a xHarbour todos seguimos usando el lenguaje Clipper. Ha sido un éxito como proyecto open source para que Clipper no muriese.
Pero la diferencia es que ha habido cooperación. Esa es la clave.
Mientras pensemos que son los "otros" los que tienen que hacer el trabajo, estamos totalmente equivocados. Si queremos tener un ADORDD ó un SQLWIN terminados al 100% tenemos que cooperar.
ADORDD, SQLWIN y ahora el IDE, se estan desarrollando como "open source". Son desarrollos cooperativos en donde la comunidad decide la vida ó no de estos proyectos, gracias a su participación..
De la misma forma que FiveTech fundó Harbour y ahora gracias a Harbour y a xHarbour todos seguimos usando el lenguaje Clipper. Ha sido un éxito como proyecto open source para que Clipper no muriese.
Pero la diferencia es que ha habido cooperación. Esa es la clave.
Mientras pensemos que son los "otros" los que tienen que hacer el trabajo, estamos totalmente equivocados. Si queremos tener un ADORDD ó un SQLWIN terminados al 100% tenemos que cooperar.
Last edited by Antonio Linares on Tue Oct 21, 2008 8:28 am, edited 1 time in total.
- Antonio Linares
- Site Admin
- Posts: 37481
- Joined: Thu Oct 06, 2005 5:47 pm
- Location: Spain
- Contact:
Antonio,Antonio Linares wrote:César,
ADORDD, SQLWIN y ahora el IDE, se estan desarrollando como "open source". Son desarrollos cooperativos en donde la comunidad decide la vida ó no de estos proyectos, gracias a su participación..
De la misma forma que FiveTech fundó Harbour y ahora gracias a Harbour y a xHarbour todos seguimos usando el lenguaje Clipper. Ha sido un éxito como proyecto open source para que Clipper no muriese.
Pero la diferencia es que ha habido cooperación. Esa es la clave.
Mientras pensemos que son los "otros" los que tienen que hacer el trabajo, estamos totalmente equivocados. Si queremos tener un ADORDD ó un SQLWIN terminados al 100% tenemos que cooperar.
Pues exactamente por eso preguntaba, pues he visto que hay varias personas en le proyecto, pero no he visto ninguna mensaje sobre esto en los ultimos dias... Me gustaria mucho participar del proyecto, pero no tengo conocimientos para ayudar... puedo ser un betatester o algo asi.
Saludos,
Kleyber Derick
FWH / xHb / xDevStudio / SQLLIB
FWH / xHb / xDevStudio / SQLLIB
- Daniel Garcia-Gil
- Posts: 2365
- Joined: Wed Nov 02, 2005 11:46 pm
- Location: Isla de Margarita
- Contact:
Me gustaria unirme para aportar mi grano de arena, no conozco tampoco mucho del tema, pero me serviria para aprender, por donde podria empezar o hasta donde se ha llegado? cual seria el siguiente paso o saber si falta algo para terminar o si esta en un "punto de no avance"?, realmente no he seguido el proyecto pero igual me gustaria involucrarme... y no solo en este sino el que pudiera venir, inclusive el IDE
our best documentation is the source code
Isla de Margarita Venezuela.
danielgarciagil@gmail.com
http://tdolphin.blogspot.com/
https://www.dropbox.com/referrals/NTI5N ... rc=global9
Isla de Margarita Venezuela.
danielgarciagil@gmail.com
http://tdolphin.blogspot.com/
https://www.dropbox.com/referrals/NTI5N ... rc=global9
Antonio...
Espero no estar "meando fuera del tiesto", dicho Chileno que grafica profundamente mi inoperancia en estas lides.
Despues de ver el codigo de ADORDD, de ver lo adelantado en el SQLWIN y de revisar unos post en las listas de Harbour.. me surge la siguiente duda e inquietud.
Existen en el directorio de contribuciones a Harbour y de xHarbour las siguientes Clases, Funciones, RDD's que esta desarrollados, algunos terminados, otros en fase beta y otros simplemente iniciados....
Apollo1 ...para Apollo
tMmsql ...para Ms Sql Server
tMysql ...para Mysql
tFireBrd ...para FireBird
tPostgre ...para Postgress
HbSqlit3 ...para Sqlite
Todos haciendo referencia a las funciones basicas de un RDD,soportar las altas, bajas, modificaciones y traer resultados de consultas.
Solo faltaria algo para ORACLE
Como podemos aprovecharnos de estos desarrollos ya adelantados para unirlos bajo una misma clase o replantear el desarrollo del SQLWIN como RDD. Lo permite la licencia GPL, puede un modulo de FWH llamarlos sin modificarlos y solo complementar lo que falta, podemos usarlos como punto de partida para iniciar algo propio de FW ?
Eso...
Espero no estar "meando fuera del tiesto", dicho Chileno que grafica profundamente mi inoperancia en estas lides.
Despues de ver el codigo de ADORDD, de ver lo adelantado en el SQLWIN y de revisar unos post en las listas de Harbour.. me surge la siguiente duda e inquietud.
Existen en el directorio de contribuciones a Harbour y de xHarbour las siguientes Clases, Funciones, RDD's que esta desarrollados, algunos terminados, otros en fase beta y otros simplemente iniciados....
Apollo1 ...para Apollo
tMmsql ...para Ms Sql Server
tMysql ...para Mysql
tFireBrd ...para FireBird
tPostgre ...para Postgress
HbSqlit3 ...para Sqlite
Todos haciendo referencia a las funciones basicas de un RDD,soportar las altas, bajas, modificaciones y traer resultados de consultas.
Solo faltaria algo para ORACLE
Como podemos aprovecharnos de estos desarrollos ya adelantados para unirlos bajo una misma clase o replantear el desarrollo del SQLWIN como RDD. Lo permite la licencia GPL, puede un modulo de FWH llamarlos sin modificarlos y solo complementar lo que falta, podemos usarlos como punto de partida para iniciar algo propio de FW ?
Eso...
Ji,ji,ji... buena la cosa... "all you need is code"
http://www.xdata.cl - Desarrollo Inteligente
----------
Lenovo Legion Y520, 16GB Ram, 1 TB NVME M.2, 1 TB SSD, GTX 1050
http://www.xdata.cl - Desarrollo Inteligente
----------
Lenovo Legion Y520, 16GB Ram, 1 TB NVME M.2, 1 TB SSD, GTX 1050
- Antonio Linares
- Site Admin
- Posts: 37481
- Joined: Thu Oct 06, 2005 5:47 pm
- Location: Spain
- Contact:
Adolfo,
Antes que nada aclarar que SQLWIN no tiene nada que ver con FiveWin. Lo ha iniciado FiveTech, pero desde el primer dia se ha anunciado como open source y libre, pudiendo ser usado libremente con las herramientas que se deseen.
En cuanto a los RDDs que mencionas, la diferencia es (salvo que me equivoque) que ninguno está basado en el USRRDD, excepto el ADORDD, que iniciamos entre Fernando Sanchez y yo.
La idea de SQLWIN es que use SQL exclusivamente, sin usar las particularidades propias de cada motor de base de datos. Es decir, la misma filosofia que el ODBC. Esos RDDs que mencionas estan basados especificamente en el API de cada motor de base de datos que usa.
De todas formas, como he comentado, el futuro de SQLWIN depende del interés que haya por él. Esto es obvio
Antes que nada aclarar que SQLWIN no tiene nada que ver con FiveWin. Lo ha iniciado FiveTech, pero desde el primer dia se ha anunciado como open source y libre, pudiendo ser usado libremente con las herramientas que se deseen.
En cuanto a los RDDs que mencionas, la diferencia es (salvo que me equivoque) que ninguno está basado en el USRRDD, excepto el ADORDD, que iniciamos entre Fernando Sanchez y yo.
La idea de SQLWIN es que use SQL exclusivamente, sin usar las particularidades propias de cada motor de base de datos. Es decir, la misma filosofia que el ODBC. Esos RDDs que mencionas estan basados especificamente en el API de cada motor de base de datos que usa.
De todas formas, como he comentado, el futuro de SQLWIN depende del interés que haya por él. Esto es obvio
Antonio,
Analisando os arquivos: dbcmd.c, dbf1.c, quando se usa DBFCDX o xhb chama as seguintes funções:
1) HB_FUNC( DBRLOCK ) <- dbcmd.c
2) static ERRCODE hb_dbfLockRecord( DBFAREAP pArea, ULONG ulRecNo, BOOL * pResult, BOOL bExclusive ) <- dbf1.c
Usando SQLWIN é chamado:
1) HB_FUNC( DBRLOCK ) <- dbcmd.c
2) static function SQL_LOCK( nWA, aLockInfo ) <- sqlwin.prg
Eu montei a função SQL_LOCK assim:
Quando executo a função "dbrlock()" o registro é travado e retorna .T., mas se executo novamente o mesmo
programa em outra janela do window, "dbrlock()" retorna .T., sendo que deveria retornar .F. Usando DBFCDX isto funciona.
O que preciso mudar ou adicionar para "SQL_LOCK" funcionar ?
Analisando os arquivos: dbcmd.c, dbf1.c, quando se usa DBFCDX o xhb chama as seguintes funções:
1) HB_FUNC( DBRLOCK ) <- dbcmd.c
2) static ERRCODE hb_dbfLockRecord( DBFAREAP pArea, ULONG ulRecNo, BOOL * pResult, BOOL bExclusive ) <- dbf1.c
Usando SQLWIN é chamado:
1) HB_FUNC( DBRLOCK ) <- dbcmd.c
2) static function SQL_LOCK( nWA, aLockInfo ) <- sqlwin.prg
Eu montei a função SQL_LOCK assim:
Code: Select all
static function SQL_LOCK( nWA, aLockInfo )
local aWAData := USRRDD_AREADATA( nWA )
local nResult, xRecId, i
aLockInfo[ UR_LI_METHOD ] := DBLM_MULTIPLE
aLockInfo[ UR_LI_RECORD ] := aWAData[ WA_RECNO ] && RECNO()
aLockInfo[ UR_LI_RESULT ] := .T.
aWAData [ WA_LOCK ] := .T. && Rossine 22/10/08
RETURN SUCCESS
programa em outra janela do window, "dbrlock()" retorna .T., sendo que deveria retornar .F. Usando DBFCDX isto funciona.
O que preciso mudar ou adicionar para "SQL_LOCK" funcionar ?
Obrigado, Regards, Saludos
Rossine.
xHarbour comercial (xAcc) -> Testando harbour + bcc / msvc
fwh 9.05
Windows XP SP2
Rossine.
xHarbour comercial (xAcc) -> Testando harbour + bcc / msvc
fwh 9.05
Windows XP SP2