Давайте создадим небольшую программу, в котором отправим содержимое текстового файла в 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; /*********************************************************************/
Последние комментарии
2 года 7 недели назад
2 года 7 недели назад
2 года 8 недели назад
2 года 8 недели назад
2 года 9 недели назад
2 года 9 недели назад
2 года 9 недели назад
2 года 9 недели назад
2 года 10 недели назад
2 года 10 недели назад