RE: Simple HTML program sending parms to an AS400 pgm

Peter,

QtmhGetEnv does work great for GET operations, but it is used differentlt
for POST operations...

GET method:
c                   eval      EnvName = 'QUERY_STRING'
c                   callp     #GetEnv(EnvRec: EnvLen: EnvName)
c                   exsr      $CvtDb

POST method:
c                   eval      EnvName = 'CONTENT_LENGTH'
c                   callp     #GetEnv(EnvRec: EnvLen: EnvName)
c                   eval      RcvLen = #cton(EnvRec)
c                   exsr      $RdStin
c                   exsr      $CvtDb

In the POST method above, #GetEnv still calls QtmhGetEnv, but this time
instead of retrieving the environment string it is retrieving the
environment string length, which then get passed to QtmhRdStin (which is
called in $RdStin).

HTH,

Joel R. Cochran
Director of Internet Services
VamaNet.com
(800)480-8810
mailto:webmaster@vamanet.com


> -----Original Message-----
> From: Peter_Vidal@pall.com [mailto:Peter_Vidal@pall.com]
> Sent: Tuesday, June 04, 2002 3:16 PM
> To: web400@midrange.com
> Subject: Re: [WEB400] Simple HTML program sending parms to an
> AS400 pgm
>
>
>
> Yes, I am using "QtmhGetEnv" and is working greatly in other programs.
>
> I removed the "?" but still no results.  I restate again: the
> program (FD003R)
> runs (generating titles only) but not data related to the
> order is displayed.
>
>
>
>
>                     "Richard B Baird"
>                     <rbaird@esourceconsu        To:
> web400@midrange.com
>                     lting.com>                  cc:
>                     Sent by:                    Subject:
> Re: [WEB400] Simple HTML program
>                     web400-admin@midrang        sending parms
> to an AS400 pgm
>                     e.com
>
>
>                     06/04/2002 03:09 PM
>                     Please respond to
>                     web400
>
>
>
>
>
>
>
> Peter,
>
> Are you expecting the value in an *entry parm?  can't do it.
> doesn't work.
>
> you need to use one of the http apis to retrieve the data
> from the browser.
> There are a ton of examples in the archives, or on one of a
> dozen or so
> websites (like ez400, brad stones, etc).
>
> Rick
>
>
>
> Hi guys!
>
> I have a small amount of code and what I want is to send an
> order number to
> a
> CGI-RPG program on the AS400 like:
>
> <FORM action="http://pacnet/cgi-rpg/fd003r?"; method="post">
> <P>
> Order Number: <INPUT type="text"><BR>
> <INPUT type="submit" value="Send"> <INPUT type="reset">
> </P>
> </FORM>
>
> The program runs but the parameter (order number) that the
> program receives
> is a
> different one (garbage).  What I'm missing?
>
> Regards,
>
> PALL Corporation
> Peter Vidal
> Senior System Analyst
>
>
> _______________________________________________
> 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.
>