Сегодня я предлагаю поговорить о ситуациях, когда требуется отправить IMS сообщение MPP процессу из программы, написанной на PL/I.
Работа с IMS очередями (и, в принципе, с IMS) осуществляется при помощи внешней процедуры PLITDLI:
DCL PLITDLI EXTERNAL ENTRY;
Для отсылки сообщения нам потребуется выполнить три команды:
1. Установка альтернативного PCB на требуемую IMS очередь.
2. Запись сообщения в IMS очередь.
3. Отсылка сигнала о том, что сообщение готово к отсылке (так называемый purge).
Процедура PLITDLI вызывается с переменным числом параметров. В качестве первого параметра Вам необходимо передать количество остальных параметров.
Для передачи этого количество слудет использовать статичные целочисленные переменные длиной 4 байта:
DCL TWO FIXED BIN(31) STATIC INIT(2); DCL THREE FIXED BIN(31) STATIC INIT(3); DCL FOUR FIXED BIN(31) STATIC INIT(4);
Последние комментарии
6 года 48 недели назад
6 года 48 недели назад
6 года 49 недели назад
6 года 49 недели назад
6 года 50 недели назад
6 года 50 недели назад
6 года 50 недели назад
6 года 50 недели назад
6 года 51 недели назад
6 года 51 недели назад