RE: Problems with Error 500 -- WEB400

Chris,

My examples only show 1024 bytes because that was a limit on CISC machines
(V3R2).  It may have been on V3R7 as well (not sure).  So, that's why I keep
my examples at that size.  And because I need to compile everything to run
on the lowest version our machines run on, it's a habit to program for V3R2.

So, you probably won't experience any problems going over 1024.  Also, don't
worry about things like calls just yet.  That will come in time.  I know Jon
is trying to help, but nothing gets people more confused than when they ask
"Why doesn't this work" and people reply "you should use method A instead of
method B".  

Brad


> -----Original Message-----
> From: Christopher A. Libby [mailto:clibby@mainepublicservice.com]
> Sent: Friday, March 23, 2001 12:27 PM
> To: WEB400@midrange.com
> Subject: RE: Problems with Error 500
> 
> 
> >  >> Hello all - I've been working on a couple sample RPG-CGI
> > programs.  I'm
> > running into a problem with Internal Server Errors.
> >
> >
> > Christopher, your problem is in the $WrStout subroutine.  It
> > should be Eval
> > WrtDta = %TrimR(WrtDta) + NewLine - without the %Trim the 
> Newline gets
> > added and immediately dropped.  Another comment - the 
> constant calling of
> > the API will slow your program down and is not necessary.  Your
> > entire page
> > could be done with a single call.
> 
> Thanks for the help.
> 
> > Studying your code leaves me with some other questions 
> though.  It appears
> > <snip>
> > use varying length fields and CALLP.
> >
> > Just curious.
> 
> <blank stare>Uhmmm...I just copied it off a web page??? :>   
> I'm rather new
> to using RPG as a CGI.  I guess I should have thought of only 
> using one API
> call, but I've done a lot of work in Active Server Pages (brainless
> programming).
> 
> One question I have for you would be this - what happens if 
> my web page
> exceeds 1024 bytes?  Do I need to constantly watch the length 
> of WrtDta,
> then call the API when it's around 1024 bytes?
> 
> -Chris
> 
> 
> 
> 
> Maine Public Service Company
> www.mainepublicservice.com
> 
> 
> +---
> | This is the WEB400 Mailing List!
> | To submit a new message, send your mail to WEB400@midrange.com.
> | To subscribe to this list send email to WEB400-SUB@midrange.com.
> | To unsubscribe from this list send email to 
> WEB400-UNSUB@midrange.com.
> | Questions should be directed to the list owner/operator: 
> david@midrange.com
> +---
> 
+---
| This is the WEB400 Mailing List!
| To submit a new message, send your mail to WEB400@midrange.com.
| To subscribe to this list send email to WEB400-SUB@midrange.com.
| To unsubscribe from this list send email to WEB400-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---