请教：ESQL/C 如何调用 存储过程？急，急，急！

aragorn_coconut

请教：返回多条记录的存储过程如何用ESQL/C语句编译返回多条记录，程序格式应该是怎么的？
谢谢各位了！谢谢！

存储过程例子：（ESQL/C 如何调用？）

drop procedure tmp;
create procedure tmp()
returning char(20),char(20),char(20);
define b char(20);
define c char(20);
define d char(20);
select * from sss  into temp tmp;
foreach select cust_no,cust_name,cust_str into b, c, d
from tmp
return b,c,d with resume;
end foreach;
end procedure

aragorn_coconut

返回三条记录的ESQL/C  例子： （多条应该怎么写？）

#include        <stdio.h>;


EXEC SQL include sqlca;
EXEC SQL include sqlda;
EXEC SQL include datetime;

main()
{
        long char_num;
       
        EXEC SQL begin declare section;
                char         b[20];
                char         c[20];
                char         d[20];
        EXEC SQL end declare section;

       
        EXEC SQL database fzkser;
        EXEC SQL create procedure from 'pro3.sql';


        if( sqlca.sqlcode != 0 )
        {
                printf( "\nsqlca.sqlcode = %ld\n", sqlca.sqlcode );
       
        char_num = sqlca.sqlerrd[4];
                printf( "\nError in creating read_address.%ld\n", char_num );
        }

       
        EXEC SQL execute procedure tmp()
                into :b, :c, :d;

        if( sqlca.sqlcode != 0 )
        printf( "\nFailure on execute,sqlcode[%d]", sqlca.sqlcode );

        printf( "%s\n", b );
        printf( "%s\n", c );
        printf( "%s\n", d );

        EXEC SQL close database;

        return 0;


}

rock_jq

关注，我以前也碰到这种情况，我是先把返回记录插入到临时表中的

3sane

原帖由 "aragorn_coconut" 发表：
lca.sqlcode );

        printf( "%s\n", b );
        printf( "%s\n", c );
        printf( "%s\n", d );

        EXEC SQL close database;

        return 0;


}

用游标，如：
$prepare s_1 from "execute procedure  tmp() ";
$declare c_1 scroll cursor with hold for s_1;
$open c_1;
while(SQLCODE==0)
$fetch c_1 into :b, :c, :d;

3sane

原帖由 "aragorn_coconut" 发表：
lca.sqlcode );

        printf( "%s\n", b );
        printf( "%s\n", c );
        printf( "%s\n", d );

        EXEC SQL close database;

        return 0;


}

用游标，如：
$prepare s_1 from "execute procedure  tmp() ";
$declare c_1 scroll cursor with hold for s_1;
$open c_1;
while(SQLCODE==0)
$fetch c_1 into :b, :c, :d;

aragorn_coconut

写通过了，用以下的方法：

EXEC SQL declare curss cursor for execute procedure tmp();

EXEC SQL open curss;

for( ; ; )
{
EXEC SQL fetch curss into :b, :c, :d;
}