如何使用嵌入式SQL迭代RPG(LE)中的一组记录？
发布时间：2020-12-12 07:01:02 所属栏目：MsSql教程 来源：网络整理
导读：如何使用嵌入式SQL迭代RPG(LE)中的一组记录？ 解决方法 通常我会创建一个游标并获取每个记录. //*********************************************************************** // Main - Main Processing Routine begsr Main; exsr BldSqlStmt; if OpenSqlCurso
如何使用嵌入式SQL迭代RPG(LE)中的一组记录？
解决方法通常我会创建一个游标并获取每个记录.//***********************************************************************
// Main - Main Processing Routine
begsr Main;
exsr BldSqlStmt;
if OpenSqlCursor() = SQL_SUCCESS;
dow FetchNextRow() = SQL_SUCCESS;
exsr ProcessRow;
enddo;
if sqlStt = SQL_NO_MORE_ROWS;
CloseSqlCursor();
endif;
endif;
CloseSqlCursor();
endsr; // Main
我在这个答案in a post on my website中添加了更多细节. （编辑：李大同） 【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容! |