Hi Peter,
I found this. 🙂
Kind regards,
Lindy
/* Rexx */
"ISREDIT MACRO NOPROCESS"
"ISPEXEC CONTROL ERRORS RETURN"
"Isredit (LastLine) = LINENUM .ZLAST "
PrevLn = ""
DelTxt = "****DELETE ME****"
Do Index = 1 to LastLine
"Isredit (DataLn) = LINE" Index
If DataLn == PrevLn
Then Do
"Isredit LINE" Index " = (DelTxt)"
End
PrevLn = DataLn
End
"Isredit Exclude All"
"Isredit Find '"Deltxt"' All"
"Isredit Delete All NX"
"Isredit Reset"
________________________________
From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> on behalf of
Peter Ten Eyck <000004d3761a18a7-dmarc-requ...@listserv.ua.edu>
Sent: Tuesday, January 14, 2025 8:04 PM
To: IBM-MAIN@LISTSERV.UA.EDU <IBM-MAIN@LISTSERV.UA.EDU>
Subject: ISPF edit macro to sort and delete duplicate records
EXTERNAL
Greetings,
Anyone know of an ISPF edit macro to sort and delete duplicate records within
PDS member or dataset?
----------------------------------------------------------------------
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
