Re: obtain first library name of object in *LIBL

[Vernon Hamberg <vhamberg@xxxxxxxxxxxxxxx>]

Hi Jay

Use the QUSROBJD - Retrieve object description - API

Vern

On 11/16/2017 7:38 AM, Jay Vaughn wrote:
> thank you George - i'll be invoking from rpg and not CLP - but I'm going to
> do something along the very same lines DSPOBJD to an outfile and query it.
>
> On Thu, Nov 16, 2017 at 8:29 AM, George Smith <gsmith@xxxxxxxx> wrote:
>
> > This always works in my programs:
> >
> > RTVOBJD OBJ(*LIBL/XYZ)
> >          OBJTYPE(*FILE)
> >          RTNLIB(&RTNLIB)
> >
> > George...
> >
> > -----Original Message-----
> > From: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Jay
> > Vaughn
> > Sent: Thursday, November 16, 2017 7:26 AM
> > To: RPG programming on the IBM i (AS/400 and iSeries)
> > Subject: obtain first library name of object in *LIBL
> >
> > I'm looking for the most efficient , most direct approach for pulling the
> > first library name of an object in a *LIBL.
> >
> > here is why...
> >
> > the rpg pgm receives a lib and table name as a parm, - user may specify
> > blank or *libl for the lib parm...
> >
> > If blank or *libl I'll need to determine that library  for the table name
> > from my *libl.
> >
> > What I am eventually doing needs an implicit lib name... it is nothing
> > that *libl will work with.
> > --
> > This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
> > mailing list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe,
> > unsubscribe, or change list options,
> > visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
> > or email: RPG400-L-request@xxxxxxxxxxxx
> > Before posting, please take a moment to review the archives at
> > https://archive.midrange.com/rpg400-l.
> >
> > Please contact support@xxxxxxxxxxxx for any subscription related
> > questions.
> >
> > Help support midrange.com by shopping at amazon.com with our affiliate
> > link: http://amzn.to/2dEadiD
> > --
> > This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
> > mailing list
> > To post a message email: RPG400-L@xxxxxxxxxxxx
> > To subscribe, unsubscribe, or change list options,
> > visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
> > or email: RPG400-L-request@xxxxxxxxxxxx
> > Before posting, please take a moment to review the archives
> > at https://archive.midrange.com/rpg400-l.
> >
> > Please contact support@xxxxxxxxxxxx for any subscription related
> > questions.
> >
> > Help support midrange.com by shopping at amazon.com with our affiliate
> > link: http://amzn.to/2dEadiD