Dmitry, thanks for your correction. But it still dont work.
It works without this correction in dialect 1.
Thanks.

--- In IBObjects@y..., "Dmitry Beloshistov" <torin@s...> wrote:
> > SQL.Add('execute procedure poliza_polmod :polpro,:polcod');
> Please replace you code to:
> SQL.Add('Execute procedure poliza_polmod(:polpro,:polcod)');
> You have error in SQL statement text....
>
> WBR, Dmitry Beloshistov AKA [-=BDS=-]
> e-mail: torin@s...
>
> ----- Original Message -----
> From: "Manuel Fresneda" <manuelfresnedaguerra@y...>
> To: <IBObjects@y...>
> Sent: Monday, October 29, 2001 3:51 PM
> Subject: [IBO] execute procedure problems
>
>
> > Hi all.
> >
> > I have the next code:
> >
> > with tDatos.pCalculo do
> > begin
> > Close;
> > SQL.Clear;
> > SQL.Add('execute procedure poliza_polmod :polpro,:polcod');
> > ParamByName('polpro').Value := AEntero(pcaccpro.Text);
> > ParamByName('polcod').Value := AEntero(pcacccod.Text);
> > ExecProc;
> > Modalidad := FieldByName('polmod').AsInteger;
> > end;
> >
> > if the database is in dialect 1 all is right, but if i change it
> > to dialect 3 then i get the following:
> >
> > ISC ERROR CODE:335544569
> > ISC ERROR MESSAGE:
> > Dynamic SQL Error
> > parameter mismatch for procedure POLIZA_POLMOD
> >
> >
> > I use Delphi6+Sp1 IBO_4_2_F IB6
> >
> > Someone knows why.
> >
> > Thanks
> >
> >
> >
> >
> >
>
______________________________________________________________________
_____
> > IB Objects - direct, complete, custom connectivity to Firebird or
> InterBase
> > without the need for BDE, ODBC or any other layer.
> >
>
______________________________________________________________________
_____
> > http://www.ibobjects.com - your IBO community resource for Tech
Info
> papers,
> > keyword-searchable FAQ, community code contributions and more !
> >
> > Your use of Yahoo! Groups is subject to
http://docs.yahoo.com/info/terms/
> >