Hi all, I had promised to make another one of my tools available a few weeks ago, aka RSN...
OK, I'm still reworking the code and initial panel of the main "Formatted Browse" <https://prino.neocities.org/zOS/zOS%20Tools.html#rap00100> routine, but because I don't want to let you wait (ha, ha, ha...) any longer, I've decided to make some code available right now, although you'll have to screen-scrape it to save it. The routines are: - RAP00110, which is an exec to parse PL/I %INCLUDE members into a "meta" format that can later be used to do all kinds of fancy things, like - ESORT, an edit macro, that when used on a PL/I %INCLUDE member, adds a nice set of SORT FIELDS=(...) as ISPF =NOTE= lines to the member - ESYMSORT, an edit macro, that whhen used on a PL/I %include member, add a useful set of DFSORT SYMBOLS as ISPF =NOTE= lines to the member The two Exxxxxx macros share the feature that they will, if you enter the macro followed by a ?, display a builtin "help" screen that tells you how to use them, but if you have trouble drop me a line. As for RAP00110, it was more or less the first exec I wrote nearly 25 years ago, so it (sadly) does not know anything about some of the newer features of PL/I, such as UNIONs and DFP decimal floating point variables... It also suffers from the fact that it assumes that records do *not* contain any padding, and that BIT fields are always aligned... I still hope the code is of some use, and if you have any suggestions on how to improve it, feel free to share them. Robert -- Robert AH Prins [email protected] No programming (yet) @ <http://prino.neocities.org/> ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
