Never heard of the utility. Why would that be needed? _____________________________________________________________________________________________________ Dave Jousma AVP | Director, Technology Engineering
Fifth Third Bank | 1830 East Paris Ave, SE | MD RSCB2H | Grand Rapids, MI 49546 616.653.8429 | fax: 616.653.2717 -----Original Message----- From: IBM Mainframe Discussion List <[email protected]> On Behalf Of David Spiegel Sent: Sunday, October 18, 2020 12:42 AM To: [email protected] Subject: Re: emptying a PDS: was RE: [IBM-MAIN] getting XCFAS down **CAUTION EXTERNAL EMAIL** **DO NOT open attachments or click on links from unknown senders or unexpected emails** Hi Dave, If it's a Linklisted PDSE, you also may have to run IEBPDSE after the members are deleted. Regards, David On 2020-10-18 00:11, Jousma, David wrote: > That’s what I was going to say...doesnt get much easier. I do this > all the time when I want to update the contents of a linklisted > dataset > > //IDCAMS EXEC PGM=IDCAMS > //SYSUDUMP DD SYSOUT=* > //SYSPRINT DD SYSOUT=* > //LIBRARY DD DSN=your.pds.dataset,DISP=SHR //SYSIN DD * > DELETE your.pds.dataset(*) FILE(LIBRARY) > /* > ______________________________________________________________________ > _______________________________ > Dave Jousma > AVP | Director, Technology Engineering > > Fifth Third Bank | 1830 East Paris Ave, SE | MD RSCB2H | Grand > Rapids, MI 49546 > 616.653.8429 | fax: 616.653.2717 > > > -----Original Message----- > From: IBM Mainframe Discussion List <[email protected]> On > Behalf Of Steve Horein > Sent: Saturday, October 17, 2020 6:49 PM > To: [email protected] > Subject: Re: emptying a PDS: was RE: [IBM-MAIN] getting XCFAS down > > **CAUTION EXTERNAL EMAIL** > > **DO NOT open attachments or click on links from unknown senders or > unexpected emails** > > Good ole IDCAMS anyone? > https://eur05.safelinks.protection.outlook.com/?url=https%3A%2F%2Fwww. > ibm.com%2Fsupport%2Fknowledgecenter%2FSSLTBW_2.4.0%2Fcom.ibm.zos.v2r4. > idai200%2Fdgt3i231.htm&data=04%7C01%7C%7Cffe03d56aebe4262c3d308d87 > 31bfa0e%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C63738591128477962 > 1%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6 > Ik1haWwiLCJXVCI6Mn0%3D%7C1000&sdata=iyei6oTeqNIWXdTCZAFKf6vOccPPSd > ryGpw8M8cBiwg%3D&reserved=0 > > > On Sat, Oct 17, 2020 at 5:34 PM Chris Hoelscher > <[email protected]> > wrote: > >> I have employed this REXX script for years: >> >> /* REXX */ >> DSNAME = 'my PDS' >> DSN = STRIP(DSNAME, 'BOTH', '''') /* IN CASE IT'S IN QUOTES */ QUOTE >> = "'" >> QDSN = QUOTE||DSN||QUOTE /* FULLY QUOTED DSN */ >> >> ADDRESS ISPEXEC >> "LMINIT DATAID( MYDATAID) DATASET(" QDSN ") ENQ(SHRW)" >> "LMOPEN DATAID("MYDATAID") OPTION(OUTPUT)" >> "LMMDEL DATAID("MYDATAID") MEMBER(*)" >> "LMCLOSE DATAID("MYDATAID")" >> "LMFREE DATAID("MYDATAID")" >> >> SAY DSN " IS NOW EMPTY" >> >> Chris Hoelscher >> Lead Sys DBA >> IBM Global Technical Services on assignmemt to Humana Inc. >> T 502.476.2538 or 502.407.7266 >> >> >> The information transmitted is intended only for the person or entity >> to which it is addressed and may contain CONFIDENTIAL material. If >> you receive this material/information in error, please contact the >> sender and delete or destroy the material/information. >> >> Humana Inc. and its subsidiaries comply with applicable Federal civil >> rights laws and do not discriminate on the basis of race, color, >> national origin, ancestry, age, disability, sex, marital status, >> gender, sexual orientation, gender identity, or religion. >> Humana Inc. and its subsidiaries do not exclude people or treat them >> differently because of race, color, national origin, ancestry, age, >> disability, sex, marital status, gender, sexual orientation, gender >> identity, or religion. >> >> English: ATTENTION: If you do not speak English, language assistance >> services, free of charge, are available to you. Call 1‐877‐320‐1235 >> (TTY: 711). >> >> Español (Spanish): ATENCIÓN: Si habla español, tiene a su disposición >> servicios gratuitos de asistencia lingüística. Llame al >> 1‐877‐320‐1235 >> (TTY: 711). >> >> 繁體中文(Chinese):注意:如果您使用繁體中文,您可以免費獲得語言援助 >> 服務。請致電 1‐877‐320‐1235 (TTY: 711)。 >> >> Kreyòl Ayisyen (Haitian Creole): ATANSION: Si w pale Kreyòl Ayisyen, >> gen sèvis èd pou lang ki disponib gratis pou ou. Rele 1‐877‐320‐1235 >> (TTY: 711). >> >> Polski (Polish): UWAGA: Jeżeli mówisz po polsku, możesz skorzystać z >> bezpłatnej pomocy językowej. Zadzwoń pod numer 1‐877‐320‐1235 (TTY: >> 711). >> >> 한국어 (Korean): 주의: 한국어를 사용하시는 경우, 언어 지원 서비스를 무료로 이용하실 수 있습니다. >> 1‐877‐320‐1235 (TTY: 711)번으로 전화해 주십시오. >> >> >> --------------------------------------------------------------------- >> - For IBM-MAIN subscribe / signoff / archive access instructions, >> send email to [email protected] with the message: INFO >> IBM-MAIN >> > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, send > email to [email protected] with the message: INFO IBM-MAIN > **CAUTION EXTERNAL EMAIL** > > **DO NOT open attachments or click on links from unknown senders or > unexpected emails** > > This e-mail transmission contains information that is confidential and may be > privileged. It is intended only for the addressee(s) named above. If you > receive this e-mail in error, please do not read, copy or disseminate it in > any manner. If you are not the intended recipient, any disclosure, copying, > distribution or use of the contents of this information is prohibited. Please > reply to the message immediately by informing the sender that the message was > misdirected. After replying, please erase it from your computer system. Your > assistance in correcting this error is appreciated. > > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, send > email to [email protected] with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN **CAUTION EXTERNAL EMAIL** **DO NOT open attachments or click on links from unknown senders or unexpected emails** This e-mail transmission contains information that is confidential and may be privileged. It is intended only for the addressee(s) named above. If you receive this e-mail in error, please do not read, copy or disseminate it in any manner. If you are not the intended recipient, any disclosure, copying, distribution or use of the contents of this information is prohibited. Please reply to the message immediately by informing the sender that the message was misdirected. After replying, please erase it from your computer system. Your assistance in correcting this error is appreciated. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
