Re: How to Tell what version of OS/400 running under?

["Al Barsa, Jr." <barsa2@xxxxxxx>]

At 04:24 PM 6/14/98 -0500, you wrote:
>At 10:53 AM 6/14/98 , Bob Crothers wrote:
>>How can I retrieve the current OS/400 version out of a program?
>
>Try "RTVOBJD OBJ(QSYS) OBJTYPE(*LIB) SYSLVL(&SYSLVL)"
>
>
Hi David and Bob,

Well, I agree (from trial and error) that you are correct.  However this is
not what I would have predicted.

Clearly when you install a new release, individual objects are restored
into QSYS.  The library is neither deleted nor cleared.  You can prove this
to your self by creating a rogue object in QSYS (e.g.: something that you
are not supposed to create like a program or an data area), it will survive
a release upgrade.  (Valid user objects to create in QSYS include
libraries, user profiles, configuration libraries, authorization lists,
etc.)  Never the less your solution seems to be correct.

I normally use the API (a pain in the ass to code, but I always clone the
code), or else I create a trivial object in QTEMP, and get back it's
creation level.

Al



Al Barsa, Jr. - Account for Midrange-L
Barsa Consulting, LLC.  
400 > 390

Phone:  914-251-9400
Fax:    914-251-9406





Private mail should be sent to barsa@ibm.net
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---