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


As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.