Utlizar el INSERT INTO
Publicado por Gabriel (427 intervenciones) el 07/04/2014 00:53:25
Amigos :
Muy buenas Tardes...
En esta oportunidad necesito me puedan decir que estoy haciendo mal al intentar pasar 2 campos de un Cursor a una tabla dbf.
SELECT * from … ;
INTO CURSOR Temp READWRITE
lnFiles = xCANTREG
FOR i=1 TO lnfiles
* INSERT INTO asn_bl ( carpeta, num_bl ) VALUES ( "azul", "vlai2h400" ) && con valores simples funciona
Local mierror
TRY
BEGIN TRANSACTION
SELECT asn_bl
INSERT INTO asn_bl SELECT carpeta, num_bl FROM Temp
END TRANSACTION
CATCH TO mierror
MESSAGEBOX("Se ha producido un error: "+ mierror.message,0+16,"Aviso del Sistema")
ROLLBACK
ENDTRY
ENDFOR
Me podrian decir en que estoy obrando mal en el codigo para que funcione correctamente el INSERT INTO
atte.,
Gabriel
Muy buenas Tardes...
En esta oportunidad necesito me puedan decir que estoy haciendo mal al intentar pasar 2 campos de un Cursor a una tabla dbf.
SELECT * from … ;
INTO CURSOR Temp READWRITE
lnFiles = xCANTREG
FOR i=1 TO lnfiles
* INSERT INTO asn_bl ( carpeta, num_bl ) VALUES ( "azul", "vlai2h400" ) && con valores simples funciona
Local mierror
TRY
BEGIN TRANSACTION
SELECT asn_bl
INSERT INTO asn_bl SELECT carpeta, num_bl FROM Temp
END TRANSACTION
CATCH TO mierror
MESSAGEBOX("Se ha producido un error: "+ mierror.message,0+16,"Aviso del Sistema")
ROLLBACK
ENDTRY
ENDFOR
Me podrian decir en que estoy obrando mal en el codigo para que funcione correctamente el INSERT INTO
atte.,
Gabriel
Valora esta pregunta


0