|
This somehow got hosed up. I redid the rpg without worrying about spacing so hopefully it will all come across correctly. C eval wrtdta Ğhtmlheader + newline + newline C eval wrtdtalen Ğ%len(%trim(wrtdta)) C callb 'QtmhWrStout' C parm wrtdata C parm wrtdtalen C parm qusec C eval wrtdta Ğ'html stuff here' C eval wrtdtalen Ğ%len(%trim(wrtdta)) C callb 'QtmhWrStout' C parm wrtdata C parm wrtdtalen C parm qusec Phil > -----Original Message----- > From: web400-admin@midrange.com [mailto:web400-admin@midrange.com]On > Behalf Of Phil Groschwitz > Sent: Tuesday, September 18, 2001 5:39 PM > To: web400@midrange.com > Subject: RE: [WEB400] HTTP Server Problems. > > > Are you reading the replies? :) > > 1. Don't put a space between the two NewLine. > 2. Call QtmhWrStout with just the header. > > Example: > > > C EVAL WrtData > C > eval WrtDtaLen > C CALLB 'QtmhWrStout' > > C PARM WrtData > > C PARM WrtDtaLen > > C Parm QUSEC > > 3. Now do your html stuff, and call the api again. > > Example: > > > C eval wrtdta > C > </body></html>' > > C eval WrtDtaLen > C > CALLB 'QtmhWrStout' > > C PARM WrtData > > C PARM WrtDtaLen > > C Parm QUSEC > > Phil > > > -----Original Message----- > > From: web400-admin@midrange.com [mailto:web400-admin@midrange.com]On > > Behalf Of Mangavalli, Ramanujam > > Sent: Tuesday, September 18, 2001 5:16 PM > > To: 'web400@midrange.com' > > Subject: RE: [WEB400] HTTP Server Problems. > > > > > > Yes actually 3 empty lines. > > > > Here is the code: > > D NewLine C X'15' > > D Httpheader C 'Content-type: text/html' > > > > C EVAL WrtData > > C NewLine + ' ' + newline > > > > C EVAL WrtDtaLen > > C WRITE RCD001 77 > > > > C IF PageOverFlow > > > > C WRITE Header > > > > C EVAL PageOverFlow > > C ENDIF > > > > C CALLB 'QtmhWrStout' > > > > C PARM WrtData > > > > C PARM WrtDtaLen > > > > C Parm QUSEC > > > > ..... > > ...... > > How do I determine an error? I put the program in debug. No > errors at all. > > Or atleast no messages in the job log. > > > > > > -----Original Message----- > > From: Anton Gombkötö [mailto:Gombkoetoe@ASsoft.com] > > Sent: Tuesday, September 18, 2001 5:01 PM > > To: web400@midrange.com > > Subject: Re: [WEB400] HTTP Server Problems. > > > > > > At 16:40 18.09.01 -0400, you wrote: > > >Folks, I tried posting this on the RPG400 group. But I think > this is the > > >right place since the RPG program seems to work fine. > > > > I do think so, too. But i'm not confessed that the RPG is right :-) > > > > >I have an RPG program that reads an HTML source member from a source > > >physical file and writes to the Standard Output using the > > QtmhWrStout API. > > I > > >have been told in the RPG 400 forum that I need the Content > > Type: text/html > > >header in the HTML member. I checked that. > > > > And you have an empty line after it? > > something like contenttype + CRLF + CRLF ? > > > > >But when the RPG CGI program is invoked from the browser using the POST > > >method, the program runs but IE6.0 returns error 500. > > >NS6.1 also returns 500 but also has a line that says "Interal error: > > >execve() failed. Any clues? The HTML member contains a lot of > > Java Script. > > > > This is definitely not a JavaScript issue. > > > > 500 means that there has been a problem on the server. > > > > Normally, when i receive 500's, i have something wrong in my > RPG programs. > > Check out the joblog of your HTTP-server jobs. (When you used defaults, > > then you can use WRKACTJOB JOB(DEFAULT) to find them.) User is QTMHHTTP. > > When you're the only user, it's the BCI-job with more than 0.0 > > CPU seconds. > > > > >Also, do I need to "turn on" logging? I had specified the log > > file name but > > >nothing is being created. > > > > That is another issue. But you won't see anything else than the 500, > > nothing that helps you. Just for statistical purposes. > > > > >To make sure that the configuration is right, I wrote another > program to > > >display Hello World. This one works. But the first one does not. > > > > Well, that proves that the second program is working, not > necessarily the > > first one. Could be security issues etc. > > > > > > Mit freundlichen Grüssen / best regards > > Anton Gombkötö > > > > _______________________________________________ > > This is the Web Enabling the AS400 / iSeries (WEB400) mailing list > > To post a message email: WEB400@midrange.com > > To subscribe, unsubscribe, or change list options, > > visit: http://lists.midrange.com/cgi-bin/listinfo/web400 > > or email: WEB400-request@midrange.com > > Before posting, please take a moment to review the archives > > at http://archive.midrange.com/web400. > > _______________________________________________ > > This is the Web Enabling the AS400 / iSeries (WEB400) mailing list > > To post a message email: WEB400@midrange.com > > To subscribe, unsubscribe, or change list options, > > visit: http://lists.midrange.com/cgi-bin/listinfo/web400 > > or email: WEB400-request@midrange.com > > Before posting, please take a moment to review the archives > > at http://archive.midrange.com/web400. > > > > > > > > _______________________________________________ > This is the Web Enabling the AS400 / iSeries (WEB400) mailing list > To post a message email: WEB400@midrange.com > To subscribe, unsubscribe, or change list options, > visit: http://lists.midrange.com/cgi-bin/listinfo/web400 > or email: WEB400-request@midrange.com > Before posting, please take a moment to review the archives > at http://archive.midrange.com/web400. > > >
As an Amazon Associate we earn from qualifying purchases.
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.