在程式執行期間在 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 引數。

Mandalika

更新於： 2020 年 9 月 11 日

1K+ 瀏覽

開啟你的職業

完成課程，獲得認證

開始