用 WebSphere Studio Enterprise Developer 開發 CICS COBOL 應用程式

 
developerWorks台灣
在本文中：
Get the products
場景概述
介紹
啟動 Enterprise Developer
建立到 z/OS 系統的連接
設置編譯器選項
設置 CICS 選項
設置 DB2 選項
建立 z/OS 專案
定義 PDS
建立 PDS 成員
產生 JCL
提交 JCL
參考資料
關於作者
對本文的評價

相關連結
Java technology 技術文件庫


developerWorks 台灣  >  Java technology  >
用 WebSphere Studio Enterprise Developer 開發 CICS COBOL 應用程式
快速起步

文件選項

友善列印

轉寄本文
級別: 中級
Grant Ward Able, 解決方案測試人員
2004 年 4 月 02 日
如果您剛接觸 WebSphere ®Studio Enterprise Developer，並希望撰寫 CICS ®COBOL 大型機程式，那麼本文就是為您寫的。本文提供了基礎知識，並假定您對所涉及的任何產品都不瞭解。Assembler 或 PL/I 程式師可以容易地將本文中的資訊轉化到他們自己的環境中。
如果您是 developerWorks Subscription 的使用者，那麼您就有一個使用 Eclipse-based WebSphere Studio IDE 開發生產級應用程式以及使用 DB2 ®、Lotus ®、Rational ®、Tivoli ®和 WebSphere 中間件產品 —— 包括 WebSphere Application Server —— 測試、評估和展示您的應用程式的單使用者許可證。如果不是 Subscription 使用者，那麼可以透過developerWorks Subscription 成為一個使用者。



回到頂端
我們的場景基於兩家保險公司的合併：
Lord General Insurance (LGI) 是一家一般性的保險公司，是一家大企業，有五百萬投保人，它正在尋求擴展其汽車保險業務並要求迅速進入電子商務直接保險市場。LGI 有一個基於 S/390 和 CICS 的大型遺留 IT 基礎設施。
DirectCar.com (DC) 是一家新型的 dot.com 汽車保險公司，它透過 Internet 銷售保險，投保人不到一百萬。它有一個基於 WebSpere Application Server、Oracle 資料庫和 TxSerie 的以電子商務為主的基礎設施。
該場景的重點是整合，並有以下要求：
透過降低整體管理成本改進公司的盈利能力，首先關注的是現有產品的索賠管理。
為聯合的客戶群建立連接現有外部服務的自動索賠系統。
滿足在客戶需求中定義的服務水準協定（如效能和安全準則）。



回到頂端
您 可能認為在今天的現代 Web 世界中，您永遠也不必撰寫另一個 CICS COBOL 應用程式。但是，如果將要合併的公司包括了遺留系統，那麼為了完成合併，您可能就需要開發一些 CICS COBOL 應用程式 —— 需要維護的程式或者需要開發的大型機程式以滿足新的業務需求。好消息是您可以使用同一個工具開發 Java 應用程式和 CICS COBOL 應用程式（這包括所有 COBOL、Assembler 或者 PL/1 程式），因此不需要單獨的工具和單獨受過培訓的程式師。這個工具就是 WebSphere Studio Enterprise Developer。
任何時候遇到新的開發工具或者 IDE 時，您必須經歷學習曲線才能達到具有一定生產率水準的程度。本文幫助減少使用 WebSphere Studio Enterprise Developer (Enterprise Developer) 進行大型機 COBOL 開發的困難。我在寫作時針對的是 CICS COBOL 程式師，但是 Assembler 或 PL/I 程式師可以容易地將之適應於他們自己的環境。
本文主要針對的是那些需要在他們的桌面電腦上安裝 Enterprise Developer 以開發大型機程式的程式師。我將解釋如配置產品使得大型機連接盡可能的容易，並使您儘快地具有生產率。
還可以將本文作為配置 Enterprise Developer V5.0 安裝的分步教育訓練。我將詳細描述所需要的步驟，從 Enterprise Developer 內部到以下的所有內容：
配置到大型機的連接（z/OS ®系統）。
建立要使用的專案（z/OS 專案）。
在大型機上建立資料集。
在 PDS 中建立成員。
產生 JCL。
提交 JCL。
查看提交批作業的結果。
除了在大型機上安裝所需要的軟體之外，不需要登錄到 TSO。
本 文儘管在標題中特別提到了 COBOL，並且只描述了 COBOL 設置，但是對於 Assembler 或 PL/1 程式師也同樣有效。這些程式師需要針對他們所使用的語言配置 z/OS 系統。可以配置所有這三種語言設置，然後使用所定義的 z/OS 系統為這三種語言中的任何一種開發和維護程式。
假定在工作站和 z/OS 系統中正確安裝了 Enterprise Developer V5.0。本文不包括安裝指導，有關安裝資訊請參閱IBM WebSphere Studio Enterprise Developer Installation Guide。假定正確安裝了所有需要的產品（及它們的先決條件）。
Enterprise Developer 顯示所有的 PDS 成員及副檔名。有許多預定義的副檔名（參見圖 10）。建立新成員時，必須輸入副檔名。



