FiveTech Support Forums

FiveWin / Harbour / xBase community
Board indexAll discussionsLogin (GitHub)
Board index FiveWin para Harbour/xHarbour SQLWIN - RDD libre para SQL
Baxajaun
Posts: 990
Joined: Wed Oct 19, 2005 02:17 PM
postgres.ch (Rossine)
Posted: Mon Oct 13, 2008 12:37 PM

Hola Rossine,

puedes poner el include "postgres.ch" ?

Muchas gracias.

Saludos,

Felix

Rossine
Posts: 344
Joined: Tue Oct 11, 2005 11:33 AM
SQLWIN - RDD libre para SQL
Posted: Mon Oct 13, 2008 12:45 PM
Ol谩 Felix,

o arquivo POSTGRES.CH se encontra em "\XHARBOUR\contrib\pgsql\postgres.ch".

Conte煤do de POSTGRES.CH

Code: Select all Collapse
/*
 * $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.



Harbour and Harbour++
Kleyber
Posts: 581
Joined: Tue Oct 11, 2005 11:28 AM
SQLWIN - RDD libre para SQL
Posted: Mon Oct 20, 2008 05:41 PM

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

Saludos,

Kleyber Derick



FWH / xHb / xDevStudio / SQLLIB
sysctrl2
Posts: 1144
Joined: Mon Feb 05, 2007 07:15 PM
SQLWIN - RDD libre para SQL
Posted: Mon Oct 20, 2008 08:32 PM

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 "
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
SQLWIN - RDD libre para SQL
Posted: Mon Oct 20, 2008 09:02 PM

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
sysctrl2
Posts: 1144
Joined: Mon Feb 05, 2007 07:15 PM
SQLWIN - RDD libre para SQL
Posted: Tue Oct 21, 2008 12:17 AM

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 "
wmormar
Posts: 1076
Joined: Fri Oct 07, 2005 10:41 PM
SQLWIN - RDD libre para SQL
Posted: Tue Oct 21, 2008 05:28 AM

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
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
SQLWIN - RDD libre para SQL
Posted: Tue Oct 21, 2008 08:24 AM

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.

regards, saludos

Antonio Linares
www.fivetechsoft.com
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
SQLWIN - RDD libre para SQL
Posted: Tue Oct 21, 2008 08:27 AM

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
wmormar
Posts: 1076
Joined: Fri Oct 07, 2005 10:41 PM
SQLWIN - RDD libre para SQL
Posted: Tue Oct 21, 2008 08:58 AM

Antonio,

Gracias por contestar.

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

William, Morales

Saludos



m茅xico.sureste
Kleyber
Posts: 581
Joined: Tue Oct 11, 2005 11:28 AM
SQLWIN - RDD libre para SQL
Posted: Tue Oct 21, 2008 02:17 PM
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
Daniel Garcia-Gil
Posts: 2365
Joined: Wed Nov 02, 2005 11:46 PM
SQLWIN - RDD libre para SQL
Posted: Tue Oct 21, 2008 02:48 PM

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/NTI5Njk4MDc1OQ?src=global9
Adolfo
Posts: 883
Joined: Tue Oct 11, 2005 11:57 AM
SQLWIN - RDD libre para SQL
Posted: Tue Oct 21, 2008 09:46 PM

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
----------
Asus TUF F15, 32GB Ram, 2 * 1 TB NVME M.2, GTX 1650
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
SQLWIN - RDD libre para SQL
Posted: Tue Oct 21, 2008 10:20 PM

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 Mancera 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: 344
Joined: Tue Oct 11, 2005 11:33 AM
SQLWIN - RDD libre para SQL
Posted: Thu Oct 23, 2008 06:25 PM
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 Collapse
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.



Harbour and Harbour++
Static archive 路 New replies & topics via GitHub Discussions