嵌入式的SQL程序设计

嵌入式的SQL程序设计 RED_CURSOR red_CURSOR CONNECT TO servername.databasename AS connection_name USER LOGIN.PASSWORD CONNECTION connection_name DISCONNECT connection_name SQL CONNECT TO red.book AS con1 USER sa; 38 EXEC SQL 连接到 red.t

嵌入式的SQL程序设计

RED_CURSOR red_CURSOR CONNECT TO 服务器名称.数据库名称 AS 连接名称 USER LOGIN.PASSWORD CONNECTION 连接名称 DISCONNECT 连接名称 SQL CONNECT TO red.book AS con1 USER sa; 38 执行 SQL CONNECT TO red.test AS con2 USER sa; 39 执行 SQL DISCONNECT CON1 40 执行 SQL DISCONNECT CON2 SQL 开始 声明 节 47 INT 公司 ID SQL END 声明 节 “地点公司ID=:CompanID” SQL SELECT FROM 公司 58 地点地址=：地址 stmt_name 来自 :hvar SQL 开始 声明 节 “插入 到公司值(?,?)” 公司名称SQL END DECLARE SECTION PRINTF("输入单位代码：") 81 SCANF("%S",COMPANYID) 82 PRINTF("输入单位名称：") 83 scanf("%s",公司名称) 84 执行 SQL 准备 stmt FROM :stmtcon 85 执行 SQL 执行 stmt USING:COMPANYID,:COMPANYNAME SQL 开始 声明 节 SQL END 声明 节 91 EXEC SQL SELECT 公司名称 INTO :COMPANYNAME cursor_name 不敏感滚动 光标 FOR select_stmt 列列表 定义游标，并打开SQL COMPANYID,COMPANYNAME SQL OPEN C1 SQL 开始 声明 节 COMPANYNAMESQL END 声明 节 (SQLCODE==0) 122 { 123 EXEC SQL FETCH C1 INTO :COMPANYID,:COMPANYNAME 124 PRINTF("%S,%S",COMPANYID,COMPANYNAME) 125 } SQL 开始 声明 节 “选择公司ID 来自公司地点公司名称=？”; “北京怡神公司”； ； 部分 SQL 选择语句； SQL 139 准备 SELECT_STATEMENT FROM :SZCOMMAND SQL OPEN CON_CURSOR USING:SZCOMPANYNAME; 142 EXEC SQL FETCH CON_CURSOR INTO:SZCOMPANYID; ，