回到頂端
要啟動 Enterprise Developer：
安裝大型機和桌面軟體。
啟動 Enterprise Developer。
選擇 START > Programs > IBM WebSphere Studio > Enterprise Developer 5.0。
出現一個面板，顯示一個要求輸入工作區所在位置的欄位，如圖 1 所示。

點選 OK。
顯示一個啟動畫面幾秒鐘，之後出現主 Enterprise Developer Eclipse 螢幕，如圖 2 所示。

接下來，出現 Enterprise Developer Resource 螢幕，如圖 3 所示。




回到頂端
在使用 Enterprise Developer 之前，定義一個 z/OS 系統和一個 z/OS 專案。
選擇 Window > Open Perspective > z/OS Systems。在 "Other..." 中尋找 z/OS System。
這個透視圖打開，並帶有一個類似圖 4 的視圖。

選擇圖 4中的 Other，以顯示 z/OS Projects 面板，如圖 5 所示。

點選 OK。
右擊 Remote Systems。
選擇 Add System... 以添加到大型機 z/OS 系統的連接，如圖 6 所示。

一系列面板要求指定一些重要資訊：
主機
MVS 使用者 ID
工作埠
第一個面板如圖 7 所示，請求關於要連接的主機的資訊。

在建立了到 z/OS 系統的連接後，顯示一個帶 Host Short Name 的遠端系統。連接到這個主機的 ID 是 MVS User ID。
Foreign File System (FFS) Port 欄位必須與在作為 FFS 伺服器的 Web 伺服器中指定的埠號相匹配 —— 在 ICSPARM 關鍵字的 -p 參數中指定。z/OS Job Monitor 有一個參數 SERV_PORT ，Job Port 欄位必須與它匹配。
如果 （由系統管理員）提供了一個系統屬性檔，那麼點選 Import system definition...。
選擇要匯入的檔 （用標準 Windows 檔選擇面板）。這會顯示圖 7。除了 MVS User ID，圖 7 的所有細節都是完整的。
輸入 MVS User ID 並選擇 Finish。
圖 8 定義 Build Server 埠授權級別。

在這裡指定的埠必須與在 Build Server for z/OS 上的 -p 參數中指定的匹配。
指定在這個系統上使用哪個資料集名高級限定符，如圖 9 所示。

資料集名級別是自動用圖 7中所示的 MVS User ID 欄位中指定的值填充的。
要添加另一個高級限定符，請選擇 New...。這會打開一個面板，指定要從這個系統瀏覽、編輯或者建立的資料集名。其他資料集需要指定。
對於大多數系統，下一個面板可以保持不變。它指定了如何在桌面和主機之間傳輸資料集或者成員，如圖 10 所示。

可以改變它，但是現在保持它不變。
選擇 Next 以轉換到 Job Card 規範，如圖 11 所示。應當根據網站的安裝改變它。如果有必要，與 MVS 系統程式師聯繫以明確需要指定什麼值。

圖 12（COBOL）、圖 13（Assembler） 和圖 14（PL/1 Settings） 所示的面板都有四個選項卡：
Compiler Options
CICS
DB2
IMS
下面幾節描述這些選項。



