Firebird Script VFP

[Jorge Lozano Manifacio]

Hola Amigos, buen dia para todos

Tengo una tabla con scripts. lo que necesito es que se vayan generando algunas tablas segun van avanzando con el sistema, temas de configuracion de usuarios, empresas, etc ... en VFP como puedo ejecutar esos script ... sin tener que utilizar el ISQL 

Panorama : (Previamente se abrieron tanto la base de datos y tabla es un cursor creado

Base de datos : metadatos.fdb

Tabla : Scripts

Campo : Scripts_Proc

select cur_script

do while not eof()

    sqlexec(bd_handle, cur_script.Scripts_Proc)

    skip

enddo

NO SE en que estoy mal .. no marca errores de ejecucion, sin embargo no ejecuta el script ... es muy posible que al teclear esto aqui, se me haya pasado alguna letra por otra .. no hay errores de sintaxis

en Scripts_Proc tengo ...

CREATE TABLE COMPANY (

COMPANY_ID ENTERO,

COMPANY_NAME NOMBRE_CORTO,

USER_CREATED NOMBRE,

DATE_CREATED FECHA_HORA,

USER_UPDATED NOMBRE,

DATE_UPDATED FECHA_HORA

);

ALTER TABLE COMPANY ADD CONSTRAINT PK_COMPANY_ID PRIMARY KEY (COMPANY_ID);

ALTER TABLE COMPANY ADD CONSTRAINT UQ_COMPANY_NAME UNIQUE (COMPANY_NAME) ;

SET TERM ^ ;

CREATE TRIGGER BI_COMPANY_COMPANY_ID FOR COMPANY

ACTIVATE BEFORE INSERT

POSITION 0

AS

BEGIN

IF (NEW.COMPANY_ID IS NEW OR NEW.COMPANY_ID = 0) THEN

NEW.COMPANY_ID = GEN_ID(COMPANY_COMPANY_ID_GEN, 1);

END

SET TERM ; ^

[Antonio Meza]

En el caso del driver ODBC si no mal recuerdo no permite enviar varias sentencias SQL, debe ser una por una!!!! no puedes enviar todo un Script por Odbc desde VFP, 

saludos

Antonio Meza

[Jorge Lozano Manifacio]

Ya logre generar los generadores y dominios .. lo unico que no me ha dejado son las tablas .. 

le puse "@" al inicio de cada instruccion y voy generando las cadenas y enviando el sqlexec de cada renglon (por asi decirlo) ..

pero al llegar a la creacion de la tabla aun quitandole los brincos de renglon y espacios extras no me genera la tabla...

Por ejemplo el renglon de la creacion de la tabla quedaria asi ...

CREATE TABLE COMPANY (COMPANY ENTERO, COMPANY_NAME NOMBRE_CORTO, ...

Alguna sugerencia ?

El miércoles, 29 de enero de 2020, 9:39:48 (UTC-6), Jorge Lozano Manifacio escribió:

[Antonio Meza]

Te recomiendo usar Text / Endtext para generar el codigo SQL y enviarlo por SqlExec!!

Pon un ejemplo completo del codigo SQL que usas para generar la tabla para ver porque te falla.

saludos

Antonio Meza

[Víctor Hugo Espínola Domínguez]

Usa la función AERROR para ver el error.

Saludos,

Víctor.

Lambaré - Paraguay.

--
Visita el Blog de la Comunidad Visual FoxPro en Español: http://comunidadvfp.blogspot.com
---
Has recibido este mensaje porque estás suscrito al grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a publicesvfoxp...@googlegroups.com.
Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/62f8048a-0cad-4c5b-a010-d41f1c13761b%40googlegroups.com.