Урок 3 посвящен созданию метода Java™.
В этом уроке решаются следующие задачи:
- Создание метода Java
- Создание преобразования входных и выходных данных между COBOL и Java
- На панели Фрагменты выберите J2C. Дважды щелкните на Добавить метод в объект J2C Java.
- На странице Методы Java
щелкните на Добавить
- В поле Имя введите runPhoneBook.
- На этом этапе импортируйте файл Ex01.cbl (COBOL), который
нужен для создания приложения. Файл Ex01.cbl расположен в
<installdir>\IBM/IBMIMShared/plugins/com.ibm.j2c.cheatsheet.content\Samples/MS/phonebook,
где <installdir> - это каталог, в котором установлен данный
продукт.
Файл COBOL содержит программу приложения, которая запускается на сервере IMS. Имеется определение
его структуры, передаваемое на сервер IMS
через область сообщений. Данная структура представляет записи клиента,
возвращаемые из прикладной программы IMS. Перед тем, как работать с файлом, его необходимо импортировать из
файловой системы в рабочую среду.
Рядом с полем Типы ввода
нажмите кнопку Создать.
- На странице Импорт данных убедитесь, что в поле Выбрать
преобразование выбрано COBOL_TO_JAVA.
Щелкните на Обзор рядом с файлом COBOL
- Найдите в файловой системе файл Ex01.cbl и щелкните на Открыть.
IDENTIFICATION DIVISION.
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
DATA DIVISION.
*
* Коннектор IMS для Java, Источник сообщений транзакций COBOL
*
*********************************************************************/
* */
* (c) Авторское право Корпорации IBM 2003 */
* Авторские права защищены */
* Лицензионный материал - собственность IBM */
* */
* Заявление об ограничении ответственности. */
* */
* Следующий код (закрытый) предоставляется исключительно для помощи */
* в разработке приложений. Код предоставляется "КАК ЕСТЬ". IBM НЕ */
* ДАЕТ НИКАКИХ ГАРАНТИЙ, ЯВНЫХ ИЛИ ПОДРАЗУМЕВАЕМЫХ, ВКЛЮЧАЯ (НО */
* НЕ ОГРАНИЧИВАЯСЬ ИМИ) ПОДРАЗУМЕВАЕМЫЕ ГАРАНТИИ КОММЕРЧЕСКОЙ */
* ЦЕННОСТИ И ПРИГОДНОСТИ ДЛЯ ОПРЕДЕЛЕННОЙ ЦЕЛИ В ЧАСТИ ФУНКЦИЙ */
* ИЛИ ИСПОЛНЕНИЯ НАСТОЯЩЕГО КОДЕКСА. */
* IBM не несет ответственности за любой ущерб, вытекающий из */
* использования сгенерированного вами кода, даже если фирма была */
* предупреждена о возможности таких убытков. */
* */
* РАСПРОСТРАНЕНИЕ. */
* */
* Этот сгенерированный код можно свободно распространять, */
* копировать, изменять и включать в другое программное обеспечение, */
* при условии, что: */
* - он сопровождается вышеприведенным уведомлением об авторских */
* правах и ОТКАЗОМ от неповрежденности */
* - программное обеспечение не перепродается */
* */
*********************************************************************/
*
LINKAGE SECTION.
01 INPUT-MSG.
02 IN-LL PICTURE S9(3) COMP.
02 IN-ZZ PICTURE S9(3) COMP.
02 IN-TRCD PICTURE X(10).
02 IN-CMD PICTURE X(8).
02 IN-NAME1 PICTURE X(10).
02 IN-NAME2 PICTURE X(10).
02 IN-EXTN PICTURE X(10).
02 IN-ZIP PICTURE X(7).
01 OUTPUT-MSG.
02 OUT-LL PICTURE S9(3) COMP VALUE +0.
02 OUT-ZZ PICTURE S9(3) COMP VALUE +0.
02 OUT-MSG PICTURE X(40) VALUE SPACES.
02 OUT-CMD PICTURE X(8) VALUE SPACES.
02 OUT-NAME1 PICTURE X(10) VALUE SPACES.
02 OUT-NAME2 PICTURE X(10) VALUE SPACES.
02 OUT-EXTN PICTURE X(10) VALUE SPACES.
02 OUT-ZIP PICTURE X(7) VALUE SPACES.
02 OUT-SEGNO PICTURE X(4) VALUE SPACES.
PROCEDURE DIVISION.
- Нажмите кнопку Далее.
- На странице Программа импорта COBOL щелкните на Показать дополнительные параметры.
- Выберите следующие опции:
Табл. 1. Настройки
параметров программы импорта COBOL| Параметр |
Значение |
| Имя платформы |
Z/OS |
| Кодовая страница |
IBM-037 |
| Идентификатор формата с плавающей точкой |
IBM® Hexadecimal |
| Внешний десятичный знак |
EBCDIC |
| Идентификатор endian |
Big |
| Идентификатор удаленного целого endian |
Big |
| Идентификатор quote |
DOUBLE |
| Идентификатор trunc |
STD |
| Идентификатор Nsymbol |
DBCS |
- Для загрузки данных нажмите Запросить.
- Откроется список структур данных из файла Ex01.cbl. Выберите INPUT-MSG в поле Структуры
данных.
- Нажмите кнопку Далее.
- На странице Сохранение свойств выберите для типа ввода
следующие значения:
- Выберите По умолчанию для Стиль
создания.
- Выберите Обзор рядом с полем Имя проекта и выберите веб-проект IMSPhoneBook.
- В поле Имя пакета введите sample.ims.data.
- В поле Имя класса примите
по умолчанию INPUTMSG. Нажмите кнопку Готово.
- На странице Метод Java выберите Создать рядом с полем Тип выходных данных.
- На странице Импорт данных убедитесь, что в поле Выбрать
преобразование выбрано COBOL_TO_JAVA.
- Найдите в файловой системе файл Ex01.cbl и
щелкните на Открыть.
- Нажмите кнопку Далее.
- На странице Программа импорта COBOL щелкните на Показать дополнительные параметры.
- Выберите следующие опции:
Табл. 2. Настройки
параметров программы импорта COBOL| Параметр |
Значение |
| Имя платформы |
Z/OS |
| Кодовая страница |
IBM-037 |
| Идентификатор формата с плавающей точкой |
IBM Hexadecimal |
| Внешний десятичный знак |
EBCDIC |
| Идентификатор endian |
Big |
| Идентификатор удаленного целого endian |
Big |
| Идентификатор quote |
DOUBLE |
| Идентификатор trunc |
STD |
| Идентификатор Nsymbol |
DBCS |
- Для загрузки данных нажмите Запросить.
- Откроется список структур данных из файла Ex01.cbl. Выберите OUTPUT-MSG в поле Структуры
данных.
- Нажмите кнопку Далее.
- На странице Сохранение свойств
- Выберите По умолчанию для Стиль
создания.
- Выберите Обзор рядом с полем Имя проекта и выберите веб-проект IMSPhoneBook.
- В поле Имя пакета введите sample.ims.data.
- В поле Имя класса примите
по умолчанию OUTPUTMSG. Нажмите
кнопку Готово.
- Выйдите Сохранить сеанс как сценарий Ant.
- На странице Метод Java
щелкните на Готово.
- На странице Связывание подробно убедитесь, что interactionVerb установлен на SYNC_SEND_RECEIVE(1) для указания того,
что взаимодействие с IMS предполагает
отправку после получения взаимодействия.
- Нажмите кнопку Готово.