回到頂端
Compiler Option SQL 只有在撰寫 DB2 程式時才需要。與此類似，CICS （"COBOL3"） 參數只對 CICS 程式需要。需要建立 Listing Output Data Set 和 Object Deck Data Set。（線上幫助提供了關於這些和其他一些資料集的指導，請搜索“Allocating z/OS data sets from WebSphere Studio”。）




回到頂端
這個面板上的下一個選項卡用於設置特定於 CICS 的值，如圖 13 所示。

在 COBOL Settings 面板的 CICS 選項卡上，可以選擇 Integrated CICS Translator 或者 Separate CICS Translator。還可以選擇得到程式輸出的副本。



回到頂端
在撰寫 DB2 程式時，更新 DB2 選項卡上的值，如圖 14 所示。

在編譯 DB2 程式時，必須撰寫以下 DD 語句之一以啟動 SYSTSIN 指令：
//SYSTSIN DD *
或者
//SYSTSIN DD DSN=xxx.yyy.zzz,DISP=SHR
與此類似，使用 IMS 時，更新那個選項卡。
在使用 PL/I 或者 Assembler 時，使用後兩個面板（在本文中沒有顯示）。否則，點選 Next直到達到如圖 15 所示的 Link Options 面板。

如果您是一位 CICS COBOL 程式師，那麼點選 Next直到出現如圖 18所示的 Setup Complete 面板。圖 16和圖 17顯示在 binder 設置面板和 Setup Complete 面板之間顯示的面板。



Setup Complete 面板可以讓您匯出系統屬性。這是唯一可以做到這一點的地方，繼續往下進行匯出屬性是一種好的做法，特別是出於備份的考慮。
可以在這時連接到系統，如圖 19 所示。雖然這是可選的，但是可以很好地檢查系統是否配置正確。

為了繼續進行 z/OS 專案的建立，右擊系統並選擇 Disconnect中斷連接（如果是連接的）。



回到頂端
要建立 z/OS 專案，請打開 z/OS Projects 透視圖。選擇 Window > Open Perspective > z/OS Projects。（請在 Other...中查找 z/OS Project。）

右擊 z/OS Projects 面板的空白區可以選擇 New > MVS Project， 如圖 20 所示。命名您的專案並選擇哪個 z/OS 系統 （主機縮寫名，即 Host Short Name）和高級限定符（High Level Qualifier）與這個專案相關聯，如圖 21 所示。因為這個專案（在它建立時）繼承了相關聯的系統的所有屬性，選擇 Finish並接受 z/OS 系統的所有屬性。

在撰寫程式碼或者編譯程序之前，您必須通過連接到 z/OS 系統、進入 z/OS Systems 透視圖並右擊 z/OS System 來建立一些資料集。然後，選擇 Connect...，如圖 22 所示。

如圖 23 所示，選擇 OK以登錄到 z/OS 系統。開始建立所需要的資料集，除非您以前已經建立了它們。




回到頂端
在 z/OS Systems 視圖中，右擊 MVS User ID 並選擇 Allocate PDS...。這會顯示如圖 24 所示的面板。

輸入要建立的資料集的名字。High Level Qualifier 作為首碼添加到資料集名中。選擇 Next以選擇是根據現有資料集為資料集建模（使用一些模型），還是手工指定所有參數的值。在這個例子中，透過選擇 Specify characteristics by usage type使用預先設定的模型，如圖 25 所示。

保證預先設定的值對於安裝是正確的，並改變那些需要改變的地方，比如圖 26 中所示的 Block Size。

選擇 Finish會對 z/OS 發出一個 TSO ALLOCATE 命令，並帶有基於圖 26 中規範的所有正確參數。建立了所有資料集後，必須將它們添加到專案中才能使用。要將資料集添加到專案中，請選擇這些資料集，右擊突出顯示的資料集，選擇 Add to Project...，如圖 27 所示。

這會打開如圖 28 所示的面板。

在圖 28 中，所需要做的就是選擇在哪個專案中添加資料集並點選 Enter。專案現在看起來應該像圖 29。




