使用CICS Web假脱机命令执行DB2程序后数据未实时更新问题求助

问题根源 #

• 使用SPOOL OPEN/WRITE/CLOSE执行prg01时，程序的DB2事务未显式提交，插入记录处于未提交状态，直到下一次SPOOL作业触发才隐式提交，导致prg02只能读取上一次提交的旧数据。
• CICS程序prg02可能因隔离级别设置或游标复用，读取了缓存的数据库快照而非最新数据。

解决步骤 #

1. 在prg01中添加显式事务提交 #

在插入操作完成后，立即执行DB2提交命令，确保事务实时生效：

• SQL写法：

EXEC SQL COMMIT WORK;

• COBOL程序写法：

EXEC SQL
    COMMIT WORK
END-EXEC.

2. 检查SPOOL作业的事务提交配置 #

部分批量作业环境默认在作业结束时才自动提交事务，需修改作业控制语句（JCL），确保prg01执行完成后立即提交；或通过程序内部的显式提交覆盖默认行为。

3. 调整prg02的数据读取逻辑 #

• 每次查询前关闭并重新打开游标，避免复用旧快照：

EXEC SQL
    CLOSE T01_QUERY_CURSOR
END-EXEC.
EXEC SQL
    OPEN T01_QUERY_CURSOR
END-EXEC.

• 若业务允许，可将prg02的DB2隔离级别改为UR（未提交读），直接读取最新数据（注意此设置会降低一致性，需谨慎使用）：

EXEC SQL SET CURRENT ISOLATION UR;

4. 确保CICS事务独立性 #

prg02作为Web程序，需保证每次请求对应独立的CICS事务，请求结束时自动提交/回滚，避免长事务持有旧数据快照。

内容的提问来源于stack exchange，提问作者Ebi