Subject | Re: [IBO] Procedure and TIB_DSQL |
---|---|
Author | Kostas Rizoudis |
Post date | 2013-06-19T18:37:22Z |
Hi Alexandre,
or use IB_Cursor that is better then IB_Query
IB_Cursor.sql.clear;
IB_Cursor.sql.add('SELECT total');
IB_Cursor.sql.add('FROM PRO_PROJETOSCOUNT(InputParam1, InputParamX)');
IB_Cursor.first;
Regards,
Kostas
Mit den besten Grüßen aus Dachau
Kostas Rizoudis
mailto:kostas@...
Rizoudis Individualsoftware
und Verfahrenstechnik GmbH
Karl-Benz Strasse 5b
85221 Dachau
Telefon: +49 8131 90747-0
Telefax: +49 8131 90747-20
Email: post@...
Amtsgericht München: HRB 154237
Geschäftsführer: Konstantinos Rizoudis
Sitz: Dachau
or use IB_Cursor that is better then IB_Query
IB_Cursor.sql.clear;
IB_Cursor.sql.add('SELECT total');
IB_Cursor.sql.add('FROM PRO_PROJETOSCOUNT(InputParam1, InputParamX)');
IB_Cursor.first;
Regards,
Kostas
>--
>
>
>
>
> Hi Guys,
> I need to know how works TIB_DSQL.
> For example if I have a SP like this:
> begin
> select count(projetos_id) from tb_projetos where projetos_status>=0
> into :total;
> suspend;
> end
>
> I did this in my code:
>
> IB_DSQL1.SQL.Clear;
> IB_DSQL1.SQL.Add(‘EXECUTE PROCEDURE PRO_PROJETOSCOUNT’);
> IB_DSQL1.Prepare;
> IB_DSQL1.Execute;
>
> But now, how to get the output parameter ?
>
> Thanks
> Alexandre
>
> [Non-text portions of this message have been removed]
>
>
>
>
Mit den besten Grüßen aus Dachau
Kostas Rizoudis
mailto:kostas@...
Rizoudis Individualsoftware
und Verfahrenstechnik GmbH
Karl-Benz Strasse 5b
85221 Dachau
Telefon: +49 8131 90747-0
Telefax: +49 8131 90747-20
Email: post@...
Amtsgericht München: HRB 154237
Geschäftsführer: Konstantinos Rizoudis
Sitz: Dachau