IMS DB - 程式設計

包含 DL/I 呼叫的應用程式程式不能直接執行。相反，需要一個 JCL 來觸發 IMS DL/I 批處理模組。IMS 中的批處理初始化模組是 DFSRRC00。應用程式程式和 DL/I 模組一起執行。下圖顯示了包含 DL/I 呼叫以訪問資料庫的應用程式程式的結構。

應用程式程式透過以下程式元素與 IMS DL/I 模組互動：

• ENTRY 語句指定程式使用 PCB。

• PCB 掩碼與預先構建的 PCB 中儲存的資訊相關聯，該 PCB 從 IMS 接收返回資訊。

• 輸入輸出區域用於將資料段傳遞到 IMS 資料庫和從 IMS 資料庫傳遞資料段。

• 對 DL/I 的呼叫指定處理功能，例如獲取、插入、刪除、替換等。

• 檢查狀態程式碼用於檢查指定處理選項的 SQL 返回程式碼，以告知操作是否成功。

• 終止語句用於結束包含 DL/I 的應用程式程式的處理。

段佈局

到目前為止，我們瞭解到 IMS 由段組成，這些段在高階程式語言中用於訪問資料。考慮一下我們之前見過的圖書館的 IMS 資料庫結構，在這裡我們看到其段在 COBOL 中的佈局：

01 LIBRARY-SEGMENT.
   05 BOOK-ID        PIC X(5).
   05 ISSUE-DATE     PIC X(10).
   05 RETURN-DATE    PIC X(10).
   05 STUDENT-ID     PIC A(25).
	
01 BOOK-SEGMENT.
   05 BOOK-ID        PIC X(5).
   05 BOOK-NAME      PIC A(30).
   05 AUTHOR         PIC A(25).
	
01 STUDENT-SEGMENT.
   05 STUDENT-ID     PIC X(5).
   05 STUDENT-NAME   PIC A(25).
   05 DIVISION       PIC X(10).

應用程式程式概述

IMS 應用程式程式的結構與非 IMS 應用程式程式的結構不同。IMS 程式不能直接執行；它總是作為子程式呼叫。IMS 應用程式程式包含程式規範塊 (PSB)，以提供 IMS 資料庫的檢視。

當我們執行包含 IMS DL/I 模組的應用程式程式時，將載入應用程式程式和與該程式連結的 PSB。然後，IMS 模組執行應用程式程式觸發的 CALL 請求。

IMS 服務

應用程式程式使用以下 IMS 服務：

• 訪問資料庫記錄
• 發出 IMS 命令
• 發出 IMS 服務呼叫
• 檢查點呼叫
• 同步呼叫
• 向線上使用者終端傳送或接收訊息