I need to search many analysis of our code-source and a program to search all the code-source in an workspace will make my life better.
Does anyone knows how can I do it ???
Also solve my problem an script to convert the code-source automatically to text. In this case I can process in loop each file and extract the information’s that I need.
USR1057N will read a source member into an array. You can manipulate the array (lines of source) programmatically.
USR2019N will read a source member into the Source Work Area (SWA). You can manipulate the SWA with USR1035N or USR2014N. The SWA can be saved via USR2019N.
I used the USR1057N and was what I was looking for.
Except for one detail ! in the USR1057P the parameter OPT-AMOUNT is 255 maximumm… I need to process some code-sources with 6500 lines !
Maybe if I convert the programs in roscoe to TXT and process it will function like I need.
When using USR1057N, I usually set OPT-AMOUNT to 60, the number of source lines typically found in an FUSER source block on the mainframe.
Place CALLNAT ‘USR1057N’ in a REPEAT loop. Field RETURNED will contain the number of source lines retrieved in the call. Reiterate until you hit logical end-of-file: NAD-MSG.MSG-TYPE = 100.