× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.


  • Subject: Data to post truncated
  • From: Nihat Ezer <Nihat.Ezer@xxxxxxxxxxxxxx>
  • Date: Tue, 14 Nov 2017 16:57:43 +0000
  • Ironport-phdr: 9a23:XC+txhP9MXuYw1eFGhcl6mtUPXoX/o7sNwtQ0KIMzox0Ivj+rarrMEGX3/hxlliBBdydt6oczbWP+PG8EUU7or+5+EgYd5JNUxJXwe43pCcHRPC/NEvgMfTxZDY7FskRHHVs/nW8LFQHUJ2mPw6arXK99yMdFQviPgRpOOv1BpTSj8Oq3Oyu5pHfeQpFiCahbb9oLhi6sArdu80ZjIB/Nqs/1xzFr2dSde9L321oP1WTnxj95se04pFu9jlbtuwi+cBdT6j0Zrw0QrNEAjsoNWA1/9DrugLYTQST/HscU34ZnQRODgPY8Rz1RJbxsi/9tupgxCmXOND9QL4oVTi+6apgVRnlgzoFOTEk6mHaksx+grxGrhK9qRJxwI/Ub52aO/dlZKzRYc8WSHBdUspNSSBMBJ63YYsVD+oGOOZVt5Hzp1oOrRSkGQmnGezhyz5WiX/swKY31PwvEQDG3AM6A9ICqnvardTrO6cISu261rfIzTTdb/xMwjfy8pLEfQwmofGJR75wbdDRxFApGgjYgFuQronlMCmU1uQLq2WU9fRgVeOxi2E9sAF+uCKjydsrionMnI4V1krE+CNky4g2Pd21UE12bNG+HJZfuCyWLZZ6TtkgTmxmoCo217kLtYChcCQXyZkqxATTZ+KJfoWL+B7uWuicLDFlj3x/Yr2/nQy98U24x+35Ucm7zUhFozJektnJqnANzxvT6tWbSvdl/keuxzKP1wfL5+xYLk86iLfWJZ0mzLA/l5Uer0bNEjPrlEnslqCWaEQk+vay5OT8eLrqvJucN4hohQ7kNqQigs2/AeImPQgSR2WW+uux2Kfs8ED2WrlGk+c6n6vXvZzCIMQUvK+5Awtb0oY57Ba/Ci+r3swZnXkHNl1FZAiLgYfoOl7QOvD1Fu2wg0qtkDd13f/GJafuDo/RIXjElbftZ6p961RExAop0d9f/45UCq0GIP/rQE/xrNPYAxAlPwCo2urnDM5w1oYfWW2SGK+WKqXSsVCW6e41P+aMY4oV637BLK1vqOT2giNhwRoZVayo0YEebn+1WP9hJgrTKS72mthdST9PuiI7TeDwgVuNXHhYYHPkDIwm4TRuLoOmBJuLa5KgmvTV+ia7F4EQS3JLEHiFD3b2fp6NHfwLbWSOOJkywXQ/SbG9Rtp5hlmVvwjgxu8/Iw==
  • List-archive: <https://archive.midrange.com/rpg400-l/>
  • List-help: <mailto:rpg400-l-request@midrange.com?subject=help>
  • List-id: "RPG programming on the IBM i \(AS/400 and iSeries\)" <rpg400-l.midrange.com>
  • List-post: <mailto:rpg400-l@midrange.com>
  • List-subscribe: <https://lists.midrange.com/mailman/listinfo/rpg400-l>, <mailto:rpg400-l-request@midrange.com?subject=subscribe>
  • List-unsubscribe: <https://lists.midrange.com/mailman/options/rpg400-l>, <mailto:rpg400-l-request@midrange.com?subject=unsubscribe>

Greetings,

Using the HTTPAPI Ver 1.31 by Scott Klement, which works well so far and my debug file with the statement of http_debug(*on: '/tmp/ew0001-debug.txt') currently shows that my data to post has been truncated and its length is 32766 characters, so it seems that i need to increase it but do not know how to do it.



Here is a snippet from my code:

_____

dcl-s loUrl char(128);

dcl-s rcvDta varchar(32766);

dcl-s datatoPost varchar(32766) ;



loReturnCode = http_url_post_raw(loUrl

: %addr(loDatatoPost)

: %len(%trim(loDatatoPost))

: FD

: %paddr(EWS_httpVeriyiAl

: HTTP_TIMEOUT

: HTTP_USERAGENT

: 'application/json');



..

..



// ASCII to EBCDIC conversion

http_xlateP(%len(glRcvDta): %addr(glRcvDta) + 2: TO_EBCDIC);



dcl-proc EWS_httpVeriyiAl;

dcl-pi EWS_httpVeriyiAl int(10);

peFD int(10) value;

peData pointer value;

peLen int(10) value;

end-pi;



dcl-s loDta char(32000) based(peData);



glRcvDta = glRcvDta + %subst(loDta: 1: peLen);

return peLen;

end-proc EWS_httpVeriyiAl;

_____


--
Thank you,
Nihat

[https://www.avivasa.com.tr/i/Assets/images/imza-avivasa.jpg]<https://www.avivasa.com.tr/otomatik-katilim?utm_source=kurumsal-email&utm_campaign=imza-banner>

Bu e-postanin i?erdigi bilgiler (ekleri dahil olmak ?zere) gizlidir. Onayimiz olmaksizin ???nc? kisilere a?iklanamaz. Bu mesajin g?nderilmek istendigi kisi degilseniz, l?tfen mesaji sisteminizden derhal siliniz. AvivaSA Emeklilik ve Hayat A.S. bu mesajin i?erdigi bilgilerin dogrulugu veya eksiksiz oldugu konusunda bir garanti vermemektedir. Bu nedenle bilgilerin ne sekilde olursa olsun i?eriginden, iletilmesinden, alinmasindan, saklanmasindan sorumlu degildir. Bu mesajin bilinen vir?slere karsi kontrolleri AvivaSA Emeklilik ve Hayat A.S. tarafindan yapilmistir. Ancak internet iletisiminde g?venlik ve hatasiz g?nderim garanti edilemeyeceginden, mesajin yerine ulasmamasi, ge? ulasmasi, i?eriginin bozulmasi ya da mesajin vir?s tasimasi gibi problemler olusabilir. AvivaSA Emeklilik ve Hayat A.S. bu tip sorunlardan sorumlu tutulmaz. Bu mesajin i?erigi yazarina ait olup AvivaSA Emeklilik ve Hayat A.S.'nin g?r?slerini i?ermeyebilir.

The information contained in this e-mail (including any attachments) is confidential. It must not be disclosed to any person without our authority. If you are not the intended recipient, please delete it from your system immediately. AvivaSA Emeklilik ve Hayat A.S. makes no warranty as to the accuracy or completeness of any information contained in this message and hereby excludes any liability of any kind for the information contained therein or for the information transmission, reception, storage or use of such in any way whatsoever. This message is scanned for known viruses by AvivaSA Emeklilik ve Hayat A.S. But Internet communications cannot be guaranteed to be secure or error-free as information could be intercepted, corrupted, lost, arrive late or contain viruses. The AvivaSA Emeklilik ve Hayat A.S. therefore does not accept liability for any errors or omissions in the context of this message which arise as a result of Internet transmission. Any opinions expressed in this message are those of the author and may not necessarily reflect the opinions of AvivaSA Emeklilik ve Hayat A.S.

As an Amazon Associate we earn from qualifying purchases.

This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.