在程序执行期间在 COBOL-DB2 程序中对表级别锁进行实现

COBOL-DB2 程序可以通过两种方式在 DB2 表中放置锁。

  • 当程序内执行使用该表的 SQL 语句时。

  • 当程序载入主存储器并准备执行时。它会获取程序中的 SQL 语句中使用的所有 DB2 表上的锁。

为了在程序载入主存储器或分配给线程后获取所有 DB2 表上的锁，我们必须使用适当的选项和参数来 BIND 该程序。下面是一个可用的 JCL 步骤。

//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) -
ACQUIRE(ALLOCATE)
/*

BIND 选项 ACQUIRE 将与此目的一起使用，以及 ALLOCATE 参数。

更新于： 2020 年 9 月 11 日

1K+ 浏览

开启你的职业

完成课程，获得认证

开始
广告