SQLWIN - RDD libre para SQL

postgres.ch (Rossine)

Postby Baxajaun » Mon Oct 13, 2008 12:37 pm

Hola Rossine,

puedes poner el include "postgres.ch" ?

Muchas gracias.

Saludos,

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

Postby Rossine » 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  Expand view
/*
* $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++
Rossine
 
Posts: 344
Joined: Tue Oct 11, 2005 11:33 am

Postby Kleyber » Mon Oct 20, 2008 5:41 pm

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

Saludos,
Kleyber Derick

FWH / xHb / xDevStudio / SQLLIB
User avatar
Kleyber
 
Posts: 581
Joined: Tue Oct 11, 2005 11:28 am
Location: São Luiz, Brasil

Postby sysctrl2 » Mon Oct 20, 2008 8: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 "
User avatar
sysctrl2
 
Posts: 951
Joined: Mon Feb 05, 2007 7:15 pm

Postby Antonio Linares » Mon Oct 20, 2008 9: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
User avatar
Antonio Linares
Site Admin
 
Posts: 41314
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Postby sysctrl2 » 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 "
User avatar
sysctrl2
 
Posts: 951
Joined: Mon Feb 05, 2007 7:15 pm

Postby wmormar » Tue Oct 21, 2008 5: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
User avatar
wmormar
 
Posts: 1073
Joined: Fri Oct 07, 2005 10:41 pm
Location: México

Postby Antonio Linares » Tue Oct 21, 2008 8: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.
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: 41314
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Postby Antonio Linares » Tue Oct 21, 2008 8: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
User avatar
Antonio Linares
Site Admin
 
Posts: 41314
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Postby wmormar » Tue Oct 21, 2008 8:58 am

Antonio,

Gracias por contestar.

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

méxico.sureste
User avatar
wmormar
 
Posts: 1073
Joined: Fri Oct 07, 2005 10:41 pm
Location: México

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

Postby Daniel Garcia-Gil » Tue Oct 21, 2008 2: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
User avatar
Daniel Garcia-Gil
 
Posts: 2365
Joined: Wed Nov 02, 2005 11:46 pm
Location: Isla de Margarita

Postby Adolfo » Tue Oct 21, 2008 9: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, 1 TB NVME M.2, 1 TB SSD, GTX 1650
User avatar
Adolfo
 
Posts: 846
Joined: Tue Oct 11, 2005 11:57 am
Location: Chile

Postby Antonio Linares » 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 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
User avatar
Antonio Linares
Site Admin
 
Posts: 41314
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Postby Rossine » Thu Oct 23, 2008 6: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  Expand view
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++
Rossine
 
Posts: 344
Joined: Tue Oct 11, 2005 11:33 am

PreviousNext

Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 32 guests

cron