在IBM i(OS/400)上使用SQL查询文件的数据

本示例演示如何在IBM i(OS/400)上使用SQL语句查询文件的数据。可以使用该方法查询IBM i上的物理文件或者视图。

//定义SQL语句
dcl-s sqlStmt varchar(1000) inz('SELECT * FROM MYLIB.MYFILE');

//执行SQL查询
EXEC SQL PREPARE queryStmt FROM :sqlStmt;
EXEC SQL DECLARE cursor1 CURSOR FOR queryStmt;
EXEC SQL OPEN cursor1;

//遍历结果集
dow (SQLCODE = 0);
    //从结果集中获取记录
    EXEC SQL FETCH cursor1 INTO :record;

    //处理记录
    if (SQLCODE = 0);
        //打印记录
        printf(record);
    endif;
enddo;

//释放结果集
EXEC SQL CLOSE cursor1;
EXEC SQL FREE queryStmt;

免责申明：文章和图片全部来源于公开网络，如有侵权，请通知删除 server@dude6.com