Re: Need to retrieve the text from an RPG program source

["Steve Landess" <steve_landess@xxxxxxxxxxx>]

RTVOBJD in a CL pgm, or API QUSROBJD, format OBJD0200.

See:
http://publib.boulder.ibm.com/iseries/v5r1/ic2924/info/apis/qusrobjd.htm

HTH

Steve Landess
Austin, Texas
(512) 423-0935


----- Original Message -----
From: "William A.(Tony) Corbett" <corbett@xxxxxxxxxxxxxxx>
To: <rpg400-l@xxxxxxxxxxxx>
Sent: Wednesday, March 26, 2003 4:06 PM
Subject: Need to retrieve the text from an RPG program source


> Hi,
> I currently need to be able, from within an RPG program, to retrieve the
> 'text' (description) from an RPG program via the name of that rpg program
> (taken from a report splf attributes).
>
> I'd like to use the text from a (splf) report-generating RPG program as an
> "on-the-fly"  default name for the report generated by that program.
>
> I know I could DSPOBJD to a file, then use the ODOBTX field for this, but
> does anyone know of an API or something that will allow me to get this
more
> directly (more effeciently)?
>
> TIA
>
> AS/Resources, Inc.
> William A.(Tony) Corbett
> IBM Certified Specialist - AS/400 Developer
> http://www.asresources.com
> corbett@xxxxxxxxxxxxxxx
> 770-587-4812 (office)
> 678-935-5006 (mobile)
> fax:  404-663-4737
>
>
>
> _______________________________________________
> 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.
>
>