程序执行期间 COBOL-DB2 程序中表级锁的实现
COBOL-DB2程序可以通过两种方式将锁放入DB2表中。
在程序中执行使用该表的SQL语句时。
当程序加载到主内存中并准备好执行时。它获取对程序中SQL语句中使用的所有DB2表的锁。
要在程序加载到主内存或分配给线程后获取对所有DB2表的锁，我们必须使用适当的选项和参数绑定计划。下面是一个可以使用的JCL步骤。
//BINDEXECPGM=IKJEFT01 //STEPLIBDDDSN=DIS.TEST.LOADLIB,DISP=SHR //系统输出DD系统输出=* //SYSTSINDD* DSN SYSTEM(TB3) BIND PLAN(PLANA) - PKLIST(PACKA) - ACQUIRE(ALLOCATE) /*
BIND选项ACQUIRE将与ALLOCATE参数一起用于此目的。