嵌入SQL

为了更好的理解嵌入SQL，本节利用一个具体例子来说明。嵌入SQL允许程序连接数据库并且包括SQL代码到程序中，这样在程序中就可以对数据库进行使用、操作以及处理数据等等。以下是用C语言编写的使用嵌入SQL的例程，它将打印一个报告；这个程序必须在普通的编译之前先预编译SQL语句。嵌入SQL对于不同系统是不一样的，所以在不同的系统中对以下的程序稍作修改，特别是变量的声明以及过程记录等。在嵌入SQL时，考虑网络、数据库管理系统、操作系统是相当重要的。

以下是详细的代码：

#include <stdio.h>

/* 以下这部分是声明主机变量，它将使用于程序中*/

EXEC SQL BEGIN DECLARE SECTION;

int BuyerID;

char FirstName[100], LastName[100], Item[100];

EXEC SQL END DECLARE SECTION;

/* 以下包括SQLCA变量，它可以用来进行错误检查 */

EXEC SQL INCLUDE SQLCA;

main() {

/* 以下连接数据库*/

EXEC SQL CONNECT UserID/Password;

/* 以下是连接数据库并检查是否有错误产生T */ if(sqlca.sqlcode) {

printf(Printer, "Error connecting to database server.\n");

exit();

}

printf("Connected to database server.\n");

/* 下面声明一个 "Cursor"。它将在查询结果多于一行的时候使用*/

EXEC SQL DECLARE ItemCursor CURSOR FOR

SELECT ITEM, BUYERID

FROM ANTIQUES

ORDER BY ITEM;

EXEC SQL OPEN ItemCursor;

/* 你可以在这里还可以加入另外一些错误检查的内容，这里就省略了*/

/* 当这个CURSOR没有数据， sqlcode将被产生以允许我们退出循环。这里注意，为了简单起见，我们使程序遇到错误的时候就退出任何的sqlcode。*/

EXEC SQL FETCH ItemCursor INTO :Item, :BuyerID;

while(!sqlca.sqlcode) {

EXEC SQL UPDATE ANTIQUES

SET PRICE = PRICE + 5

WHERE ITEM = :Item AND BUYERID = :BuyerID;

EXEC SQL SELECT OWNERFIRSTNAME, OWNERLASTNAME

INTO :FirstName, :LastName

FROM ANTIQUEOWNERS

WHERE BUYERID = :BuyerID;

printf("%25s %25s %25s", FirstName, LastName, Item);

EXEC SQL FETCH ItemCursor INTO :Item, :BuyerID;

}

/* 关闭CURSOR，提交变化并退出程序。*/

EXEC SQL CLOSE DataCursor;

EXEC SQL COMMIT RELEASE;

exit();

}