trabajo con dos bases datos
Publicado por juan carlos (14 intervenciones) el 09/05/2003 18:15:33
Hola amigos
Quiero pedir ayuda sobre este problema
Tengo una base de datos y quiero copiar una tabla de esta a otra bases de datos por una opción sistema (botón) , pero no hasta el momento no se como puedo hacerlo
La base donde tengo la información es contb2002.db y la quiero que se traspase la información de la tabla es contb2003.db
Por defecto el sistema ya tiene abierta la bases contb2002.db
** Como lo puedo hacer **
Ejemplo:
transaction sqlca2
sqlca2 = CREATE transaction
SQLCA2.DBMS = 'odbc'
SQLCA2.servername = ''
SQLCA2.database = "CONTB2003.db"
SQLCA2.logid = ''
SQLCA2.logpass = ''
SQLCA2.userid='dba'
sqlca2.dbpass='sql'
sqlca2.dbparm="ConnectString='DSN=contb2003;UID=dba;PWD=sql'"
DECLARE busca_datos_plan CURSOR FOR
SELECT "contab_plan"."codigo","contab_plan"."descricipcion"
FROM "contab_plan" ;
WHERE "contb_plan"."codigo" > 0;
OPEN busca_datos_plan;
FETCH busca_datos_plan INTO :codigo,:nombre;
DO WHILE SQLCA.SQLCODE=0
//--------------------------------------------------------------------------------------------------
AQUÍ ES DONDE QUIERO GRABAR LA INFORMACIÓN A LA OTRA TABLA DE LA OTRA BASE DE DATOS
INSERT "contab_plan_de_cuenta" ( "empresa","codigo_contable", "descripcion" )
VALUES ( :p_emp2,:p_cod2 ) ;
//--------------------------------------------------------------------------------------------------
FETCH busca_datos_plan INTO :p_codigo,:nombre;
LOOP
CLOSE BUSCA_datos_plan;
Quiero pedir ayuda sobre este problema
Tengo una base de datos y quiero copiar una tabla de esta a otra bases de datos por una opción sistema (botón) , pero no hasta el momento no se como puedo hacerlo
La base donde tengo la información es contb2002.db y la quiero que se traspase la información de la tabla es contb2003.db
Por defecto el sistema ya tiene abierta la bases contb2002.db
** Como lo puedo hacer **
Ejemplo:
transaction sqlca2
sqlca2 = CREATE transaction
SQLCA2.DBMS = 'odbc'
SQLCA2.servername = ''
SQLCA2.database = "CONTB2003.db"
SQLCA2.logid = ''
SQLCA2.logpass = ''
SQLCA2.userid='dba'
sqlca2.dbpass='sql'
sqlca2.dbparm="ConnectString='DSN=contb2003;UID=dba;PWD=sql'"
DECLARE busca_datos_plan CURSOR FOR
SELECT "contab_plan"."codigo","contab_plan"."descricipcion"
FROM "contab_plan" ;
WHERE "contb_plan"."codigo" > 0;
OPEN busca_datos_plan;
FETCH busca_datos_plan INTO :codigo,:nombre;
DO WHILE SQLCA.SQLCODE=0
//--------------------------------------------------------------------------------------------------
AQUÍ ES DONDE QUIERO GRABAR LA INFORMACIÓN A LA OTRA TABLA DE LA OTRA BASE DE DATOS
INSERT "contab_plan_de_cuenta" ( "empresa","codigo_contable", "descripcion" )
VALUES ( :p_emp2,:p_cod2 ) ;
//--------------------------------------------------------------------------------------------------
FETCH busca_datos_plan INTO :p_codigo,:nombre;
LOOP
CLOSE BUSCA_datos_plan;
Valora esta pregunta


0