sybase嵌入式c/c++编程例子
一、例子一(根据系统自带example1.cp改写)
teststu.cp
#include <stdio.h>
/*建立通讯区域*/
EXEC SQL INCLUDE SQLCA;
/*
** These tokens must be declared in a declare section
** because they are used in declare sections below.
*/
EXEC SQL BEGIN DECLARE SECTION;
#define TYPESIZE 13
#define TIDSIZE 6
EXEC SQL END DECLARE SECTION;
#define EOLN '\0'
/*
** Forward declarations of the error and message handlers and
** other subroutines called from main().
*/
void error_handler();
void warning_handler();
int
main(int argc, char *argv[])
{
/*声明宿主变量*/
EXEC SQL BEGIN DECLARE SECTION;
/* storage for login name and password. */
char username[30];
char sname[30];
char password[30];
char server[30];
EXEC SQL END DECLARE SECTION;
/*错误处理*/
EXEC SQL WHENEVER SQLERROR CALL error_handler();
EXEC SQL WHENEVER SQLWARNING CALL warning_handler();
EXEC SQL WHENEVER NOT FOUND CONTINUE;
/*连接到 SQL SERVER 服务器*/
strcpy(username, "mymotif");
strcpy(password, "wxwpxh");
strcpy(server, "MYMOTIFVOSTRO145480");
EXEC SQL CONNECT :username IDENTIFIED BY :password using :server;
/*执行查询，并显示结果*/
EXEC SQL USE testdb;
EXEC SQL DECLARE c1 CURSOR FOR
SELECT SNAME FROM STUDENT;
EXEC SQL OPEN c1;
printf("name in table student\n");
do {
EXEC SQL FETCH c1 INTO :sname;
if (sqlca.sqlcode != 0) break;
printf( "student name = %s\n", sname );
} while ( 1 );
EXEC SQL CLOSE c1;
return(0);
}
/*错误处理程序*/
/*
** void error_handler()
**
** Displays error codes and numbers from the SQLCA and exits with
** an ERREXIT status.
*/
void
error_handler(void)
{
fprintf(stderr, "\n** SQLCODE=(%ld)", sqlca.sqlcode);
if (sqlca.sqlerrm.sqlerrml)
{
fprintf(stderr, "\n** ASE Error ");
fprintf(stderr, "\n** %s", sqlca.sqlerrm.sqlerrmc);
}
fprintf(stderr, "\n\n");
exit(-1);
}
/*
** void warning_handler()
**
** Displays warning messages.
*/
void
warning_handler(void)
{
if (sqlca.sqlwarn[1] == 'W')
{
fprintf(stderr,
"\n** Data truncated.\n");
}
if (sqlca.sqlwarn[3] == 'W')
{
fprintf(stderr,
"\n** Insufficient host variables to store results.\n");
}
return;
}
编译：
$cpre64 -m teststu.cp $ cc -m64 -g -DSYB_LP64 -I. -I/opt/sybase/OCS-16_0/include teststu.c /opt/sybase/OCS-16_0/include/sybesql.c -L/opt/sybase/OCS-16_0/lib -lsybct64 -lsybtcl64 -lsybcs64 -lsybcomn64 -lsybintl64 -lsybunic64 -rdynamic -ldl -lnsl -lm -o teststu
执行：
$ ./teststu name in table student student name = 马志元 student name = 马元 student name = 王海滨 student name = 金力标 student name = 马小乐 student name = 马娟
数据库testdb及表STUDENT的创建见博文
http://my.oschina.net/u/2245781/blog/620710
二、例子二：在esqlc中调用存储过程：
创建测试用存储过程test_proc.sql 。
$ isql -SMYMOTIFVOSTRO145480 -Umymotif -Pwxwpxh -i test_proc.sql
use testdb go if exists ( select 1 from sysobjects where name = 'test_proc' ) drop proc test_proc go if exists ( select 1 from sysobjects where name = 't123') drop table t123 go create table t123(id int primary key, col2 varchar(32) not null) insert into t123 values(1, 'iihero') insert into t123 values(2, 'Sybase') insert into t123 values(3, 'ASE') go create proc test_proc (@id_min int, @num_t123 int output) with recompile as select @num_t123 = count( a.id ) from t123 a where a.id > = @id_min go setuser go declare @num_t123 int exec test_proc 1, @num_t123 output select @num_t123 go
代码test.cp
#define ERREXIT -1
#define STDEXIT 0
#include <stdio.h>
/* Declare the SQLCA. */
EXEC SQL INCLUDE SQLCA;
EXEC SQL BEGIN DECLARE SECTION;
#define TYPESIZE 13
#define TIDSIZE 6
EXEC SQL END DECLARE SECTION;
#define EOLN '/0'
void error_handler(void)
{
fprintf(stderr, "/n** SQLCODE=(%ld)", sqlca.sqlcode);
if (sqlca.sqlerrm.sqlerrml)
{
fprintf(stderr, "/n** ASE Error ");
fprintf(stderr, "/n** %s", sqlca.sqlerrm.sqlerrmc);
}
fprintf(stderr, "/n/n");
exit(ERREXIT);
}
void warning_handler(void)
{
if (sqlca.sqlwarn[1] == 'W')
{
fprintf(stderr,
"/n** Data truncated./n");
}
if (sqlca.sqlwarn[3] == 'W')
{
fprintf(stderr,
"/n** Insufficient host variables to store results./n");
}
return;
}
int main()
{
EXEC SQL BEGIN DECLARE SECTION;
/* storage for login name and password. */
char username[30];
char password[30];
char server[30];
EXEC SQL END DECLARE SECTION;
EXEC SQL BEGIN DECLARE SECTION;
CS_INT id_min;
CS_INT num_t123;
CS_SMALLINT retcode;
EXEC SQL END DECLARE SECTION;
EXEC SQL WHENEVER SQLERROR CALL error_handler();
EXEC SQL WHENEVER SQLWARNING CALL warning_handler();
EXEC SQL WHENEVER NOT FOUND CONTINUE;
strcpy(username, "mymotif");
strcpy(password, "wxwpxh");
strcpy(server, "MYMOTIFVOSTRO145480");
EXEC SQL CONNECT :username IDENTIFIED BY :password using :server;
EXEC SQL USE testdb;
printf("Begin test!\n");
id_min = 0;
exec sql exec :retcode = test_proc :id_min, :num_t123 output;
printf("num_t123=%d\n", num_t123);
printf("End test!\n");
return STDEXIT;
}
运行：
$ ./test Begin test! num_t123=3 End test!