|
|
Postada em 24/06/2004 16:30 hs
galera, tenho uma tabela que tem os seguinte campos: CadPagamento (Tabela) DatPgtParcUnica - (Campo) DatPgtParc5 - (Campo) Como podem ver sao campos de datas de pagamentos, criei 2 texts, para data inicial e data final, queria criar uma formula para o crystal 8.0, que, quando eu digitar a data inicial e a data final, o relatorio me mostrassse todos os pagamentos registrados nesse periodo, isso buscando nos 6 campos. Comecei a criar uma formula, mas nao funcionou, vejam: .SelectionFormula = "{CadPagamento.DatPgtParcUnica} >=date(" & Format(Text1.Text, "yyyy,mm,dd") & ")..... and {CadPagamento.DatPgtParcUnica} >=date(" & Format(Text2.Text, "yyyy,mm,dd") & ")"........ Enfim alguem, poderia me mostrar como poço fazer isso???
|
|
|
|
|
|
|
|
Postada em 24/06/2004 16:42 hs
"{CadPagamento.DatPgtParcUnica} >= Date(" & Year(txtInicial) & "," & Month(txtInicial) & "," & Day(txtInicial) & ") And {CadPagamento.DatPgtParcUnica} <= Date(" & Year(txtFinal) & "," & Month(txtFinal) & "," & Day(txtFinal) & ")"
eu uso isso no 4.6 mas pode dar certo...
________________________ Té + Que NIMB role bons Dados! 
|
|
|
|
|
|
Postada em 24/06/2004 16:43 hs
Caro amigo o que esta de errado na sua formula é o and vc tem que usar or fazendo para cada campo SelectionFormula="({CadPagamento.DatPgtParcUnica} >=date(" & Format(Text1.Text, "yyyy,mm,dd") & ") and {CadPagamento.DatPgtParcUnica}<=date(" & Format(Text2.Text, "yyyy,mm,dd") &") or (data1>=text1 and data1<=text2) or ....." Entendeu tipo assim (data1>=text1 and data1<=text2) or (data2>=text1 and data2<=text2) or ...... assim por diante até o 6 |
|
|
|
|
|
Postada em 24/06/2004 17:12 hs
veja como eu fiz, mas nao funcionou: .SelectionFormula = "{CadPagamento.DatPgtParcUnica} >=date(" & Format(Text1.Text, "yyyy,mm,dd") & ") or {CadPagamento.DatPgtParc1} >=date(" & Format(Text1.Text, "yyyy,mm,dd") & ") or {CadPagamento.DatPgtParc2} >=date(" & Format(Text1.Text, "yyyy,mm,dd") & ") or {CadPagamento.DatPgtParc3} >=date(" & Format(Text1.Text, "yyyy,mm,dd") & ") or {CadPagamento.DatPgtParc4} >=date(" & Format(Text1.Text, "yyyy,mm,dd") & ") or {CadPagamento.DatPgtParc5} >=date(" & Format(Text1.Text, "yyyy,mm,dd") & ") and {CadPagamento.DatPgtParcUnica} >=date(" & Format(Text2.Text, "yyyy,mm,dd") & ") or {CadPagamento.DatPgtParc1} >=date(" & Format(Text2.Text, "yyyy,mm,dd") & ") or {CadPagamento.DatPgtParc2} >=date(" & Format(Text2.Text, "yyyy,mm,dd") & ") or {CadPagamento.DatPgtParc3} >=date(" & Format(Text2.Text, "yyyy,mm,dd") & ") or {CadPagamento.DatPgtParc4} >=date(" & Format(Text2.Text, "yyyy,mm,dd") & ") or {CadPagamento.DatPgtParc5} >=date(" & Format(Text2.Text, "yyyy,mm,dd") & ")"
eu o erro, Run-time 20515 o estaria errado.. |
|
|
|
|
|
Postada em 25/06/2004 09:01 hs
e ai galera, quem poderia me ajudar???? esta dando erro ainda... |
|
|
|
|
|
Postada em 25/06/2004 13:17 hs
Pessoal, pelo amor de deus, alguem por favor me ajude..... |
|
|
|
|
