Re: ILE program object's source infomation -- MIDRANGE-L

Peter,
That would be QLICOBJD for the objects (*PGMs, *SRVPGMs, *MODULEs, etc.), and QBNCHGPD to change some of the attributes of modules that have already been bound into *PGMs or *SRVPGMs.
Reply privately (off-list) if you would like to see some sample code for how to do that, or a simple user-written CL command that you can use to set the source in a compiled object the way you want, either as part of your change management promotion process, or to reset those objects to "blanks" that are currently set to something else.
All the best,
Mark S. Waterbury

On Friday, October 9, 2020, 3:38:33 PM EDT, Peter Dow <petercdow@xxxxxxxxx> wrote:

Hi Vern,

Any idea what that API is?

Btw, I misspoke in my response to Niels - a program's object-level
source information is not visible with DSPPGM, it's with

DSPOBJD OBJ(TOE620) OBJTYPE(*PGM) DETAIL(*SERVICE)

--
*Peter Dow* /
Dow Software Services, Inc.
909 793-9050
petercdow@xxxxxxxxx <mailto:petercdow@xxxxxxxxx>
pdow@xxxxxxxxxxxxxx <mailto:pdow@xxxxxxxxxxxxxx>

/
On 10/9/2020 12:08 PM, Vernon Hamberg wrote:

Hi Peter and Niels

See the additional posts with Jon Paris, et al.

ILE programs are not source-based, so IBM does not put anything in for
that. The modules, even the one in QTEMP that is created with
CTRBNDRPG, will have the source information.

The SCM applications can and do, IIRC, use an API to put what they
want in the object.

Cheers
Vern

On 10/9/2020 1:36 PM, Peter Dow wrote:

Hi Niels,

Yeah, I was beginning to wonder if I was going crazy :)

This customer is no where near the bleeding edge of technology. A
majority of programs are still OPM, and the ones that are ILE are
single module programs, created with CRTBNDRPG (PDM option 14) until
they started using Implementer. Even if created with 2 steps, I
never see object-level source information. Here's an example:

DSPPGM TOE620 shows object-level source file & library, but no source
file date/time:

Object . . . . . . . . . . . . . . . :   TOE620
   Library . . . . . . . . . . . . . :     PROBASEA
Library ASP device . . . . . . . . . :   *SYSBAS
Library ASP group . . . . . . . . . :   *SYSBAS
Type . . . . . . . . . . . . . . . . :   *PGM

Source file . . . . . . . . . . . . :   QRPGLESRC
   Library . . . . . . . . . . . . . :     MODLPSRC
Member . . . . . . . . . . . . . . . :   TOE620
Attribute . . . . . . . . . . . . . :   RPGLE
User-defined attribute . . . . . . . :
Freed . . . . . . . . . . . . . . . :   NO
Size . . . . . . . . . . . . . . . . :   1769472
Creation date/time . . . . . . . . . :   10/16/19 19:47:44
Source file date/time . . . . . . . :
System level . . . . . . . . . . . . :   V5R4M0
Compiler . . . . . . . . . . . . . . :   CRTPGM     V5R4M0

Further on, the *MODULE information for TOE620 shows:

Module attributes:
Module . . . . . . . . . . . . . . . . . . . . : TOE620
    Library . . . . . . . . . . . . . . . . . . : QTEMP
Source file . . . . . . . . . . . . . . . . . : QRPGSRC
    Library . . . . . . . . . . . . . . . . . . : IM2858S
Source member . . . . . . . . . . . . . . . . : TOE620
Module attribute . . . . . . . . . . . . . . . : RPGLE
Module creation date/time . . . . . . . . . . :   10/16/19 15:56:14
Source file change date/time . . . . . . . . . :   10/02/19 22:33:14