Re: CMS equivalent of ISPF SRCHFOR?
Thanks. Had to change the unprintable's but it works fine. On Sat, 20 Mar 2021 19:35:49 -0400 Tony Thigpen wrote: :>There is not a 'standard' search tool in VM. There are numinous versions :>that are available for the asking. Just post a request on the VM list. :>Almost all of them are just a rexx wrapper for the xedit locate function. :> :>I have attached one of my may versions, the one I use mostly. :> :>Tony Thigpen :> :>Binyamin Dissen wrote on 3/20/21 4:09 PM: :>> Is there a CMS command which will search a minidisk (or group of minidisks) :>> for files containing a specific string? :>> :>> Don't see anything obvious in the CMS manual. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: CMS equivalent of ISPF SRCHFOR?
Well, I downloaded and tried FERRET and it never found anything. Unfortunately it is compiled so I could not figure out what was wrong. Tried a single minidisk as well as multiple disks. Tried CAPS, tried lower case, etc. On Sat, 20 Mar 2021 23:05:11 -0400 Phil Smith III wrote: :>I just found my version of the SEARCH4 code on :> :>http://ukcc.uky.edu/~tools/1998/ :> :>so anyone who wants it can get it there. Obviously let me know if that doesn't work. :> :> :> :>Hint: the Sterling email addresses will NOT work! :> :> :>-- :>For IBM-MAIN subscribe / signoff / archive access instructions, :>send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: CMS equivalent of ISPF SRCHFOR?
SuperC is also included in ISPF. Of course, ISPF is not ubiquitous in the VM world the way that it is in the MVS world; if you don't have it, it's a lot less expensive to go the HLASM Toolkit route. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Attila Fogarasi [fogar...@gmail.com] Sent: Saturday, March 20, 2021 4:26 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: CMS equivalent of ISPF SRCHFOR? I normally use SuperC which is sold as part of the HLASM Toolkit. I don't know if there is a free version. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: CMS equivalent of ISPF SRCHFOR?
Binyamin, Not a command, but a full screen utility. Check out my FERRET package at http://www.vm.ibm.com/download/packages/descript.cgi?FERRET -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: CMS equivalent of ISPF SRCHFOR?
I just found my version of the SEARCH4 code on http://ukcc.uky.edu/~tools/1998/ so anyone who wants it can get it there. Obviously let me know if that doesn't work. Hint: the Sterling email addresses will NOT work! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: CMS equivalent of ISPF SRCHFOR?
On Sat, 20 Mar 2021 21:57:34 -0400, Phil Smith III wrote: >>numinous > I saw that. And there were a couple characters in the EXECIO that aren't on my keyboard. Needs comments. I puzzled long about what the IF was trying to do with wildcards. I applaud putting the label on the ITERATE. I would have put one on the END also. >SEARCH4 is my go-to tool. I have source; it’s from Cornell originally but we >added case insensitivity and a few other things. Email me privately if you >want it. > I hope case insensitivity is optional. One of my habits is to capitalize words in comments differently so I can search only the code. -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: CMS equivalent of ISPF SRCHFOR?
>numinous "having a strong religious or spiritual quality; indicating or suggesting the presence of a divinity." ?? Seems to be overstating it a bit. SEARCH4 is my go-to tool. I have source; it’s from Cornell originally but we added case insensitivity and a few other things. Email me privately if you want it. ...phsiii -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: CMS equivalent of ISPF SRCHFOR?
There is not a 'standard' search tool in VM. There are numinous versions that are available for the asking. Just post a request on the VM list. Almost all of them are just a rexx wrapper for the xedit locate function. I have attached one of my may versions, the one I use mostly. Tony Thigpen Binyamin Dissen wrote on 3/20/21 4:09 PM: Is there a CMS command which will search a minidisk (or group of minidisks) for files containing a specific string? Don't see anything obvious in the CMS manual. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN /* SEARCHFL - search for a string in all members of a library */ /* to use, enter 'SEARCHFL' followed by a file name, file type, and file mode (like a filelist command) and after that enter a search string i.e. 'SEARCHFL D6D* COBOL A WS-SEARCH'. A filelist screen will then be presented including only those members that contain the string 'WS-SEARCH'. */ trace off parse arg fn ft fm srcharg if srcharg = '' then exit 255 outfile = 'SEARCHFL FILELIST A' address command 'ERASE' outfile saveq = queued() fmx = space(translate(fm,' ',',')) do ii = 1 to words(fmx) fm = word(fmx,ii) 'LISTFILE' fn ft fm '(LIFO' if rc \= 0 then iterate ii do while queued() > saveq parse pull xn xt xm file = xn xt left(strip(xm,'B'),1) ffm = left(strip(xm,'B'),1) if fm \= '*' | (ffm \= 'S' & ffm \= 'Y') then do 'EXECIO * DISKR' file '1 (SKIP FINIS LOCATE ¦'srcharg'¦' if rc = 0 then 'EXECIO 1 DISKW' outfile '0 F 80 (STRING' file end end end 'FINIS' outfile address command 'STATE' outfile if rc = 0 then do 'FILELIST' outfile '(FILELIST' address command 'ERASE' outfile end /* else say 'No Files Match' fn ft fm */ exit 0 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: CMS equivalent of ISPF SRCHFOR?
I normally use SuperC which is sold as part of the HLASM Toolkit. I don't know if there is a free version. On Sun, Mar 21, 2021 at 7:09 AM Binyamin Dissen wrote: > Is there a CMS command which will search a minidisk (or group of minidisks) > for files containing a specific string? > > Don't see anything obvious in the CMS manual. > > -- > Binyamin Dissen > http://www.dissensoftware.com > > Director, Dissen Software, Bar & Grill - Israel > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: CMS equivalent of ISPF SRCHFOR?
On Sat, 20 Mar 2021 22:09:06 +0200, Binyamin Dissen wrote: >Is there a CMS command which will search a minidisk (or group of minidisks) >for files containing a specific string? > >Don't see anything obvious in the CMS manual. > Ask on IBMVM and CMS-PIPELINES. I've used SRCHFOR from the rare and elusive CMS ISPF. HLASM Toolkit has SuperC and SRCHFOR. Same product; different component prefix and better support and M -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
CMS equivalent of ISPF SRCHFOR?
Is there a CMS command which will search a minidisk (or group of minidisks) for files containing a specific string? Don't see anything obvious in the CMS manual. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
