SQLWIN - RDD libre para SQL

User avatar
Baxajaun
Posts: 853
Joined: Wed Oct 19, 2005 2:17 pm
Location: Gatika. Bizkaia

postgres.ch (Rossine)

Post by Baxajaun »

Hola Rossine,

puedes poner el include "postgres.ch" ?

Muchas gracias.

Saludos,

Felix
Rossine
Posts: 343
Joined: Tue Oct 11, 2005 11:33 am

Post by Rossine »

Olá Felix,

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
User avatar
Kleyber
Posts: 581
Joined: Tue Oct 11, 2005 11:28 am
Location: São Luiz, Brasil

Post by Kleyber »

A cuantas anda este proyecto? No he leido nada desde hace unos dias.

Saludos,
Kleyber Derick

FWH / xHb / xDevStudio / SQLLIB
User avatar
sysctrl2
Posts: 833
Joined: Mon Feb 05, 2007 7:15 pm
Contact:

Post by sysctrl2 »

mmm, solo esperamos que no pase, igual como adordd, que se quedo en el camino,

al igual que visual fw,,


saludos.
Cesar Cortes Cruz
SysCtrl Software
Mexico

' Sin +- FWH es mejor "
User avatar
Antonio Linares
Site Admin
Posts: 37481
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain
Contact:

Post by Antonio Linares »

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.
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
sysctrl2
Posts: 833
Joined: Mon Feb 05, 2007 7:15 pm
Contact:

Post by sysctrl2 »

Deacuerdo, contigo Antonio,

yo creo que fivetech es una empresa grande e importante,

que bien podria terminar bien los proyectos,

sin importar que sean free o de paga,

lo importante es terminar lo que se inicia,

saludos..
Cesar Cortes Cruz
SysCtrl Software
Mexico

' Sin +- FWH es mejor "
User avatar
wmormar
Posts: 1050
Joined: Fri Oct 07, 2005 10:41 pm
Location: México
Contact:

Post by wmormar »

Antonio,

El IDE será opensource?

Si es así, de donde podríamos ver el código para irlo revisando y poder aportar ideas?
William, Morales
Saludos

méxico.sureste
User avatar
Antonio Linares
Site Admin
Posts: 37481
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain
Contact:

Post by Antonio Linares »

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.
Last edited by Antonio Linares on Tue Oct 21, 2008 8:28 am, edited 1 time in total.
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
Posts: 37481
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain
Contact:

Post by Antonio Linares »

William,

Si, el IDE va a ser totalmente open source.

Esperamos publicarlo cuanto antes, una vez esté lo suficientemente estable para proporcionar una primera versión.
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
wmormar
Posts: 1050
Joined: Fri Oct 07, 2005 10:41 pm
Location: México
Contact:

Post by wmormar »

Antonio,

Gracias por contestar.

estoy emocionado por probar esa maravilla (para los mexicanos, sin albur, jjejjejje).
William, Morales
Saludos

méxico.sureste
User avatar
Kleyber
Posts: 581
Joined: Tue Oct 11, 2005 11:28 am
Location: São Luiz, Brasil

Post by Kleyber »

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.
Antonio,
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
User avatar
Daniel Garcia-Gil
Posts: 2365
Joined: Wed Nov 02, 2005 11:46 pm
Location: Isla de Margarita
Contact:

Post by Daniel Garcia-Gil »

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
User avatar
Adolfo
Posts: 815
Joined: Tue Oct 11, 2005 11:57 am
Location: Chile
Contact:

Post by Adolfo »

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...
;-) 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
User avatar
Antonio Linares
Site Admin
Posts: 37481
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain
Contact:

Post by Antonio Linares »

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 :-)
regards, saludos

Antonio Linares
www.fivetechsoft.com
Rossine
Posts: 343
Joined: Tue Oct 11, 2005 11:33 am

Post by Rossine »

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:

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
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 ?
Obrigado, Regards, Saludos

Rossine.

xHarbour comercial (xAcc) -> Testando harbour + bcc / msvc
fwh 9.05
Windows XP SP2
Post Reply