Re: DBGVIEW(*ALL/*SOURCE) and STRDGB -- RPG400-L

Someone here said this - "*SOURCE is NOT compiled into the object" - this is true for non-SQL objects.

Here is Barbara Morris' reply to in a Simon Hutchinson article on this -

Barbara MorrisMarch 21, 2019 at 5:40 AM<https://www.rpgpgm.com/2016/05/debug-views-finding-your-favorite.html?showComment=1553164814476#c8593525661403306991>
Note that while DBGVIEW(*ALL) _initially_ shows the source view, it's not true that it's the same as DBGVIEW(*SOURCE) for CRTBNDxxx or CRTxxxMOD. DBGVIEW(*ALL) gives both the source view and the listing view, and for the RPG commands, it also gives the *COPY view.

For CRTSQLxxxI, DBGVIEW(*SOURCE) gives you the source view for the SQL source, and the DBGVIEW(*ALL) view for the generated source for the target language.

Cheers'
Vern

On Thu, 25 Apr, 2024 at 11:11 AM, Daniel Gross <daniel@xxxxxxxx> wrote:

To: rpg programming on ibm i

CMOne is configured the other way around - you have to configure the "library translation" for the source code reference actively to get that feature - but it works quite good.

Now after we moved a lot of objects and sources around during the CMOne implementation, and after I learned about the QBNCHGPD API, I will write a small tool, that sets the source code reference correctly for our installed programs and service programs.

Regards,
Daniel

Am 25.04.2024<http://25.04.2024> um 17:53 schrieb Dan Bale <dan.bale@xxxxxxxxxxxxxxxxxxxxx<mailto:dan.bale@xxxxxxxxxxxxxxxxxxxxx>>:

Per a private email, I looked into this a bit more. PTC Implementer does have an option on the System Control Maintenance (menu option 45), "Bypass Change Program Data API" that uses the QBNCHGPD API. It ships with a default value of 'N', which is to say that it *does* use the API. For reasons unknown to me, someone at my current shop changed it to 'Y'.

For those interested, search for QBNCHGPD in the Installation and Administration Guide and the User Guide. It advises that the only reason to bypass this is if system performance is severely impacted while promoting "a large number of ILE programs", which is probably not an issue for most shops.

- Dan

-----Original Message-----
From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx<mailto:rpg400-l-bounces@xxxxxxxxxxxxxxxxxx>> On Behalf Of Dan Bale
Sent: Thursday, April 25, 2024 11:22 AM
To: RPG programming on IBM i <rpg400-l@xxxxxxxxxxxxxxxxxx<mailto:rpg400-l@xxxxxxxxxxxxxxxxxx>>
Subject: RE: DBGVIEW(*ALL/*SOURCE) and STRDGB

PTC's Implementer change management has this problem, where compiled programs point to source in Implementer's temporary work libraries that get deleted after successful promotion. It is a PITA, but there are workarounds. IIRC, debug in RDi will prompt you for the source location if the source reference in the compiled object no longer exists. Also IIRC, it will let you select source from a partition that is not the same as the program object you are debugging.

- Dan

-----Original Message-----
From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx<mailto:rpg400-l-bounces@xxxxxxxxxxxxxxxxxx>> On Behalf Of Daniel Gross
Sent: Thursday, April 25, 2024 11:01 AM
To: RPG programming on IBM i <rpg400-l@xxxxxxxxxxxxxxxxxx<mailto:rpg400-l@xxxxxxxxxxxxxxxxxx>>
Subject: Re: DBGVIEW(*ALL/*SOURCE) and STRDGB

Am 25.04.2024<http://25.04.2024> um 12:56 schrieb Birgitta Hauser <Hauser@xxxxxxxxxxxxxxx<mailto:Hauser@xxxxxxxxxxxxxxx>>:

Have you tried to add DBGVIEW(*ALL) to the COMPILEOPT in the
CRTSQLRGI Command?

Yes - it includes the *LISTING View then - but the source reference points to the wrong library. The *SOURCE is NOT compiled into the object - only references to the external source file. So if the source file is moved - the references are wrong.

We found that our CMS (called CMOne) can take care of of that, and have configured it accordingly.

CMOne uses an system API called QBNCHGPD - with that API one can change the source reference of the bound module inside the *PGM or *SRVPGM. CMOne then uses an "translation table" to change the library references so the correct source can be found without recompiling the program.

Our QA does not like recompiling after a program is activated into production - but with that API we get around recompiling. So it's like eating AND having your cake at the same time.

Thanks for your help - the problem is solved.

*** CONFIDENTIALITY NOTICE: The information contained in this communication may be confidential, and is intended only for the use of the recipients named above. If the reader of this message is not the intended recipient, you are hereby notified that any dissemination, distribution, or copying of this communication, or any of its contents, is strictly prohibited. If you have received this communication in error, please return it to the sender immediately and delete the original message and any copy of it from your computer system. If you have any questions concerning this message, please contact the sender. ***
--
This is the RPG programming on IBM i (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx<mailto:RPG400-L@xxxxxxxxxxxxxxxxxx>
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx<mailto:RPG400-L-request@xxxxxxxxxxxxxxxxxx>
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxxxxxxxxxx<mailto:support@xxxxxxxxxxxxxxxxxxxx> for any subscription related questions.