Re: Retrieving object source location for an ile program.

["Dick Cosby" <dickcosby@xxxxxxxxxxx>]

I believe you are looking for the MODULE source, since an ILE PROGRAM
doesn't have source.  Only the modules have source.  (Review the CRTPGM
command).  Modules (and Service Programs) are used to create an ILE program.

Use WRKMOD lib/*ALL,
then use option 5 to display the module information...

                           Display Module Information
                                                                 Display 1
of 7
 Module . . . . . . . . . . . . :   PGM101
   Library  . . . . . . . . . . :     DC
 Detail . . . . . . . . . . . . :   *BASIC
 Module attribute . . . . . . . :   RPGLE

 Module information:
   Module creation date/time . . . . . . . . . . . . . . :   07/01/03
21:57:41
   Source file . . . . . . . . . . . . . . . . . . . . . :   QRPGLE
     Library . . . . . . . . . . . . . . . . . . . . . . :     DC
   Source member . . . . . . . . . . . . . . . . . . . . :   PGM101
   Source file change date/time  . . . . . . . . . . . . :   07/01/03
21:57:36
   Owner . . . . . . . . . . . . . . . . . . . . . . . . :   DC
   Coded character set identifier  . . . . . . . . . . . :   37
   Text description  . . . . . . . . . . . . . . . . . . :   Print request
trail
er inventory
   Creation data . . . . . . . . . . . . . . . . . . . . :   *YES
   Intermediate language data  . . . . . . . . . . . . . :   *NO



----- Original Message ----- 
From: "Jason F. Kleinemas" <JasonKleinemas@xxxxxxxxxxxxx>
To: "rpg400-l" <rpg400-l@xxxxxxxxxxxx>
Sent: Wednesday, July 23, 2003 5:04 PM
Subject: Retrieving object source location for an ile program.


>
> Retrieving object source location for an ile program. When I use dspobjd,
qusrobjd or quslobj the source location is blank. The closest thing I have
been
> able to find is dsppgm, but I can't figure out how to the get the detail
for the module to go print. It only print's the module list.
>
> I don’t know where else to look for the info. Any one have nay idea where
to look?
>
>
> Jason Kleinemas
> Programmer/Analyst
> Solcom Inc.
> The Solutions Company http://www.solcominc.com
> 2516 E. 52nd St. N.
> Sioux Falls, SD 57104
> Desk Phone: 605-367-1546
> Office Phone: 605-357-8212
> AIM: JasonSolCom
> jasonkleinemas@xxxxxxxxxxxxx
> Certified twice....... but still a couple PTFs away from Nirvana.
>
>
>
> _______________________________________________
> 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.
>