如何实现一个COBOL-DB2程序PROGA,当PROGA加载到内存中并准备执行时,该程序将在表TA上获得锁定?
COBOL-DB2程序可以通过两种方式将锁放置到DB2表中。
在程序中执行使用该表的SQL语句时。
当程序加载到主存储器中并且可以执行时。它获取程序中SQL语句中使用的所有DB2表的锁。
要在程序加载到主存储器中或分配给线程后获得对所有DB2表的锁定,我们必须使用适当的选项和参数对计划进行绑定。以下是可以使用的JCL步骤。
//BIND EXEC PGM=IKJEFT01 //STEPLIBDDDSN=DIS.TEST.LOADLIB,DISP=SHR- //SYSOUTDDSYSOUT=* //SYSTSINDD* DSN SYSTEM(TB3) BIND PLAN(PLANA) - PKLIST(PACKA) - ACQUIRE(ALLOCATE) /*
BIND选项ACQUIRE将与ALLOCATE参数一起用于此目的。