ActiveDelphi

[sfl]

Ola estou com problema com essa consulta, vou portar ela completa para melhor entendimento, mas o meu problema e nesse final;

ProcMov.SQL.Add(''''''''''''''''''''''''''''''''and RESPONDER ='''''''''''''''''''''''''''''''');
ProcMov.SQL.Add(''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''+DataInicial+'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''');

ProcMov.SQL.Add(''''''''''''''''''''''''''''''''or FIMPAZO ='''''''''''''''''''''''''''''''');
ProcMov.SQL.Add(''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''+DataInicial+'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''');

ProcMov.SQL.Add(''''''''''''''''''''''''''''''''or PRAZOCPC ='''''''''''''''''''''''''''''''');
ProcMov.SQL.Add(''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''+DataInicial+'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''');


veja preciso busca a mesma data em 03 colunas diferrentes, o comando OR deveria fucionare ate funciona so que da foam como esta ele não filtra pelo "and Tipo = ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''Ord.Servico", e tras os dados idepente do Tipo.
Dai não funciona, pos trás todos os campos dataa mas e como se despresasse o codigo escrito acima na função
alguma ideia de como resolver?



//***************
procedure TForm1.MonthCalendar1Click(Sender: TObject);
var
VDestinatario : String;
DataInicial:String;
dataFinal:String;

Begin
ProcMov.Filtered := false;

VDestinatario := FuncionarioCODIGO.AsString;
DataInicial := FormatDateTime(''''''''''''''''''''''''''''''''DD/MM/YYYY'''''''''''''''''''''''''''''''', MonthCalendar1.Date);
dataFinal := FormatDateTime(''''''''''''''''''''''''''''''''DD/MM/YYYY'''''''''''''''''''''''''''''''', MonthCalendar1.Date);

DataInicial :=FormatDateTime(''''''''''''''''''''''''''''''''mm/dd/yyyy'''''''''''''''''''''''''''''''',StrToDate(DataInicial));
dataFinal :=FormatDateTime(''''''''''''''''''''''''''''''''mm/dd/yyyy'''''''''''''''''''''''''''''''',StrToDate(dataFinal));


ProcMov.Active := false;
ProcMov.Close;

if ProcMov.State<>dsinactive then ProcMov.Close;
ProcMov.SQL.Clear;

ProcMov.SQL.Add(''''''''''''''''''''''''''''''''Select * from ADVPROCMOV'''''''''''''''''''''''''''''''');
ProcMov.SQL.Add(''''''''''''''''''''''''''''''''Where DESTINATARIO<0>='''''''''''''''''''''''''''''''');
ProcMov.SQL.Add(''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''+DataInicial+'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''');
ProcMov.SQL.Add(''''''''''''''''''''''''''''''''and RESPONDER <ProcMov>='''''''''''''''''''''''''''''''');
ProcMov.SQL.Add(''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''+DataInicial+'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''');
ProcMov.SQL.Add(''''''''''''''''''''''''''''''''and FIMPAZO <ProcMov>='''''''''''''''''''''''''''''''');
ProcMov.SQL.Add(''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''+DataInicial+'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''');
ProcMov.SQL.Add(''''''''''''''''''''''''''''''''and PRAZOCPC <='''''''''''''''''''''''''''''''');
ProcMov.SQL.Add(''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''+DataFinal+'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''');
ProcMov.SQL.Add(''''''''''''''''''''''''''''''''order by PRAZOCPC, HORA Asc'''''''''''''''''''''''''''''''');

end;


if RadioGroup1.ItemIndex = 3
then begin;

ProcMov.SQL.Add(''''''''''''''''''''''''''''''''and RESPONDER ='''''''''''''''''''''''''''''''');
ProcMov.SQL.Add(''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''+DataInicial+'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''');

ProcMov.SQL.Add(''''''''''''''''''''''''''''''''or FIMPAZO ='''''''''''''''''''''''''''''''');
ProcMov.SQL.Add(''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''+DataInicial+'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''');

ProcMov.SQL.Add(''''''''''''''''''''''''''''''''or PRAZOCPC ='''''''''''''''''''''''''''''''');
ProcMov.SQL.Add(''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''+DataInicial+'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''');



ProcMov.SQL.Add(''''''''''''''''''''''''''''''''order by PRAZOCPC, HORA Asc'''''''''''''''''''''''''''''''');

end;

ProcMov.Active := false;
ProcMov.Close;

ProcMov.Open;

[joemil]

pq esse monte de aspas simples? da uma organizada. fica ate dificil saber o problema
_________________
<b>SEMPRE COLOQUE [RESOLVIDO] NO SEU POST</b>
Enviar imagens: http://tinypic.com/

[pestana]

Como o Joemil disse esta difícil entender, explique novamente o problema e de uma organizada.
_________________
Ao invés de ficar desanimado no que deu de errado, olhe para frente, aprenda com os erros e veja o que ainda pode ser feito. A determinação e a persistência é uma das etapas para o sucesso.