PROBLEMAS VB X CRYSTAL

USUARIO.EXCLUIDOS 08/06/2005 19:49:51
#87874

Pessoal, por favor me ajudem.
Sempre gerei relatorios do vv pelo crystal e nunca vi este erro e muito menos sei a causa dele.
Estou gerando relatorios sintetico e analitico..
os dois geram normalmente tanto um como outro.
Porem se eu gerar primeiro o analitico e depois o sintetico me é mostrada a seguinte mensagem de erro
RUN-TIME ERRO 20553
INVALID PARAMETER FIELD NAME

Porque ocorre esta mensagem, se q2uando eu gero primeiro o sintetico fica tudo ok?
Segue abaixo o codigo de geração do relatorio, sintetico e analitico

SINTETICO
crysrela.Connect = "Provider=SQLOLEDB.1; data source=ma; User ID=sa; pwd=teste; Initial Catalog=Mrtt;"
crysrela.ReportFileName = App.Path & "\Relatorioselaguiasint.rpt"

crysrela.SelectionFormula = "{vwrelaguia1.codguia}= '" & txtcodcli.Text & "' and {vwrelaguia1.datalanc}>=date(" & Format(txtdtinicial.Text, "yyyy,mm,dd") & ") AND {VWRELAGUIA1.DATALANC} <= date(" & Format(txtdtfinal.Text, "yyyy,mm,dd") & ") AND {VWRELAGUIA1.EXPR1}<>0 and {VWRELAGUIA1.CARIMBO}<>''"
crysrela.ParameterFields(0) = "Data1;" & txtdtinicial.Text & ";true"
crysrela.ParameterFields(1) = "Data2;" & txtdtfinal.Text & ";true"
crysrela.Action = 1

ANALITICO
crysrela.Connect = "Provider=SQLOLEDB.1; data source=ma; User ID=sa; pwd=teste; Initial Catalog=Mrtt;"
crysrela.ReportFileName = App.Path & "\Relatorioselaguiaanacomis.rpt"
crysrela.SelectionFormula = "{vwrelaguia2.codguia} = '" & txtcodcli.Text & "' and {vwrelaguia2.datalanc}>=date(" & Format(txtdtinicial.Text, "yyyy,mm,dd") & ") AND {VWRELAGUIA2.DATALANC} <= date(" & Format(txtdtfinal.Text, "yyyy,mm,dd") & ") AND {VWRELAGUIA2.EXPR1}<>0 and {VWRELAGUIA2.CARIMBO} <> ''"
crysrela.ParameterFields(0) = "Data1;" & txtdtinicial.Text & ";true"
crysrela.ParameterFields(1) = "Data2;" & txtdtfinal.Text & ";true"
crysrela.ParameterFields(2) = "Estorno;" & estornogeral & ";true"
crysrela.ParameterFields(3) = "Comissao;" & comissaogeral & ";true"
crysrela.Action = 1

Desde já, obrigado