Hola Rossine,
puedes poner el include "postgres.ch" ?
Muchas gracias.
Saludos,
Felix
/*
* $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
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.
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
Return to FiveWin para Harbour/xHarbour
Users browsing this forum: Google [Bot] and 39 guests