Duvida no Insert

Delphi

21/07/2005

strsql:=´insert into receitas(datavenda,codigo,descricao,variacao,quantidade,tiporeceita,medico)values´;
strsql:=´(select datavenda,codigo,descricao,variacao,quantidade,tiporeceita,medico from ´:Copacabana:produtocx2.DB´) where produtocx2.datavenda between :per1 and :per2 and produtocx2.codigo<>:nada´;

Estou usando esse comando para incluir em uma tabela o conteudo de outra, mas da erro no select, aonde estou errando? :)


Rjcerri

Rjcerri

Curtidas 0

Respostas

Beppe

Beppe

21/07/2005

Tire os ( ) que envolvem o select até o where.


GOSTEI 0
Rjcerri

Rjcerri

21/07/2005

Tirei os () mas deu esse erro

Invalid use of keyword
Token:select datavenda,codigo,descricao,variacao,quantidade,tiporeceita,medico Line Number 1

ficou assim

strsql:=´insert into receitas(datavenda,codigo,descricao,variacao,quantidade,tiporeceita,medico)values´;
strsql:=strsql+´ select datavenda,codigo,descricao,variacao,quantidade,tiporeceita,medico from ´:Copacabana:produtocx2.DB´ where datavenda between :per1 and :per2 and codigo<>:nada and medico<>:nada´;


GOSTEI 0
Beppe

Beppe

21/07/2005

Ah, eu não tiha visto que o select participava do insert. Neste caso, coloque o ( ) envolvendo o select inteiro, assim:

´(select datavenda,codigo,descricao,variacao,quantidade,tiporeceita,medico from ´:Copacabana:produtocx2.DB´ where datavenda between :per1 and :per2 and codigo<>:nada and medico<>:nada)´

Deve ser isto, mas nunca usei dessa forma.


GOSTEI 0
Rjcerri

Rjcerri

21/07/2005

Ja tinha feito isso e a mensagem de erro e a mesma.


GOSTEI 0
POSTAR