I wish I remembered more VSE. If LIBR does it then obviously it can be done, but it is a mystery how.
You not only need to *read past* the /*, you also need to get the data from columns 4-80 or 128 of each /* record. Big difference between /* Beginning of a block comment and /* */ FOO = 37 Can you use a logical unit other than SYSIPT/SYSRDR? You know, SYS021 or something? Does it have the same issues if assigned to VM "card reader"? A lot simpler than CCB/CCW/EXCP. Charles -----Original Message----- From: IBM Mainframe Assembler List <[email protected]> On Behalf Of David Clark Sent: Sunday, December 14, 2025 1:37 PM To: [email protected] Subject: Re: [External Sender] Re: Reading Past /* on SYSRDR/SYSIPT Charles, >> do you have any indication that this is in fact possible? Yes, the IBM LIBR utility does this. It is the VSE Librarian program and is used for cataloging REXX procedures in the first place. The LIBR utility allows you to specify an alternate EOD marker so that the standard system marker can be cataloged in with the library member. But the REXX procedures I need to perform find/replace migration operations on are not in a VSE library -- but in a 3rd-party VDI proprietary-format file (and the data isn't even stored in EBCDIC). So, I use a 3rd-party utility to get the REXX procedure out, perform my find/replace operations on it, then submit the changed REXX source back to the 3rd-party file using the same 3rd-party utility. Anyway, someone else suggested I build my own CCB, CCW, and use EXCP--instead of using a DTF. Sincerely, Dave Clark -- int.ext: 91078 direct: (937) 531-6378 home: (937) 751-3300 Winsupply Group Services 3110 Kettering Boulevard Dayton, Ohio 45439 USA (937) 294-5331 On Fri, Dec 12, 2025 at 7:18 PM Charles Mills <[email protected]> wrote: > @David, do you have any indication that this is in fact possible? That > is, do you have any examples of existing programs that do this successfully? > Not necessarily that you have source code for, just any programs that > do this so that you can say "I know this is possible because XXXXX does it"? > > If not I worry that this is perhaps an impossible quest. > > Charles > >
