migrar dbf a Postgres

1,123 views
Skip to first unread message

Carlos Ramon Caballero Gunther

unread,
Dec 15, 2010, 9:07:06 AM12/15/10
to Comunidad de Visual Foxpro en Español
Hola a la comunidad de visual foxpro

tengo un programa, donde descargo los datos de un reloj biometrico
a un archivo dbf, necesito pasar a Postgres para alimentar un sistema
que maneja la base de datos en Postgres.
Me puedo conectar desde visual fox 9 sp2 por medio de ODBC
pero no puedo migrar los datos
les envio un ejemplo, pero no me funciona
si alguien me puede ayudar gracias
STORE SQLCONNECT('PostgreSQL30', 'postgres', '12345') TO gnConnHandle
IF gnConnHandle <= 0
IF AERROR(laError) > 0
MESSAGEBOX('No fue posible establecer conexion:'+laError[2], 16,
'Error de Conexion a Postgres')
ENDIF
ELSE
= MESSAGEBOX('Conexion realizada', 48, 'Conectado a Postgres')
USE tl_marcacion
SCAN
SCATTER MEMVAR
TEXT TO cExp TEXTMERGE NOSHOW
INSERT INTO marcacion(cod_emplea,inoutmode,verifycode);
VALUES (?m.cod_emplea,?m.inoutmode,?m.verifycode)
ENDTEXT
nErr = SQLEXEC(gnConnHandle,cExp)
=SQLCOMMIT(gnConnHandle)
MESSAGEBOX(cod_emplea)
SELECT tl_marcacion
ENDSCAN
= SQLDISCONNECT(gnConnHandle)
ENDIF

Carlos Caballero



carlos SALCEDO

unread,
Dec 15, 2010, 9:22:43 AM12/15/10
to publice...@googlegroups.com

Hola carlos

Con respecto a migrar puedes hacerlo con odbc
es decir creas una coneccion dns y luego exportas tabla por tabla

en cuanto a los insert mejor create una funcion que guarde actualice
anule etc

Bendiciones

Carlos


> Date: Wed, 15 Dec 2010 06:07:06 -0800
> Subject: [vfp] migrar dbf a Postgres
> From: ccarl...@hotmail.com
> To: publice...@googlegroups.com

Guillermo Cantillo

unread,
Aug 4, 2012, 3:32:46 PM8/4/12
to publice...@googlegroups.com
cAddress = 'localhost'
cUser = 'postgres'
cPassword= 'vivikupa32607918'
cBD = 'MAPA'
lcRutaServer=ALLTRIM(cAddress)
lcPort = '5432'
lcBaseDatos=cBD
lcUser=ALLTRIM(cUser)
lcPasword=LOWER(cPassword)
lcConC = "Provider=MSDASQL;Driver={PostgreSQL ANSI};SERVER=&lcRutaServer;port=&lcPort;DATABASE=&lcBaseDatos;UID=&lcUser;PWD=&lcPasword;"
cadena = SQLSTRINGCONNECT(lcConC)
    if cadena >0
    else
       wait wind 'Error al conectarse'
       cadena = 0
    ENDIF
    RETURN cadena
y para migrar dbf a postgres 
1-  COPY TO C:\TEMP\TBLEMPGB.txt CSV
donde temp puede ser el directorio que tu elijas y esta instruccion la corres desde vfp teniendo en uso la tabla a exportar
debes tener la fecha en set century on y formato ansi

2-  copy TBLEMPGB     from '/TEMP/TBLEMPGB.TXT'     CSV header

DONDE TBLEMPGB ES TU TABLA DE POSTGRES Y TBLEMPGB ES LA TABLA QUE CONTIENE LOS DATOS EN FORMATO CSV SE LE COLOCA HEADER PARA QUE SEPA QUE TIENE ENCABEZADOS Y DEBEN SER DE LA MISMA LONGITUD Y TIPO

Dani Martinez

unread,
Aug 6, 2012, 9:12:27 AM8/6/12
to publice...@googlegroups.com
Exactamente que error te da y donde para que te podamos ayudar
Por lo que veo lo único que no me cuadra es el commit si en las propiedades por defecto es autocommit
Pero el resto tiene buena pinta


Reply all
Reply to author
Forward
0 new messages