×

Good News Everybody!

The new search engine is LIVE!

Please report any problems to david (at) 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-2026 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.