Hi Dave,
For LNKLSTd PDSEs, modules deemed to be in use aren't "removed" from the
PDSE, which could cause shortage of directory blocks or space.
I usually have to run it twice. The first time is without a PARM, the
second time with PARM='PerformPendingDelete,NoAnalysis'.
Please see:
https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.3.0/com.ibm.zos.v2r3.idau100/pdsexmp4.htm
Regards,
David
On 2020-10-18 01:18, Jousma, David wrote:
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 <IBM-MAIN@LISTSERV.UA.EDU> On Behalf Of
David Spiegel
Sent: Sunday, October 18, 2020 12:42 AM
To: IBM-MAIN@LISTSERV.UA.EDU
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 <IBM-MAIN@LISTSERV.UA.EDU> On
Behalf Of Steve Horein
Sent: Saturday, October 17, 2020 6:49 PM
To: IBM-MAIN@LISTSERV.UA.EDU
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
<choelsc...@humana.com>
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 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
**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 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 **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 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
