2004 年 4 月 02 日
如果您剛接觸 WebSphere ?Studio Enterprise Developer，並希望撰寫 CICS ?COBOL 大型機程式，那麼本文就是為您寫的。本文提供了基礎知識，並假定您對所涉及的任何產品都不瞭解。Assembler 或 PL/I 程式師可以容易地將本文中的資訊轉化到他們自己的環(huán)境中。
如果您是 developerWorks Subscription 的使用者，那麼您就有一個使用 Eclipse-based WebSphere Studio IDE 開發(fā)生產級應用程式以及使用 DB2 ?、Lotus ?、Rational ?、Tivoli ?和 WebSphere 中間件產品 —— 包括 WebSphere Application Server —— 測試、評估和展示您的應用程式的單使用者許可證。如果不是 Subscription 使用者，那麼可以透過
developerWorks Subscription 成為一個使用者。
我們的場景基於兩家保險公司的合併：
Lord General Insurance (LGI) 是一家一般性的保險公司，是一家大企業(yè)，有五百萬投保人，它正在尋求擴展其汽車保險業(yè)務並要求迅速進入電子商務直接保險市場。LGI 有一個基於 S/390 和 CICS 的大型遺留 IT 基礎設施。
DirectCar.com (DC) 是一家新型的 dot.com 汽車保險公司，它透過 Internet 銷售保險，投保人不到一百萬。它有一個基於 WebSpere Application Server、Oracle 資料庫和 TxSerie 的以電子商務為主的基礎設施。
該場景的重點是整合，並有以下要求：
透過降低整體管理成本改進公司的盈利能力，首先關注的是現(xiàn)有產品的索賠管理。
為聯(lián)合的客戶群建立連接現(xiàn)有外部服務的自動索賠系統(tǒng)。
滿足在客戶需求中定義的服務水準協(xié)定（如效能和安全準則）。
回到頂端您 可能認為在今天的現(xiàn)代 Web 世界中，您永遠也不必撰寫另一個 CICS COBOL 應用程式。但是，如果將要合併的公司包括了遺留系統(tǒng)，那麼為了完成合併，您可能就需要開發(fā)一些 CICS COBOL 應用程式 —— 需要維護的程式或者需要開發(fā)的大型機程式以滿足新的業(yè)務需求。好消息是您可以使用同一個工具開發(fā) Java 應用程式和 CICS COBOL 應用程式（這包括所有 COBOL、Assembler 或者 PL/1 程式），因此不需要單獨的工具和單獨受過培訓的程式師。這個工具就是 WebSphere Studio Enterprise Developer。
任何時候遇到新的開發(fā)工具或者 IDE 時，您必須經歷學習曲線才能達到具有一定生產率水準的程度。本文幫助減少使用 WebSphere Studio Enterprise Developer (Enterprise Developer) 進行大型機 COBOL 開發(fā)的困難。我在寫作時針對的是 CICS COBOL 程式師，但是 Assembler 或 PL/I 程式師可以容易地將之適應於他們自己的環(huán)境。
本文主要針對的是那些需要在他們的桌面電腦上安裝 Enterprise Developer 以開發(fā)大型機程式的程式師。我將解釋如配置產品使得大型機連接盡可能的容易，並使您儘快地具有生產率。
還可以將本文作為配置 Enterprise Developer V5.0 安裝的分步教育訓練。我將詳細描述所需要的步驟，從 Enterprise Developer 內部到以下的所有內容：
配置到大型機的連接（z/OS ?系統(tǒng)）。
建立要使用的專案（z/OS 專案）。
在大型機上建立資料集。
在 PDS 中建立成員。
產生 JCL。
提交 JCL。
查看提交批作業(yè)的結果。
除了在大型機上安裝所需要的軟體之外，不需要登錄到 TSO。
本 文儘管在標題中特別提到了 COBOL，並且只描述了 COBOL 設置，但是對於 Assembler 或 PL/1 程式師也同樣有效。這些程式師需要針對他們所使用的語言配置 z/OS 系統(tǒng)。可以配置所有這三種語言設置，然後使用所定義的 z/OS 系統(tǒng)為這三種語言中的任何一種開發(fā)和維護程式。
假定在工作站和 z/OS 系統(tǒng)中正確安裝了 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。
出現(xiàn)一個面板，顯示一個要求輸入工作區(qū)所在位置的欄位，如圖 1 所示。
點選 OK。
顯示一個啟動畫面幾秒鐘，之後出現(xiàn)主 Enterprise Developer Eclipse 螢幕，如圖 2 所示。
接下來，出現(xiàn) Enterprise Developer Resource 螢幕，如圖 3 所示。
回到頂端在使用 Enterprise Developer 之前，定義一個 z/OS 系統(tǒng)和一個 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 系統(tǒng)的連接，如圖 6 所示。
一系列面板要求指定一些重要資訊：
主機
MVS 使用者 ID
工作埠
第一個面板如圖 7 所示，請求關於要連接的主機的資訊。
在建立了到 z/OS 系統(tǒng)的連接後，顯示一個帶 Host Short Name 的遠端系統(tǒng)。連接到這個主機的 ID 是 MVS User ID。
Foreign File System (FFS) Port 欄位必須與在作為 FFS 伺服器的 Web 伺服器中指定的埠號相匹配 —— 在 ICSPARM 關鍵字的 -p 參數(shù)中指定。z/OS Job Monitor 有一個參數(shù) SERV_PORT ，Job Port 欄位必須與它匹配。
如果 （由系統(tǒng)管理員）提供了一個系統(tǒng)屬性檔，那麼點選 Import system definition...。
選擇要匯入的檔 （用標準 Windows 檔選擇面板）。這會顯示
圖 7。除了 MVS User ID，圖 7 的所有細節(jié)都是完整的。
輸入 MVS User ID 並選擇 Finish。
圖 8 定義 Build Server 埠授權級別。
在這裡指定的埠必須與在 Build Server for z/OS 上的 -p 參數(shù)中指定的匹配。
指定在這個系統(tǒng)上使用哪個資料集名高級限定符，如圖 9 所示。
資料集名級別是自動用
圖 7中所示的 MVS User ID 欄位中指定的值填充的。
要添加另一個高級限定符，請選擇 New...。這會打開一個面板，指定要從這個系統(tǒng)瀏覽、編輯或者建立的資料集名。其他資料集需要指定。
對於大多數(shù)系統(tǒng)，下一個面板可以保持不變。它指定了如何在桌面和主機之間傳輸資料集或者成員，如圖 10 所示。
可以改變它，但是現(xiàn)在保持它不變。
選擇 Next 以轉換到 Job Card 規(guī)範，如圖 11 所示。應當根據(jù)網站的安裝改變它。如果有必要，與 MVS 系統(tǒng)程式師聯(lián)繫以明確需要指定什麼值。
圖 12（COBOL）、
圖 13（Assembler） 和
圖 14（PL/1 Settings） 所示的面板都有四個選項卡：
Compiler Options
CICS
DB2
IMS
下面幾節(jié)描述這些選項。
回到頂端Compiler Option SQL 只有在撰寫 DB2 程式時才需要。與此類似，CICS （"COBOL3"） 參數(shù)只對 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直到出現(xiàn)如
圖 18所示的 Setup Complete 面板。
圖 16和
圖 17顯示在 binder 設置面板和 Setup Complete 面板之間顯示的面板。
Setup Complete 面板可以讓您匯出系統(tǒng)屬性。這是唯一可以做到這一點的地方，繼續(xù)往下進行匯出屬性是一種好的做法，特別是出於備份的考慮。
可以在這時連接到系統(tǒng)，如圖 19 所示。雖然這是可選的，但是可以很好地檢查系統(tǒng)是否配置正確。
為了繼續(xù)進行 z/OS 專案的建立，右擊系統(tǒng)並選擇 Disconnect中斷連接（如果是連接的）。
回到頂端要建立 z/OS 專案，請打開 z/OS Projects 透視圖。選擇 Window > Open Perspective > z/OS Projects。（請在 Other...中查找 z/OS Project。）
右擊 z/OS Projects 面板的空白區(qū)可以選擇 New > MVS Project， 如圖 20 所示。命名您的專案並選擇哪個 z/OS 系統(tǒng) （主機縮寫名，即 Host Short Name）和高級限定符（High Level Qualifier）與這個專案相關聯(lián)，如圖 21 所示。因為這個專案（在它建立時）繼承了相關聯(lián)的系統(tǒng)的所有屬性，選擇 Finish並接受 z/OS 系統(tǒng)的所有屬性。
在撰寫程式碼或者編譯程序之前，您必須通過連接到 z/OS 系統(tǒng)、進入 z/OS Systems 透視圖並右擊 z/OS System 來建立一些資料集。然後，選擇 Connect...，如圖 22 所示。
如圖 23 所示，選擇 OK以登錄到 z/OS 系統(tǒng)。開始建立所需要的資料集，除非您以前已經建立了它們。
回到頂端在 z/OS Systems 視圖中，右擊 MVS User ID 並選擇 Allocate PDS...。這會顯示如圖 24 所示的面板。
輸入要建立的資料集的名字。High Level Qualifier 作為首碼添加到資料集名中。選擇 Next以選擇是根據(jù)現(xiàn)有資料集為資料集建模（使用一些模型），還是手工指定所有參數(shù)的值。在這個例子中，透過選擇 Specify characteristics by usage type使用預先設定的模型，如圖 25 所示。
保證預先設定的值對於安裝是正確的，並改變那些需要改變的地方，比如圖 26 中所示的 Block Size。
選擇 Finish會對 z/OS 發(fā)出一個 TSO ALLOCATE 命令，並帶有基於圖 26 中規(guī)範的所有正確參數(shù)。建立了所有資料集後，必須將它們添加到專案中才能使用。要將資料集添加到專案中，請選擇這些資料集，右擊突出顯示的資料集，選擇 Add to Project...，如圖 27 所示。
這會打開如圖 28 所示的面板。
在圖 28 中，所需要做的就是選擇在哪個專案中添加資料集並點選 Enter。專案現(xiàn)在看起來應該像圖 29。
回到頂端要建立一個 PDS 成員以放入應用程式碼，請右擊原始程式碼庫並選擇 Create PDS Member...，如圖 30 所示。
這會打開一個面板，要求輸入成員名，如圖 31 所示。
這會打開這個成員，使您可以鍵入程式碼。注意系統(tǒng)為成員名添加了一個副檔名，例如，對於 COBOL 為 .cbl，對於 Assembler 為 .asm，如圖 32 所示。這是由 Host Data Set 名上的低級限定符所決定的，如在前面
圖 10中定義的。
只有在保存資料 後，才可以在 Outline 窗格中看到資料。圖 33 顯示了 Outline 窗格。
回到頂端要編譯這段程式碼，需要產生一些 JCL 以執(zhí)行編譯任務。為此，右擊 project 窗格中的成員名。For Compile Link 選項產生編譯和連結的步驟，如圖 34 所示。
這會打開圖 35 所示的面板，要求確認在哪裡寫入產生的 JCL。
產生完 JCL 後，會打開一個訊息方塊，如圖 36 所示。
透過展開 JCL 程式庫並雙擊成員名，產生的 JCL 就打開了，以對之進行顯示（或編輯），如圖 37 所示。產生後，就可以重新提交這個 JCL 而不用重新產生。只有底層屬性改變時才需要重新產生 JCL。
雙擊這個選項卡（例如，圖 37 中的 MYPROG01.JCL ） 會將這個窗格擴大為全螢幕。再次雙擊同一個選項卡會使它回到原來的大小。
回到頂端要提交 JCL 並觀看結果，請右擊 JCL 成員名並選擇 Submit，如圖 38 所示。
這會在 Tasks 窗格中放一個項，顯示提交的作業(yè)的 JES 號，如圖 39 所示。
要看編譯和連結是否成功，可透過右擊 JCL 成員並選擇 Get Job Output來檢查作業(yè)輸出，如圖 40 所示。
這會將作業(yè)輸出檢索到 z/OS Output Console，如圖 41 所示，如果需要可以在這裡觀察它。
如 果作業(yè)成功，那麼應當在 LOAD 程式庫中看到這個程式的一項， 在 Enterprise Developer 中顯示為帶有副檔名 .exe。如果有程式設計錯誤，那麼修改程式碼並重新提交作業(yè)。如果錯誤是在 JCL 中，那麼與管理員或者系統(tǒng)程式師聯(lián)繫以得到正確的資訊。得到正確資訊後，必須找到 z/OS Systems、右擊它、選擇 Properties，然後在那裡進行修改。然後必須重新產生 JCL。
恭喜！您已經成功地用 WebSphere Studio Enterprise Developer 建立了一個系統(tǒng)連接、一個專案和一些資料集了。您還編輯並編譯了原始程式碼！
回到頂端您可以參閱本文在 developerWorks 全球網站上的
英文原文.
存取
系列概述頁面， 以得到本系列文章的當前列表。
閱讀本系列的第一篇文章
整合不同的 IT 系統(tǒng)，第 1 部分 —— 介紹和概述，它提供了對整合和收購解決方案的概述。
參閱本系列的第 2 部分
設計新的索賠系統(tǒng)，以瞭解團隊設計的背景資訊。
存取
developerWorks WebSphere 上的
WebSphere Studio 專區(qū)，得到有關如何獲得並使用工具以進行應用程式開發(fā)的全面資訊。
存取 developerWorks 的
WebSphere 專區(qū)中的
WebSphere Business Integration。
在
IBM Software中找到有關
WebSphere Business Integration 的更多內容。
WebSphere Studio Enterprise Developer
產品網站提供了產品特性、好處和系統(tǒng)要求。
透過
developerWorks Subscription得到
WebSphere Studio Enterprise Developer V5.0 for Windows。
回到頂端Grant Ward Able 以前是系統(tǒng)程式師，在 CICS、MQSeries 和 MERVA 方面有 15 年以上的經驗。他現(xiàn)在就職於 IBM Software Group System House Solutions Test，負責實作和測試端到端業(yè)務方案。您可以透過
wardable@uk.ibm.com與 Grant 聯(lián)繫。
回到頂端不甚滿意！(1)
可再加強 (2)
持平 (3)
相當不錯 (4)
受益匪淺！(5)
回到頂端Other company, product, or service names may be trademarks or service marks of others.
關於IBM 隱私權條款 聯(lián)絡我們
