RE: ILE program problem

["Condon, Mike, /m1c" <m1c@xxxxxxxxxxxxxxxxx>]

I changed it with the same results. Is my syntax and are
my declartions of the string variables kosher?

-----Original Message-----
From: bvining@vnet.ibm.com [mailto:bvining@vnet.ibm.com]
Sent: Monday, August 27, 2001 10:53 AM
To: RPG400-L@midrange.com
Subject: ILE program problem


Are you sure you want external procedure GetEnv rather then getenv?
If you change your prototype to:

DGetEnv           PR              *   ExtProc('getenv')

you should find your environment variable.  You're off into Java land
with your current API call.

Bruce

>
>I have the following ILE (my 1st) program that fails whenever I set an
>environment variable
>in a CL program using addenvvar. I'll have to admint that since I am a 400
>programmer I don't
>know ILE at all. It gets this error:
>Message . . . . :   Pointer or parameter error (C G D F).
>
>Cause . . . . . :   RPG procedure GETGALFLIB in program
>OPERATIONS/GETGALFLIB at statement 8 had an error due to a pointer not
being
>correctly set.
>
>And here's the program:
>DGetEnv           PR              *   ExtProc('GetEnv')
>DEnvData@                         *   Value Options(*String)
>Dgalflibr         S             16A   Based(EnvData@)
>C     *entry        plist
>C                   parm                    envlibr          16
>C*                  movel     *blanks       galflibr         16
>C                   eval      EnvData@ = GetEnv('GALFLIBR')
>C                   movel     galflibr      envlibr
>C                   MOVE      *ON           *INLR
>C                   RETURN
>

_______________________________________________
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