The variables you ned to get are not cgiinp01. they are whatever is being passed from the first program.
eval CGIINP01 = zhbgetvar('firstname')
Bob Roche
Programmer/Analyst
Packaging Corporation of America
(847) 482-2628
mailto:[EMAIL PROTECTED]
| "dfabianke" <[EMAIL PROTECTED]>
Sent by: [email protected] 11/03/2005 10:21 AM
|
To: [email protected] cc: Subject: [Easy400Group] Re: parameters not passing |
I added the statements you suggest after the copy Prolog1 and still
nothing. Any other suggestions?
--- In [email protected], Robert Dunn
<[EMAIL PROTECTED]> wrote:
>
> I don't see where you are getting the variables
> "CGIINP01" and "CGIINP02".
>
> You must first retrieve the query string from the html
> form using the:
>
> eval nbrVars =
> zhbgetinput(savedquerystring:qusec)
> or the
>
> /copy CGIDEV2/qrpglesrc,prolog1.
>
> Then do:
> eval CGIINP01 = zhbgetvar('CGIINP01')
> eval CGIINP02 = zhbgetvar('CGIINP02')
>
> before you can write those values to your html:
>
> callp updHTMLvar
> ('FIRSTNAME':CGIINP01)
> callp
> updHTMLvar('LASTNAME':CGIINP02)
>
>
> Sorry about the formatting, HTH.
>
> Robert Dunn
> --- dfabianke <[EMAIL PROTECTED]> wrote:
>
> > --- In [email protected], "Mike Haston **
> > Data"
> > <[EMAIL PROTECTED]> wrote:
> > >
> > The initial prompt is fine asking for first name and
> > last name and
> > the submit button
> >
> > The second HTML page looks fine, but there is
> > nothing after First
> > Name: or after Last Name:
> >
> >
> > > What's the output look like?
> > >
> > > First Name: firstname
> > > Last Name: lastname
> > >
> > > -----Original Message-----
> > > From: [email protected]
> > [mailto:[EMAIL PROTECTED]
> > > On Behalf Of dfabianke
> > > Sent: Wednesday, November 02, 2005 3:38 PM
> > > To: [email protected]
> > > Subject: [Easy400Group] parameters not passing
> > >
> > > I am working on BVS stone on CGIDEV2 book and I
> > have encountered a
> > > problem. I have an HTML file that asks for first
> > name an last name
> > then
> > > press a submit button and it should tell you what
> > you entered.
> > > On the address line of the browser it appears that
> > it is passing the
> > > names, but they are not displaying in the page.
> > Below is an
> > example of
> > > what is showing up in the address line:
> > > http://<myas400:8014>/cgi-bin/procinput1?
> > > cgiinp01=firstname&cgiinp02=lastname
> > >
> > > Below is an example of the HTML files and the RPG:
> > > input1.html file:
> > >
> > > <html>
> >
> > > <body>
> >
> > > Please enter your first and last name, then press
> > the
> > > Submit button.<br><br>
> >
> > > <form action=""
> >
> > > First Name:<input type="text" name="CGIINP01"><br>
> >
> > > Last Name:<input type="text" name="CGIINP02"><br>
> >
> > > <input type="Submit">
> >
> > > </form>
> >
> > > </body>
> >
> > > </html>
> > >
> > > procinput1.html file:
> > > /$all
> > > Content-type: text/html
> > >
> > > <html>
> > > <body>
> > > You entered the following information:
> > > <br>
> > > <br>
> > > Your first name is: <B>/%FIRSTNAME%/</B>
> > > <br>
> > > Your last name is: <B>/%LASTNAME%/</B>
> > > </body>
> > > </html>
> > >
> > > procinput1 - RPGLE program:
> > > *************************************
> > > H DFTACTGRP(*NO) BNDDIR
> > ('SPCGILIB/CGIDEV2BND')
> > >
> > >
> > ************************************************
> >
> > >
> > > *
> > >
> > Prototypes
> >
> > >
> > >
> > ************************************************
> >
> > >
> > > /copy SPCGILIB/QRPGLESRC,PROTOTYPEB
> >
> > > /copy
> > SPCGILIB/QRPGLESRC,USEC
> >
> > >
> > >
> > ************************************************
> >
> > >
> > > * VARIABLES USED IN CGI
> > PROGRAMS
> > >
> > >
> > ************************************************
> >
> > >
> > > /copy
> > SPCGILIB/qrpglesrc,VARIABLES1
> >
> > >
> > >
> > ************************************************
> >
> > >
> > > C EXSR
> > $Input
> > > C callp
> > ClrHtmlBuffer
> > > C callp GetHtml
> > ('HTMLSRC':'SPCGILIB':'PROCINPUT1'
> > > C callp updHTMLvar
> > ('FIRSTNAME':CGIINP01)
> > > C callp
> > updHTMLvar('LASTNAME':CGIINP02)
> > > C callp wrtsection('all')
> >
> > > C callp wrtsection('*fini')
> >
> > > C SetOn
> >
> > LR
> > >
> > ************************************************
> >
> > > * Read Input from web
> > page
> > >
> > ************************************************
> >
> > > C $input
> > BEGSR
> > >
> > *
> >
> > > /copy
> > SPCGILIB/qrpglesrc,PROLOG1
> >
> > >
> > *
> >
> > > C
> > ENDSR
> > >
> > >
> > >
> > >
> > >
> > >
> > > ------------------------ Yahoo! Groups Sponsor
> > --------------------
> > ~-->
> > > Fair play? Video games influencing politics. Click
> > and talk back!
> > >
> >
> http://us.click.yahoo.com/T8sf5C/tzNLAA/TtwFAA/wbFolB/TM
> > >
> >
> --------------------------------------------------------------------
> > ~->
> > >
> > >
> > > Yahoo! Groups Links
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> >
>
######################################################################
> > >
> > > NOTICE:
> > > The contents of this e-mail and any attachments to
> > it may contain
> > > privileged and confidential information from Jones
> > Apparel Group,
> > Inc.
> > > or its affiliates. This information is only for
> > the viewing or use
> > > of the intended recipient. If you are not the
> > intended recipient,
> >
> === message truncated ===
>
>
>
>
> __________________________________
> Start your day with Yahoo! - Make it your home page!
> http://www.yahoo.com/r/hs
>
SPONSORED LINKS
| How to format a computer hard drive | Cobol programmer | Iseries 400 |
| How to format a computer |
YAHOO! GROUPS LINKS
- Visit your group "Easy400Group"
on the web.
- To unsubscribe from this group, send an email
to:
[EMAIL PROTECTED]
- Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.
YAHOO! GROUPS LINKS
- Visit your group "Easy400Group" on the web.
- To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
- Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.
