通道與儲存器範例

此範例顯示一個稱為 Payroll 的 Java 類別的摘錄,此類別會呼叫一個稱為 PAYR 的 COBOL 伺服器程式。Payroll 類別使用 JCICS com.ibm.cics.server.Channelcom.ibm.cics.server.Container 類別來處理通道及其儲存器

圖 1. 使用 JCICS com.ibm.cics.server.Channelcom.ibm.cics.server.Container 類別將通道傳遞至 COBOL 伺服器程式的 Java 類別
import com.ibm.cics.server.*;
public class Payroll {
     ...
     Task t=Task.getTask();

     // 建立 payroll_2004 通道
     Channel payroll_2004 = t.createChannel("payroll-2004");
     
     // 建立員工儲存器
     Container employee = payroll_2004.createContainer("employee");
     
     // 將員工姓名放入儲存器中
     employee.put("John Doe");
     
     // 建立薪資儲存器
     Container wage = payroll_2004.createContainer("wage");
     
     // 將薪資放入儲存器中
     wage.put("2000");
     
     // 鏈結至 PAYROLL 程式,並傳遞 payroll_2004 通道
     Program p = new Program();
     p.setName("PAYR");
     p.link(payroll_2004);
     
     // 取得已傳回的狀態儲存器
     Container status = payroll_2004.getContainer("status");
                                                  
     // 取得狀態資訊
     byte[] payrollStatus = status.get();
     ...
}