В этом учебнике используются структуры данных COBOL для описания транзакций IMS входящих и исходящих сообщений. Входящие и исходящие сообщения идентичны, они содержат массив клиентских элементов, за которым следует одно поле, содержащее функциональный код. Этот массив может состоять не более, чем из восьми элементов, но для этого учебника в прикладную программу IMS вводятся только три элемента и только четыре элемента возвращаются прикладной программой IMS.
Транзакции IMS, используемые в этом учебнике, не относятся к Программам проверки установки IMS. Используется DFSDDLT0, прикладная программа IMS, выполняющая вызовы в IMS на основе информации оператора управления. Операторы управления DFSDDLT0 для этого учебника приводятся ниже. Однако если требуется запустить учебник, необходимо настроить среду для DFSDDLT0 и обеспечить необходимые JCL. В этом учебнике в качестве кода транзакции для приложения DFSDDLT0 используется SKS2.
S11 1 1 1 1 TP 1
L GU
E OK
E Z0088 DATA SKS2 03CN001Cathy Tang CN002Haley Fung X
CN003Steve Kuo 123456
WTO IC4JINOU: Одинарный сегмент, принятый от JITOC
L GN
E QD
WTO IC4JINOU: Конец ввода сегментов из JITOC
L ISRT JITOC53
L Z0113 DATA TRNCD04CN001Cathy T. CN002Haley F. X
CN003Steve K. CN004Kevin F. 65432X
1
E OK
WTO IC4JINOU: Вставлен простой сегмент - 3 элемента !!!!!!!!!!!!!
L GU
Подключение к серверу IMS