在没有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)
/*