Re: Channel exits/API exits RPG
Before acting on this e-mail or opening any attachment, you are advised to read the disclaimer at the end of this mail. Thanks Vengoal, your sample is very helpful. I put it on a receiver channel, sent a message from a java routine and the following was produced in the spool file: Start ÇÁ%%? È? ÈÇÁ Ä??ø ÇÁ%%? È? ÈÇÁ Ä??ø add data I changed the sender channel to specify convert(*yes) and the spool file now shows: Start hello to the coop! hello to the coop!add data Any ideas how to do the data conversion through the program rather than by changing the channel? The sending channel goes into retry, the following message is produced for the receiver: === 03/25/04 18:06:33 AMQ9196: Data length is larger than the agent buffer length. EXPLANATION: Cause . . . . . : The data length '454' set by exit 'MSGEXITR QGPL' is larger than the agent buffer length. The user exit returned data in the supplied agent buffer, but the length specified is greater than the length of the buffer. === Any suggestions? Thanks again, Pat Reply Separator Subject:Re: Channel exits/API exits RPG Author: Vengoal Chang [EMAIL PROTECTED] Date: 25/03/2004 10:55 I wrote a sample at 2003/5/27 or 27, please see http://vm.akh-wien.ac.at/wa/~LISTSERV/MQSER_L/DBNAMES?IX=76IH=27IB=29; IS=54397IL=568 http://vm.akh-wien.ac.at/wa/~LISTSERV/MQSER_L/DBNames?IX=76IH=27IB=29; IS=54397IL=568PART=1 Vengoal -Original Message- From: MQSeries List [mailto:[EMAIL PROTECTED] On Behalf Of [EMAIL PROTECTED] Sent: Thursday, March 25, 2004 9:24 AM To: [EMAIL PROTECTED] Subject: Re: Channel exits/API exits RPG I read somewhere that exits can only be coded in C...hope I am wrong for your sake. Sid -Original Message- From: Pat O'Dowd [mailto:[EMAIL PROTECTED] Sent: Thursday, 25 March 2004 4:19 AM To: [EMAIL PROTECTED] Subject: Channel exits/API exits RPG Before acting on this e-mail or opening any attachment, you are advised to read the disclaimer at the end of this mail. Hi, Has anyone written a channel message or an API exit on the iSeries in RPG - OPM or ILE? (I cant use C as there is no compiler and the client does not want to use C.) As a first attempt I put together a channel message exit listed below. It compiles but when I assign it to the channel and attempt to start the channel, I get: AMQ9535: User exit not valid. Are there any example exits in RPG anywhere or can anyone provide one? I have looked through the Intercommunication manual and RPG reference, are there any other manuals/web sites etc that you would recommend? Any suggestions on how I might determine what is invalid with the exit? Thanks in advance, Pat IMQCXP DS . structure definition . IMQCDDS . structure definition . IABUFDS * C *ENTRYPLIST C PARM MQCXP C PARM MQCD C PARM DATLEN 90 C PARM ABUFL 90 C PARM ABUF C PARM EBUFL 90 C PARM EBUF 16 * C Z-ADD0 CXRES C RETRN C SETON LR ** This e-mail is intended solely for the addressee and is strictly confidential. If you are not the addressee, please do not read, print, re-transmit, store or act in reliance on it or any attachments. Instead please e-mail it back to the sender and delete the message from your computer. E-mail transmission cannot be guaranteed to be secure or error free and The Co-operative Bank accepts no liability for changes made to this e-mail (and any attachments) after it was sent or for viruses arising as a result of this e-mail transmission. Any unauthorised reproduction, dissemination, copying, disclosure, modification, distribution and/or publication of this e-mail message is strictly prohibited. The Co-operative Bank reserves the right to intercept any e - mails or other communication for permitted purposes in accordance with the current legislation which you send to, or receive from, any of the employees or agents of the Bank via Bank telecommunication systems. By so corresponding you also give your consent to the Bank monitoring and recording of any correspondence using these systems. The Co-operative Bank p.l.c
Channel exits/API exits RPG
Before acting on this e-mail or opening any attachment, you are advised to read the disclaimer at the end of this mail. Hi, Has anyone written a channel message or an API exit on the iSeries in RPG - OPM or ILE? (I cant use C as there is no compiler and the client does not want to use C.) As a first attempt I put together a channel message exit listed below. It compiles but when I assign it to the channel and attempt to start the channel, I get: AMQ9535: User exit not valid. Are there any example exits in RPG anywhere or can anyone provide one? I have looked through the Intercommunication manual and RPG reference, are there any other manuals/web sites etc that you would recommend? Any suggestions on how I might determine what is invalid with the exit? Thanks in advance, Pat IMQCXP DS . structure definition . IMQCDDS . structure definition . IABUFDS * C *ENTRYPLIST C PARM MQCXP C PARM MQCD C PARM DATLEN 90 C PARM ABUFL 90 C PARM ABUF C PARM EBUFL 90 C PARM EBUF 16 * C Z-ADD0 CXRES C RETRN C SETON LR ** This e-mail is intended solely for the addressee and is strictly confidential. If you are not the addressee, please do not read, print, re-transmit, store or act in reliance on it or any attachments. Instead please e-mail it back to the sender and delete the message from your computer. E-mail transmission cannot be guaranteed to be secure or error free and The Co-operative Bank accepts no liability for changes made to this e-mail (and any attachments) after it was sent or for viruses arising as a result of this e-mail transmission. Any unauthorised reproduction, dissemination, copying, disclosure, modification, distribution and/or publication of this e-mail message is strictly prohibited. The Co-operative Bank reserves the right to intercept any e - mails or other communication for permitted purposes in accordance with the current legislation which you send to, or receive from, any of the employees or agents of the Bank via Bank telecommunication systems. By so corresponding you also give your consent to the Bank monitoring and recording of any correspondence using these systems. The Co-operative Bank p.l.c. is registered in England and Wales, number 990937. The registered office is at PO Box 101, 1, Balloon Street, Manchester, M60 4EP. ** Instructions for managing your mailing list subscription are provided in the Listserv General Users Guide available at http://www.lsoft.com Archive: http://vm.akh-wien.ac.at/MQSeries.archive
Re: Channel exits/API exits RPG
I read somewhere that exits can only be coded in C...hope I am wrong for your sake. Sid -Original Message- From: Pat O'Dowd [mailto:[EMAIL PROTECTED] Sent: Thursday, 25 March 2004 4:19 AM To: [EMAIL PROTECTED] Subject: Channel exits/API exits RPG Before acting on this e-mail or opening any attachment, you are advised to read the disclaimer at the end of this mail. Hi, Has anyone written a channel message or an API exit on the iSeries in RPG - OPM or ILE? (I cant use C as there is no compiler and the client does not want to use C.) As a first attempt I put together a channel message exit listed below. It compiles but when I assign it to the channel and attempt to start the channel, I get: AMQ9535: User exit not valid. Are there any example exits in RPG anywhere or can anyone provide one? I have looked through the Intercommunication manual and RPG reference, are there any other manuals/web sites etc that you would recommend? Any suggestions on how I might determine what is invalid with the exit? Thanks in advance, Pat IMQCXP DS . structure definition . IMQCDDS . structure definition . IABUFDS * C *ENTRYPLIST C PARM MQCXP C PARM MQCD C PARM DATLEN 90 C PARM ABUFL 90 C PARM ABUF C PARM EBUFL 90 C PARM EBUF 16 * C Z-ADD0 CXRES C RETRN C SETON LR ** This e-mail is intended solely for the addressee and is strictly confidential. If you are not the addressee, please do not read, print, re-transmit, store or act in reliance on it or any attachments. Instead please e-mail it back to the sender and delete the message from your computer. E-mail transmission cannot be guaranteed to be secure or error free and The Co-operative Bank accepts no liability for changes made to this e-mail (and any attachments) after it was sent or for viruses arising as a result of this e-mail transmission. Any unauthorised reproduction, dissemination, copying, disclosure, modification, distribution and/or publication of this e-mail message is strictly prohibited. The Co-operative Bank reserves the right to intercept any e - mails or other communication for permitted purposes in accordance with the current legislation which you send to, or receive from, any of the employees or agents of the Bank via Bank telecommunication systems. By so corresponding you also give your consent to the Bank monitoring and recording of any correspondence using these systems. The Co-operative Bank p.l.c. is registered in England and Wales, number 990937. The registered office is at PO Box 101, 1, Balloon Street, Manchester, M60 4EP. ** Instructions for managing your mailing list subscription are provided in the Listserv General Users Guide available at http://www.lsoft.com Archive: http://vm.akh-wien.ac.at/MQSeries.archive Instructions for managing your mailing list subscription are provided in the Listserv General Users Guide available at http://www.lsoft.com Archive: http://vm.akh-wien.ac.at/MQSeries.archive
Re: Channel exits/API exits RPG
I wrote a sample at 2003/5/27 or 27, please see http://vm.akh-wien.ac.at/wa/~LISTSERV/MQSER_L/DBNAMES?IX=76IH=27IB=29; IS=54397IL=568 http://vm.akh-wien.ac.at/wa/~LISTSERV/MQSER_L/DBNames?IX=76IH=27IB=29; IS=54397IL=568PART=1 Vengoal -Original Message- From: MQSeries List [mailto:[EMAIL PROTECTED] On Behalf Of [EMAIL PROTECTED] Sent: Thursday, March 25, 2004 9:24 AM To: [EMAIL PROTECTED] Subject: Re: Channel exits/API exits RPG I read somewhere that exits can only be coded in C...hope I am wrong for your sake. Sid -Original Message- From: Pat O'Dowd [mailto:[EMAIL PROTECTED] Sent: Thursday, 25 March 2004 4:19 AM To: [EMAIL PROTECTED] Subject: Channel exits/API exits RPG Before acting on this e-mail or opening any attachment, you are advised to read the disclaimer at the end of this mail. Hi, Has anyone written a channel message or an API exit on the iSeries in RPG - OPM or ILE? (I cant use C as there is no compiler and the client does not want to use C.) As a first attempt I put together a channel message exit listed below. It compiles but when I assign it to the channel and attempt to start the channel, I get: AMQ9535: User exit not valid. Are there any example exits in RPG anywhere or can anyone provide one? I have looked through the Intercommunication manual and RPG reference, are there any other manuals/web sites etc that you would recommend? Any suggestions on how I might determine what is invalid with the exit? Thanks in advance, Pat IMQCXP DS . structure definition . IMQCDDS . structure definition . IABUFDS * C *ENTRYPLIST C PARM MQCXP C PARM MQCD C PARM DATLEN 90 C PARM ABUFL 90 C PARM ABUF C PARM EBUFL 90 C PARM EBUF 16 * C Z-ADD0 CXRES C RETRN C SETON LR ** This e-mail is intended solely for the addressee and is strictly confidential. If you are not the addressee, please do not read, print, re-transmit, store or act in reliance on it or any attachments. Instead please e-mail it back to the sender and delete the message from your computer. E-mail transmission cannot be guaranteed to be secure or error free and The Co-operative Bank accepts no liability for changes made to this e-mail (and any attachments) after it was sent or for viruses arising as a result of this e-mail transmission. Any unauthorised reproduction, dissemination, copying, disclosure, modification, distribution and/or publication of this e-mail message is strictly prohibited. The Co-operative Bank reserves the right to intercept any e - mails or other communication for permitted purposes in accordance with the current legislation which you send to, or receive from, any of the employees or agents of the Bank via Bank telecommunication systems. By so corresponding you also give your consent to the Bank monitoring and recording of any correspondence using these systems. The Co-operative Bank p.l.c. is registered in England and Wales, number 990937. The registered office is at PO Box 101, 1, Balloon Street, Manchester, M60 4EP. ** Instructions for managing your mailing list subscription are provided in the Listserv General Users Guide available at http://www.lsoft.com Archive: http://vm.akh-wien.ac.at/MQSeries.archive Instructions for managing your mailing list subscription are provided in the Listserv General Users Guide available at http://www.lsoft.com Archive: http://vm.akh-wien.ac.at/MQSeries.archive Instructions for managing your mailing list subscription are provided in the Listserv General Users Guide available at http://www.lsoft.com Archive: http://vm.akh-wien.ac.at/MQSeries.archive