Re: CGI-RPG Parameters with different sizes

["Brad Stone" <brad@xxxxxxxxxxxx>]

It will be available to everyone.  Do you mean free?
Hmmm... I don't think the publisher would go for that.  :)

It's not a replacement for the first book, it's a companion.
at least 80% new material.

On Tue, 26 Feb 2002 16:45:17 -0500
 "Dare @ Work" <oludare@ix.netcom.com> wrote:
> Brad,
>
> Are you going to make that 2nd available to folks like me
> that bought in on
> the your first book?
>
> Dare
>
> ----- Original Message -----
> From: "Brad Stone" <brad@bvstools.com>
> To: <rpg400-l@midrange.com>
> Sent: Tuesday, February 26, 2002 4:18 PM
> Subject: Re: CGI-RPG Parameters with different sizes
>
>
> > Peter,
> >
> > you can't rely on the data being of a certain size when
> read
> > from a web page.  You can control it's Max size, but
> that's
> > about it.
> >
> > You really should be using 1 of 2 options.
> >
> > 1.  Read the data in (QtmhGetEnv or QtmhRdStin,
> depending if
> > it's a GET or POST).  Then, use QtmhCvtDB to convert
> the
> > data into a usable format.
> > 2.  Use the QzhbCGIParse API to read in each variable
> at a
> > time.  (my preferred method).
> >
> > #1 is cumbersome and yucky.  #2 is as easy as pie.  My
> first
> > e-RPG book explains #1, and my 2nd will also include #2
> > (hopefully out in 3 or so months).
> >
> > In the meantime, I do have some wrappers that may help
> on my
> > webpage at:
> > http://www.bvstools.com/download.html
> >
> > The "2nd set of HTTP Procedures" contains a wrapper for
> the
> > QzhbCGIParse API that you can use like this:
> >
> > eval Myfield = #CGIParse('-value myField')
> >
> > VERY easy to use.
> >
> > On Tue, 26 Feb 2002 16:04:49 -0500
> >  Peter_Vidal@pall.com wrote:
> > > Hi group!
> > >
> > > I have a Program A that is sending three parameters
> to a
> > > Program B:
> > >
> > > Field 1 = 5 char long, value is '1'
> > > Field 2 = 15 char long, value is '1364647'
> > > Field 3 = 7 char long, value is M111110
> > >
> > > When I display my values on program B, I am only able
> to
> > > receive them using a
> > > data structure like this:
> > >
> > > DEnvData          DS
> > > D   StartAtLoc                        Like(RQGDML)
> (is 5
> > > long)
> > > D   StartAtItem                       Like(RQGDGR)
> (is
> > > 15 long)
> > > D   StartAtOrd                   7
> > >
> > > However, while debugging Program B, EnvData contains
> the
> > > following value:
> > > EVAL EnvData
> > > STARTATLOC OF ENVDATA = '21307'
> > > STARTATITEM OF ENVDATA = '459M111110     '
> > > STARTATORD OF ENVDATA = '       '
> > >
> > > How I can determine the right positions of the data?
> Is
> > > the data structure
> > > poorly defined?
> > >
> > > TIA
> > >
> > > Peter Vidal
> > > Pall Aeropower Corp.
> > > Programmer Analyst
> > >
> > > _______________________________________________
> > > This is the RPG programming on the AS400 / iSeries
> > > (RPG400-L) mailing list
> > > To post a message email: RPG400-L@midrange.com
> > > To subscribe, unsubscribe, or change list options,
> > > visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> > > or email: RPG400-L-request@midrange.com
> > > Before posting, please take a moment to review the
> > > archives
> > > at http://archive.midrange.com/rpg400-l.
> > >
> >
> > Bradley V. Stone
> > BVS.Tools
> > www.bvstools.com
> > _______________________________________________
> > This is the RPG programming on the AS400 / iSeries
> (RPG400-L) mailing list
> > To post a message email: RPG400-L@midrange.com
> > To subscribe, unsubscribe, or change list options,
> > visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> > or email: RPG400-L-request@midrange.com
> > Before posting, please take a moment to review the
> archives
> > at http://archive.midrange.com/rpg400-l.
> >
>
> _______________________________________________
> This is the RPG programming on the AS400 / iSeries
> (RPG400-L) mailing list
> To post a message email: RPG400-L@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> or email: RPG400-L-request@midrange.com
> Before posting, please take a moment to review the
> archives
> at http://archive.midrange.com/rpg400-l.
>

Bradley V. Stone
BVS.Tools
www.bvstools.com