× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



Another thing may be to try my eRPG Software Development
kit..  it's got all of these goodies already wrapped up
nicely, uses templates like CGIDEV2, and has a smaller
footprint and from initial testing is quite a bit faster
than CGIDEV2...  

It's in beta right now, but so far things look great from
what users are saying.

www.erpgsdk.com

Brad
www.bvstools.com

On Thu, 29 Jul 2004 10:28:21 -0500
 "Bob Cozzi" <cozzi@xxxxxxxxx> wrote:
> Your parameter definitions are not complete. To fix your
> specific problem,
> add the OPTIONS(*VARSIZE) keyword to the last parameter.
> Overall however, you should consider the following
> prototype for QtmhGetEnv
> instead:
> 
> DAPIGetEnv        PR
>                  extproc('QtmhGetEnv')
> D                            32767A   OPTIONS(*VARSIZE)
> D                               10i 0 Const
> D                               10i 0
> D                               30A   Const
> OPTIONS(*VARSIZE)
> D                               10i 0 Const
> D                               16A   OPTIONS(*VARSIZE)
> 
> -Bob Cozzi
> 
> 
> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
> On Behalf Of Henk Schipper
> Sent: Thursday, July 29, 2004 10:12 AM
> To: rpg400-l@xxxxxxxxxxxx
> Subject: CGI-programming.....
> 
> Hi All,
> 
> I developed a tool for CGI with the apache webserver
> under V5R2M0. Worked
> all fine. No troubles
> I use the api QtmhGetEnv the following way:
>  * prototype for QtmhGetEnv API
> DAPIGetEnv        PR
>                  extproc('QtmhGetEnv')
> D                            32767
> D                               10i 0
> D                               10i 0
> D                               30
> D                               10i 0
> D                               16
>  * prototype for QtmhPutEnv API
> DAPIPutEnv        PR
>                  extproc('QtmhPutEnv')
> D                            32767
> D                               10i 0
> D                               16
>  * variables used for QtmhGetEnv & QtmhPutEnv calls
> DEnvRec           S          32767
> DEnvRecLen        S             10i 0 inz(%size(EnvRec))
> DEnvLen           S             10i 0
> DEnvName          S             30
> DEnvNameLen       S             10i 0
> 
> and the calls:
> C                   eval      qusbprv = 16
> C* Retrieve the request_method
> C     ' '           checkr    EnvName       EnvNameLen
> C                   callp
>     APIGetEnv(EnvRec:EnvRecLen:EnvLen:
> C
>
                                      EnvName:EnvNameLen:qusec)
> 
> At the moment we upgraded from V5R2 to V5R3. Latest Cum,
> also the ptf
> retrieved and applied which IBM requested:
>       5722999 MF33122 (June 2004)
>       5722SS1 SI12639 (June 2004)
> 
> 
> I keep getting an error: Error code parameter not valid
> 
> What Am I doing wrong? Or is Pase at the moment a bit
> mixed up?
> Any help is very appriciated...
> 
> 
> Regards,
> 
> Henk
> --
> This is the RPG programming on the AS400 / iSeries
> (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit:
> http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> 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@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit:
> http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> 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

As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

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.