在没有BIND的情况下,程序中进行非SQL更改时,执行结果是什么?

WBOY
WBOY 转载
2023-09-06 15:05:02 517浏览

在没有BIND的情况下,程序中进行非SQL更改时,执行结果是什么?

问题:COBOL-DB2 程序已更改,以将变量的长度从 PIC X(5) 增加到 PIC X(8)。但是,程序的 SQL 没有任何变化。如果程序的计划/包没有针对这些更改进行绑定,结果会怎样?

解决方案

从 PIC X(5) 到 PIC X(8) 的可变长度更改为不是 DB2 更改,并且程序中的 SQL 语句不需要修改。但是,我们仍然需要绑定其计划/包,否则我们将收到 SQL 错误代码 -818,其中指出“加载模块中的预编译器生成的时间戳 x 与从 DBRM z 构建的绑定时间戳 y 不同”。 p>

此 SQL 错误的原因如下 - 在每次执行 COBOL-DB2 程序时,都会比较加载模块和包/DBRM 的时间戳。如果程序中变量的长度发生了变化(并且没有 SQL 变化)并且被编译,那么加载模块将具有新生成的时间戳,另一方面,如果不执行 BIND,则加载模块将具有新生成的时间戳。包/DBRM 将具有旧的时间戳。当执行该程序时,调用该程序的 JCL 步骤将失败,并显示 SQL 错误代码 -818。

如果我们有一个 COBOL-DB2 程序,其 SQL 语句将来永远不会更改,我们可以使用选项 LEVEL 预编译该程序。下面是使用 LEVEL 选项的 BIND 步骤的示例。

示例

//BIND EXEC PGM=IKJEFT01
//STEPLIB DD DSN=DIS.TEST.LOADLIB,DISP=SHR
//SYSOUT DD SYSOUT=*
//SYSTSIN DD *
DSN SYSTEM(TB3)
BIND PLAN(PLANA) -
PKLIST(PACKA) -
LEVEL -
ACQUIRE(ALLOCATE) -
ISOLATION (RS)
/*

以上就是在没有BIND的情况下,程序中进行非SQL更改时,执行结果是什么?的详细内容,更多请关注php中文网其它相关文章!

声明:本文转载于:tutorialspoint,如有侵犯,请联系admin@php.cn删除