Давайте создадим небольшую программу, в котором отправим содержимое текстового файла в MQ очередь.
Текст программы (немного откомментировал, если будут вопросы - пишите в комментариях):
/*********************************************************************/ /* MYMQSND: LOAD MQ QUEUE FROM FILE */ /*********************************************************************/ MYMQSND: PROC OPTIONS(MAIN) REORDER; /*********************************************************************/ /* BUILTIN функции */ /*********************************************************************/ DCL TRIM BUILTIN; DCL LENGTH BUILTIN; DCL ADDR BUILTIN; DCL ONCHAR BUILTIN; DCL ONCODE BUILTIN; DCL ONLOC BUILTIN; DCL ONSOURCE BUILTIN; /*********************************************************************/
Последние комментарии
4 года 46 недели назад
4 года 46 недели назад
4 года 48 недели назад
4 года 48 недели назад
4 года 48 недели назад
4 года 48 недели назад
4 года 48 недели назад
4 года 48 недели назад
4 года 50 недели назад
4 года 50 недели назад