No encuentro el error en esta sentencia Sql.....

[verito_83mdq]

Buenas a todos!!! Tengo un problema con esta sentencia, es un Insert bastante comun pero lo que quiero hacer es partirla en varias lineas ya que la que realmente tengo que usar tiene muchos campos y se me hace muy larga en una sola linea. Cuando compilo en Delphi me marca error en la linea que sigue de la consulta Sql, se que el error esta en la consulta porque si la anulo complila bien. Esta es la sentencia:

Código SQL [-]
   with QueryDataModule.ConyugeZQuery do 
                begin 
                     If active then close; 
                     SQL.Clear; 
                     SQL.Add('Insert Into cliente(Apellido,Nombre)'); 
                     SQL.Add('Values (:Apel,:Nom)'); 
                     ParamByName('Apel').Value:=AltasForm.ApellidoEdit.Text; 
                     ParamByName('Nom').Value:=AltasForm.NombreEdit.Text; 
                     ExecSQL; 
                end; 
              end;

Este es el error que arroja:

Código Delphi [-]
Declaration expected but identifier 'xxxx' found

Espero que me puedan ayudar!! Desde ya muchas Gracias!

[roman]

Así como la pones, no le veo ningún problema. Tendríamos que ver cómo estás partiendo la consulta.

// Saludos

[Casimiro Notevi]

Declaration expected but identifier 'xxxx' found

¿Ese es el mensaje exacto?, ¿identifier 'xxxx'?

[verito_83mdq]

Gracias por contestar! Roman no entiendo eso que dijistes q tendriamos que ver como estás partiendo la consulta, así es como lo tengo en el delphi copie el código y lo pegue acá. Casimiro puse xxx por poner algo, quise decir que no es que me tira siempre la misma linea si anulo esa linea me salta el error en la que sigue. Gracias a los dos, que estaré haciendo mal? Saludos!

[Casimiro Notevi]

Pero copia y pega aquí el mensaje exacto, que tenemos la bola de cristal en el servicio técnico y hasta el lunes no está lista.

[verito_83mdq]

Código SQL [-]
with QueryDataModule.ConyugeZQuery do 
                begin 
                     If active then close; 
                     SQL.Clear; 
                     SQL.Add('Insert Into cliente(Apellido,Nombre)'); 
                     SQL.Add('Values (:Apel,:Nom)'); 
                     ParamByName('Apel').Value:=AltasForm.ApellidoEdit.Text; 
                     ParamByName('Nom').Value:=AltasForm.NombreEdit.Text; 
                     ExecSQL; 
                end; 
              end;

Código Delphi [-]
  QueryDataModule.ClienteZQuery.Close;

                 flag:=False;

                 NuevaTarjetaForm.Close;

                 AltasForm.Close;

                 release;

Código Delphi [-]
[Error] DatosVentas.pas(419): Declaration expected but identifier 'QueryDataModule' found

Ahí Esta Todo, lo que te explicaba hoy es que abajo de la consulta tengo el código que sigue
si anulo el ClienteZQuery.Close, me tira error en flag, y así continuo hasta el End.
Saludos!

[Casimiro Notevi]

¿Y qué hay antes de
QueryDataModule ?