回到頂端
要建立一個 PDS 成員以放入應用程式碼，請右擊原始程式碼庫並選擇 Create PDS Member...，如圖 30 所示。

這會打開一個面板，要求輸入成員名，如圖 31 所示。

這會打開這個成員，使您可以鍵入程式碼。注意系統為成員名添加了一個副檔名，例如，對於 COBOL 為 .cbl，對於 Assembler 為 .asm，如圖 32 所示。這是由 Host Data Set 名上的低級限定符所決定的，如在前面圖 10中定義的。

只有在保存資料 後，才可以在 Outline 窗格中看到資料。圖 33 顯示了 Outline 窗格。




回到頂端
要編譯這段程式碼，需要產生一些 JCL 以執行編譯任務。為此，右擊 project 窗格中的成員名。For Compile Link 選項產生編譯和連結的步驟，如圖 34 所示。

這會打開圖 35 所示的面板，要求確認在哪裡寫入產生的 JCL。

產生完 JCL 後，會打開一個訊息方塊，如圖 36 所示。

透過展開 JCL 程式庫並雙擊成員名，產生的 JCL 就打開了，以對之進行顯示（或編輯），如圖 37 所示。產生後，就可以重新提交這個 JCL 而不用重新產生。只有底層屬性改變時才需要重新產生 JCL。
雙擊這個選項卡（例如，圖 37 中的 MYPROG01.JCL ） 會將這個窗格擴大為全螢幕。再次雙擊同一個選項卡會使它回到原來的大小。




回到頂端
要提交 JCL 並觀看結果，請右擊 JCL 成員名並選擇 Submit，如圖 38 所示。

這會在 Tasks 窗格中放一個項，顯示提交的作業的 JES 號，如圖 39 所示。

要看編譯和連結是否成功，可透過右擊 JCL 成員並選擇 Get Job Output來檢查作業輸出，如圖 40 所示。

這會將作業輸出檢索到 z/OS Output Console，如圖 41 所示，如果需要可以在這裡觀察它。

如 果作業成功，那麼應當在 LOAD 程式庫中看到這個程式的一項， 在 Enterprise Developer 中顯示為帶有副檔名 .exe。如果有程式設計錯誤，那麼修改程式碼並重新提交作業。如果錯誤是在 JCL 中，那麼與管理員或者系統程式師聯繫以得到正確的資訊。得到正確資訊後，必須找到 z/OS Systems、右擊它、選擇 Properties，然後在那裡進行修改。然後必須重新產生 JCL。
恭喜！您已經成功地用 WebSphere Studio Enterprise Developer 建立了一個系統連接、一個專案和一些資料集了。您還編輯並編譯了原始程式碼！



回到頂端
您可以參閱本文在 developerWorks 全球網站上的英文原文.
存取系列概述頁面， 以得到本系列文章的當前列表。
閱讀本系列的第一篇文章整合不同的 IT 系統，第 1 部分 —— 介紹和概述，它提供了對整合和收購解決方案的概述。
參閱本系列的第 2 部分設計新的索賠系統，以瞭解團隊設計的背景資訊。
存取developerWorks WebSphere 上的WebSphere Studio 專區，得到有關如何獲得並使用工具以進行應用程式開發的全面資訊。
存取 developerWorks 的WebSphere 專區中的WebSphere Business Integration。
在IBM Software中找到有關WebSphere Business Integration 的更多內容。
WebSphere Studio Enterprise Developer產品網站提供了產品特性、好處和系統要求。
透過developerWorks Subscription得到WebSphere Studio Enterprise Developer V5.0 for Windows。



回到頂端



Grant Ward Able 以前是系統程式師，在 CICS、MQSeries 和 MERVA 方面有 15 年以上的經驗。他現在就職於 IBM Software Group System House Solutions Test，負責實作和測試端到端業務方案。您可以透過wardable@uk.ibm.com與 Grant 聯繫。



回到頂端

不甚滿意！(1)
可再加強 (2)
持平 (3)
相當不錯 (4)
受益匪淺！(5)




回到頂端

Other company, product, or service names may be trademarks or service marks of others.
關於IBM     隱私權條款     聯絡我們