如何通過C API as400鎖定DATAAARA

Question

如何使用C API通過MI鎖定DATAARA？ lock（）/ unlock（）函數僅適用於用戶空間對象。

QXXRTVDA（）—檢索數據區功能僅顯示信息而沒有鎖定。

cmd系統（“ ALCOBJ MYDAXXX * DTAARA”）； 如果dataara已經從另一個作業鎖定，則無需等待。

當前代碼（不好）

while(  system("ALCOBJ MYDAXXX *DTAARA ") != 0) {sleep(1);}

Answer 1

您應該使用lock（）MI函數，該函數提供在QSYSINC / MIH / LOCK中定義的wait_time參數。 您可能想將QXXRTVDA（）和lock（）函數包裝到您自己的函數中。 使用unlock（）進行相反操作。 針對V3R7發行的“ AS / 400 MI庫參考，ILE C / C ++，SC09-2418-00”（這是自1996年11月以來的最新版本）中全面介紹了所有MI功能。在該書中，您將像往常一樣找到有用的示例。

Answer 2

您可以為ALCOBJ指定等待時間。 等待時間以秒為單位。

ALCOBJ OBJ((MYDAXXX *DTAARA *EXCLRD)) WAIT(60)