I: PSDS source informations availability

I try to explain my goal.
All my programs have to call a generic program that returns some information based on the name of the source from which the program was compiled. So I need the source informations at runtime.
This call need to be as fastest as possibile, because it is in all my programs, so I would like to avoid using an API to retrieve the source info.
Thanks

Marco




Il Venerdì 17 Gennaio 2014 17:37, Alan Campin <alan0307d@xxxxxxxxx> ha scritto:

Could you explain what you are trying to doing? Are you trying to write a
make tool?

I have a command that loops through and extracts all the source information
for all the programs in a given library or libraries. Is that what you are
trying to do?



On Fri, Jan 17, 2014 at 9:29 AM, Marco Benetti <ulyssesmb@xxxxxxxx> wrote:

Thank you for your help.
You are right.
Source Library, File and Member in the PSDS for SQLRPGLE programs contain
the informations of the temporary interim source member.
Someone can think a way to retrieve informations about the source from
which I compiled?
I need this informations in ALL my programs.
Otherwise I could have my precompiler insert 3 constants while compiling
the program, if I have no other choice.
Thanks

Marco


On 17 gen 2014, you wrote in midrange.rpg400-l:

Do you ever use SQLRPG? I don't know if this will make a difference,
but in this case the actual object is created from a temporary interim
source member but I don't know whether or not this will be reflected
in the PSDS information.

Trevor Briggs
Analyst/Programmer
Lincare, Inc.
(727) 431-1246
TBriggs2@xxxxxxxxxxx
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Marco Benetti
Sent: Friday, January 17, 2014 9:50 AM

  To: rpg400-l@xxxxxxxxxxxx

Subject: PSDS source informations availability

Hi.

In a RPGLE program I need information about the source from which I
compiled. I need to know library, file source and member. I always
compile with CRTBNDRPG command. So I have an object *PGM for each
source member.

I found the needed information in the PSDS (Program Status Data
Structure):

D SRC_FILE              304    313            Source file D SRC_LIB
            314    323            Source file lib D SRC_MBR

  324    333            Source file mbr


My doubt is..
Are these three information ALWAYS available?
Even, for instance, in case of not observable program?

I made some test with CHGPGM RMVOBS(*ALL) and everything seems working
properly: those three fields are correctly valued.  There are cases in
which these informations are not available?

Thanks in advance

Marco

--
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: 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.