Ermanno, Please add the attached USR0029 member to file QWSDL2RPG and then run A_INSTALL again.By the way there was no need for installing the beta if you actually decided to fix Marshaller_toBase64Binary(). What I said was either fix WSDL2R98 _or_ install the beta.
Nevertheless, sorry for the missing USR0029 member. Thomas. B&R Informatica Sas schrieb:
Thomas I corrected the procedure Marshaller_toBase64Binary as indicated, I downloaded the beta and I've redone the installation In creating the module WSDL2R01 I get the error: USR0029 State QWSDL2RPG file not found, the installation terminates. What can I do? Ermanno B&R Informatica Sas Tel. +39 075602254 Cel. +39 337 600839 info@xxxxxxxxxxxxxxxxx < mailto:info@xxxxxxxxxxxxxxxxx> www.br-informatica.it < http://www.br-informatica.it> "ATTENZIONE:le informazioni contenute in questo messaggio sono da considerarsi confidenziali ed il loro utilizzo è riservato unicamente al destinatario sopra indicato. Chi dovesse ricevere questo messaggio per errore è tenuto ad informare il mittente ed a rimuoverlo definitivamente da ogni supporto elettronico o cartaceo." -----Messaggio originale----- Da: ftpapi-bounces@xxxxxxxxxxxxxxxxxxxxxx [mailto:ftpapi-bounces@xxxxxxxxxxxxxxxxxxxxxx]Per conto di Thomas Raddatz Inviato: domenica 6 dicembre 2009 19.50 A: HTTPAPI and FTPAPI Projects Oggetto: Re: R: R: Antwort: 7: Timeout occurred while trying to connect toserver Ermanno, Based on your input I was able to fix the bug in WSDL2RPG. The problem you encountered with your web service actually was a problem of the Base64 UnMarshaller. By mistake I defined a field as 2I0 (integer) instead of 2U0 (unsigned integer). Because of that mistake the maximum data size was reduced to 32k instead of 64k. I did not change anything in 'ws_cab', because I actually did not use it to debug the problem. Since the mistake was in service program WSDL2RPGRT, there is a good chance that you do not need to change something in 'ws_cab'. I used your debug data to create my own test web service and based on that web service I debugged the problem. Guess what, it is a nice barcode that you will get. There are two options to fix the problem: 1) Change the following lines in WSDL2R98 and reinstall WSDL2RPG: Procedures: Marshaller_toBase64Binary UnMarshaller_toBase64Binary Before: D outLength 1 2I 0 After: D outLength 1 2U 0 2) Download the latest beta from here: http://www.tools400.de/beta/wsdl2rpg_v1.10_20091206_1932.zip In case you do not know how to save the decoded file data to a stream file, here is the code I used do do that: /COPY QIFS,PIFS IFS IO-Procedures ... // Now let's call the web service. getBase64EncodedJpegFileResponse = Base64File_getBase64EncodedJpegFile( requestMessage: errText); // If the Web service finished successfully ... if (not Base64File_isError()); // ... write image data to IFS file. path = '/home/raddatz/wsdl2rpg/' + getBase64EncodedJpegFileResponse.fileName; hFile = f_openIfsFile(path : O_WRONLY + O_SHARE_RDONLY + O_CREAT + O_EXCL : *: *: *); if (hFile = RC_ERROR); sndMsg('Failed to open file: ' + path); else; bytes = f_writeIfsFile(hFile : %addr(getBase64EncodedJpegFileResponse... .fileData) + 2 : %len(getBase64EncodedJpegFileResponse... .fileData)); f_closeIfsFile(hFile); endif; else; In order to use the IFS procedures you have to bind to service program IFS. Last but not least do not forget to increase the size of 'retriveDDTObjectReturn': D impl_retriveDDTObjectResponse_t... D DS based(pDummy) D qualified D retriveDDTObjectReturn... D 128A varying For my test web service I set it to what is shown below: D tns_getBase64EncodedJpegFileResponse_t... D DS based(pDummy) D qualified D fileData 64449A varying D fileName 128A varying Regards, Thomas. B&R Informatica Sas schrieb:Thomas I tried what you suggested me but I can not solve the problem, sends youthestub as required; I will be very grateful if you can fix the problem. Ermanno. B&R Informatica Sas Tel. +39 075602254 Cel. +39 337 600839 info@xxxxxxxxxxxxxxxxx < mailto:info@xxxxxxxxxxxxxxxxx> www.br-informatica.it < http://www.br-informatica.it> "ATTENZIONE:le informazioni contenute in questo messaggio sono da considerarsi confidenziali ed il loro utilizzo è riservato unicamente al destinatario sopra indicato. Chi dovesse ricevere questo messaggio per errore è tenuto ad informare il mittente ed a rimuoverlo definitivamentedaogni supporto elettronico o cartaceo." -----Messaggio originale----- Da: ftpapi-bounces@xxxxxxxxxxxxxxxxxxxxxx [mailto:ftpapi-bounces@xxxxxxxxxxxxxxxxxxxxxx]Per conto di Thomas Raddatz Inviato: venerdì 4 dicembre 2009 18.37 A: HTTPAPI and FTPAPI Projects Oggetto: Re: R: Antwort: 7: Timeout occurred while trying to connect to server Ermanno, I agree that it seems as if the web service returns the binary image dataaselement data of element <retriveDDTObjectReturn>. Most like this is the reason why you receive the "receiver is too small" error message. Without the wsdl file all I can do is just guessing that your stub module should have a procedure ending with "retriveDDTObjectReturnEnd". That should be the procedurewhichreceives the data of element <retriveDDTObjectReturn>. Feel free to start the debugger and addabreakpoint to that procedure. When "depth" is 2, "value" should contain the image data and "name" should be set to "retriveDDTObjectReturn". If that is true, it is up to you to modify the stub module to put the image data to a place of your choice. The problem is the 64k barrier of RPG. Of course I could use pointers and dynamic memory allocation to manage larger response data but I am fairly sure that most of the RPG programmers would not be happy with that. The other option is to wait for V6R1 which allows fields up to 16MB. Just because I am curious, what is the schema type of "retriveDDTObjectReturn"? Last but not least, if you cannot fix the problem on your own, feel freetosend the generated stub module to me. At the moment I do have much time left for playing aroundbutperhaps I can fix it quickly. Having said that: I did not promise you anything. Regards, Thomas B&R Informatica Sas schrieb:Thomas, sorry for the delayed response, we'll send debugging where IthinkIunderstand that the web service called me back the string of the imagethatI think exceeds 64K. If this is the reason how can we fix this? Ermanno. B&R Informatica Sas Tel. +39 075602254 Cel. +39 337 600839 info@xxxxxxxxxxxxxxxxx < mailto:info@xxxxxxxxxxxxxxxxx> www.br-informatica.it < http://www.br-informatica.it> "ATTENZIONE:le informazioni contenute in questo messaggio sono da considerarsi confidenziali ed il loro utilizzo è riservato unicamente al destinatario sopra indicato. Chi dovesse ricevere questo messaggio per errore è tenuto ad informare il mittente ed a rimuoverlo definitivamentedaogni supporto elettronico o cartaceo." -----Messaggio originale----- Da: ftpapi-bounces@xxxxxxxxxxxxxxxxxxxxxx [mailto:ftpapi-bounces@xxxxxxxxxxxxxxxxxxxxxx]Per conto di thomas.raddatz@xxxxxx Inviato: giovedì 3 dicembre 2009 11.16 A: ftpapi@xxxxxxxxxxxxxxxxxxxxxx Oggetto: Antwort: 7: Timeout occurred while trying to connect to server Ermanno, May you please turn the debug log on and pass the debug log along withthewsdl file to me? Please ensure that the debug log does not contain any ctritical data such as user name and password. Please do not post the log and the wsdl file to the mailing list but send it directly to my tools400.de e-mail address. Thomas. ftpapi-bounces@xxxxxxxxxxxxxxxxxxxxxx schrieb am 03.12.2009 08:59:34:Von: info@xxxxxxxxxxxxxxxxx An: ftpapi@xxxxxxxxxxxxxxxxxxxxxx Datum: 03.12.2009 09:06 Betreff: 7: Timeout occurred while trying to connect to server Gesendet von: ftpapi-bounces@xxxxxxxxxxxxxxxxxxxxxx Thomas, to better clarify my application it m makes a request to the web service by passing the host name of an image and must receive the streamofthe image to be displayed on the browser While I am on first use of this tool, but I expect that the function retriveDDTObjectResponse, contains this stream of return and that I canopenthe image as if it had any link .. here is where does the limit Imentionedthat I could be 64K. This is the procedure or must return an attachment, stored on IFS andthendisplay it someone can clarify this fact, thanks for your availability, Ermanno. B&R Informatica Sas Tel. +39 075602254 Cel. +39 337 600839 info@xxxxxxxxxxxxxxxxx <mailto:info@xxxxxxxxxxxxxxxxx> www.br-informatica.it <http://www.br-informatica.it> "ATTENZIONE:le informazioni contenute in questo messaggio sono da considerarsi confidenziali ed il loro utilizzo è riservato unicamente al destinatario sopra indicato. Chi dovessericeverequesto messaggio per errore è tenuto ad informare il mittente ed a rimuoverlo definitivamente da ogni supporto elettronico o cartaceo." i Thomas,I changed the value localhost with 192.168 .... exposed theproblemwas due to a firewall that blocks traffic. Now that I can reach the host comes back to me the following error: The value of the receiver is too small to hold the result. 16: recvchunk: saveproc: Not all data was written -1009: The value of the receiver is too small to contain the result Got an idea on what may be caused? the web service I should return the stream of an image; There are size limitations? Ermanno. ----------------------------------------------------------------------- This is the FTPAPI mailing list. To unsubscribe, please go to: http://www.scottklement.com/mailman/listinfo/ftpapi ------------------------------------------------------------------------- IMPORTANT NOTICE: This email is confidential, may be legally privileged, and is for the intended recipient only. Access, disclosure, copying, distribution, or reliance on any of it by anyone else is prohibited and may be a criminal offence. Please delete if obtained in error and email confirmation to the sender. ----------------------------------------------------------------------- This is the FTPAPI mailing list. To unsubscribe, please go to: http://www.scottklement.com/mailman/listinfo/ftpapi ----------------------------------------------------------------------- __________ Informazioni da ESET NOD32 Antivirus, versione del databasedellefirme digitali 4657 (20091203) __________ Il messaggio è stato controllato da ESET NOD32 Antivirus. www.nod32.it ------------------------------------------------------------------------ ----------------------------------------------------------------------- This is the FTPAPI mailing list. To unsubscribe, please go to: http://www.scottklement.com/mailman/listinfo/ftpapi ---------------------------------------------------------------------------------------------------------------------------------------------- This is the FTPAPI mailing list. To unsubscribe, please go to: http://www.scottklement.com/mailman/listinfo/ftpapi ----------------------------------------------------------------------- __________ Informazioni da ESET NOD32 Antivirus, versione del databasedellefirme digitali 4661 (20091204) __________ Il messaggio è stato controllato da ESET NOD32 Antivirus. www.nod32.it ------------------------------------------------------------------------ ----------------------------------------------------------------------- This is the FTPAPI mailing list. To unsubscribe, please go to: http://www.scottklement.com/mailman/listinfo/ftpapi ---------------------------------------------------------------------------------------------------------------------------------------------- This is the FTPAPI mailing list. To unsubscribe, please go to: http://www.scottklement.com/mailman/listinfo/ftpapi ----------------------------------------------------------------------- __________ Informazioni da ESET NOD32 Antivirus, versione del database delle firme digitali 4665 (20091206) __________ Il messaggio è stato controllato da ESET NOD32 Antivirus. www.nod32.it ----------------------------------------------------------------------- This is the FTPAPI mailing list. To unsubscribe, please go to: http://www.scottklement.com/mailman/listinfo/ftpapi -----------------------------------------------------------------------
Attachment:
USR0029.ZIP
Description: Zip archive
----------------------------------------------------------------------- This is the FTPAPI mailing list. To unsubscribe, please go to: http://www.scottklement.com/mailman/listinfo/ftpapi -----------------------------------------------------------------------