GARANTIR DESCONTO

Fórum adoquery + access database em delphi #562148

12/09/2016

0

estou com o seguinte problema, preciso de uma pesquisa que retorne o valor, já testei:

Vdocumento := '12345'; // número da nota fiscal
Vdesdobra := '1'; // número de parcelas



DM.ADOQ_sa_contas.Close;
DM.ADOQ_sa_contas.SQL.Clear;
DM.ADOQ_sa_contas.SQL.Add('Select * from contas where tipo=1 and classificador=1 and numero=''Vdocumento'' and desdobra=''Vdesdobra''');
DM.ADOQ_sa_contas.Open;


DM.ADOQ_sa_contas.Close;
DM.ADOQ_sa_contas.SQL.Clear;
DM.ADOQ_sa_contas.SQL.Add('Select * from contas where tipo=1 and classificador=1 and numero='+QuotedStr(Vdocumento)+' and desdobra='QuotedStr(Vdesdobra));
DM.ADOQ_sa_contas.Open;

DM.ADOQ_sa_contas.Close;
DM.ADOQ_sa_contas.SQL.Clear;
DM.ADOQ_sa_contas.SQL.Add('Select * from contas where tipo=1 and classificador=1 and numero= :Vdocumento and desdobra= :Vdesdobra');
DM.ADOQ_sa_contas.Parameters.ParamByName('Vdocumento').Value := QuotedStr(Vdocumento);
DM.ADOQ_sa_contas.Parameters.ParamByName('Vdesdobra').Value := QuotedStr(Vdesdobra);
DM.ADOQ_sa_contas.Open;

DM.ADOQ_sa_contas.Close;
DM.ADOQ_sa_contas.SQL.Clear;
DM.ADOQ_sa_contas.SQL.Add('Select * from contas where tipo=1 and classificador=1 and numero= :Vdocumento and desdobra= :Vdesdobra');
DM.ADOQ_sa_contas.Parameters.ParamByName('Vdocumento').DataType := ftString;
DM.ADOQ_sa_contas.Parameters.ParamByName('Vdesdobra').DataType := ftString;
DM.ADOQ_sa_contas.Parameters.ParamByName('Vdocumento').Value := QuotedStr(Vdocumento);
DM.ADOQ_sa_contas.Parameters.ParamByName('Vdesdobra').Value := QuotedStr(Vdesdobra);
DM.ADOQ_sa_contas.Open;

São campos com números mas do tipo texto no banco Access...
porem não consigo que ele retorne as informação que preciso, como data e valor do documento referente.

Fico muito agradecido se puderem me ajudar.
Marcos

Marcos

Responder

Post mais votado

12/09/2016

Olá!

Tente a opção 3, mudando o "Value" para "AsString"

Jones

Jones Granatyr

Jones Granatyr
Responder

Gostei + 1

Mais Posts

12/09/2016

Marcos

O Adoquery não aceita, .Parameters.ParamByName... ele não tem somente .Parameters.
eu até havia tentado, mas não tem.
Obrigado
Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar