RE: Subroutines flow chart in SEU vs RDi

I did something very similar many years ago. I generated source compatible with a flowcharting program called AllClear. Worked great.


Roger Harman
COMMON Certified Application Developer - ILE RPG on IBM i on Power

-----Original Message-----
From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of Daniel Gross
Sent: Monday, February 27, 2023 9:14 PM
To: RPG programming on IBM i <rpg400-l@xxxxxxxxxxxxxxxxxx>
Subject: Re: Subroutines flow chart in SEU vs RDi


First of all - Jim O. is absolutely right - RDi will pay for itself from the increased productivity. Or try VScode if you think - but please don’t stick to SEU.

Now to your problem - an idea would be, to write a simple program, that „walks“ the program source line by line and emits PlantUML source for a graphical view of the EXSRs.

So PlantUML generates this:



out of this:

@startuml
hide empty description
[*] --> Main
Main --> sr01
Main --> sr02
Main --> sr03
sr01 --> sr04
sr02 --> sr03
sr02 --> sr04
@enduml

The program has just to remember in which SR it is (the last begsr statement) and which SR is called. Everything else is done by PlantUML.

We have written such a tool for ER-diagrams lately - and it works great. And it should be quite easy, to generate the correct PlantUML source out of RPG source.

HTH
Daniel



Von meinem iPhone gesendet

Am 27.02.2023 um 21:05 schrieb Carel via RPG400-L <rpg400-l@xxxxxxxxxxxxxxxxxx>:
Perhaps SQL?

SELECT srcdta
FROM qrpglesrc
WHERE LOCATE('EXSR') > 0
OR LOCATE ('BEGSR') > 0

Op 27-2-2023 om 17:08 schreef jerry ven:

Hi,


How to quickly prepare a flow chart of all the subroutines used inside a
RPGLE program which is on the SEU and RDi is not available to analyze
interconnected very long RPGLE programs.



Thanks.

--
This is the RPG programming on IBM i (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://na01.safelinks.protection.outlook.com/?url=https%3A%2F%2Flists.midrange.com%2Fmailman%2Flistinfo%2Frpg400-l&data=05%7C01%7C%7C39c2ba462450472e054208db194ab133%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C638131580812491995%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&sdata=cEyv33qbeUCCBDJ78odVe3w%2B0wBR%2BOV4EsE%2FZqxExPg%3D&reserved=0
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://na01.safelinks.protection.outlook.com/?url=https%3A%2F%2Farchive.midrange.com%2Frpg400-l&data=05%7C01%7C%7C39c2ba462450472e054208db194ab133%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C638131580812491995%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&sdata=uEIgg4pQJAUIo9fbZEizBbrrpGnjmXEYU1qhcIid3yk%3D&reserved=0.

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related questions.