Minor disaster

[Lennie Dymoke-Bradshaw]

Aaargghhh!

I just pressed "D" next to a PDSe member I was editing, instead of "S".

I have generations set up for this PDSe, but I cannot see how to get to the
member I just accidentally deleted.

Is there a way to recover the member?

 



Lennie Dymoke-Bradshaw

  https://rsclweb.com 


'Dance like no one is watching. Encrypt like everyone is.'

 

 

 

 

 


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Minor disaster

[Carmen Vitullo]

ouch that sucks, I know if it was a PDS there are tools to get the 
member back, it's not actually gone until you compress, or write over it 
IIRC?


I wonder if the same tools can help, I'd be interested also how to 
restore a member from a PDSE that's GDG like


Carmen

On 9/28/2022 7:00 AM, Lennie Dymoke-Bradshaw wrote:

Aaargghhh!

I just pressed "D" next to a PDSe member I was editing, instead of "S".

I have generations set up for this PDSe, but I cannot see how to get to the
member I just accidentally deleted.

Is there a way to recover the member?

  




Lennie Dymoke-Bradshaw

   https://rsclweb.com


'Dance like no one is watching. Encrypt like everyone is.'

  

  

  

  

  



--
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: Minor disaster

[Jake Anderson]

May be CBT File 036 fixpds can help ?

On Wed, Sep 28, 2022, 4:06 PM Carmen Vitullo  wrote:

> ouch that sucks, I know if it was a PDS there are tools to get the
> member back, it's not actually gone until you compress, or write over it
> IIRC?
>
> I wonder if the same tools can help, I'd be interested also how to
> restore a member from a PDSE that's GDG like
>
> Carmen
>
> On 9/28/2022 7:00 AM, Lennie Dymoke-Bradshaw wrote:
> > Aaargghhh!
> >
> > I just pressed "D" next to a PDSe member I was editing, instead of "S".
> >
> > I have generations set up for this PDSe, but I cannot see how to get to
> the
> > member I just accidentally deleted.
> >
> > Is there a way to recover the member?
> >
> >
> >
> >
> >
> > Lennie Dymoke-Bradshaw
> >
> >    https://rsclweb.com
> >
> >
> > 'Dance like no one is watching. Encrypt like everyone is.'
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> > --
> > 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
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Minor disaster

[Lionel B. Dyck]

If these are PDSE's with generations then the question is what release of
z/OS are you running?  If 2.4 then the ISPF delete member selections will
delete all generations along with the base member. If 2.3 or earlier then
only the base (generation 0) member is deleted and the generations will
remain - just not accessible.

If you are z/OS 2.3, or earlier, then you can use PDSEGEN (CBTTape file 969)
to see those 'ghost' generations and easily recover them.

If you are z/OS 2.4 or 2.5 then hope you have HSM backups or some other
backup system.


Lionel B. Dyck <><
Website: https://www.lbdsoftware.com
Github: https://github.com/lbdyck

“Worry more about your character than your reputation. Character is what you
are, reputation merely what others think you are.”   - - - John Wooden

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of
Lennie Dymoke-Bradshaw
Sent: Wednesday, September 28, 2022 7:01 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Minor disaster

Aaargghhh!

I just pressed "D" next to a PDSe member I was editing, instead of "S".

I have generations set up for this PDSe, but I cannot see how to get to the
member I just accidentally deleted.

Is there a way to recover the member?

 



Lennie Dymoke-Bradshaw

  https://rsclweb.com 


'Dance like no one is watching. Encrypt like everyone is.'

 

 

 

 

 


--
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: Minor disaster

[Itschak Mugzach]

If you are a zPDT client, and I think you are, you can restore the member
from backup using pdsUtil.

ITschak

*| **Itschak Mugzach | Director | SecuriTeam Software **|** IronSphere
Platform* *|* *Information Security Continuous Monitoring for Z/OS, zLinux
and IBM I **|  *

*|* *Email**: i_mugz...@securiteam.co.il **|* *Mob**: +972 522 986404 **|*
*Skype**: ItschakMugzach **|* *Web**: www.Securiteam.co.il  **|*





On Wed, Sep 28, 2022 at 3:02 PM Lennie Dymoke-Bradshaw <
032fff1be9b4-dmarc-requ...@listserv.ua.edu> wrote:

> Aaargghhh!
>
> I just pressed "D" next to a PDSe member I was editing, instead of "S".
>
> I have generations set up for this PDSe, but I cannot see how to get to the
> member I just accidentally deleted.
>
> Is there a way to recover the member?
>
>
>
>
>
> Lennie Dymoke-Bradshaw
>
>   https://rsclweb.com
>
>
> 'Dance like no one is watching. Encrypt like everyone is.'
>
>
>
>
>
>
>
>
>
>
>
>
> --
> 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: Using DFSORT over DCOLLECT to get dataset extent number

[Jack Zukt]

Hi,
I am trying to convert the DCOLLECT type "D" record fields  DCDDSORG and
DCDRECRD from its bits to a meaningful display (PS and VB, for instance). I
am using OUTREC IFTHEN=(WHEN=(
I have been reading the DFSORT Application Programming Guide but I have not
been finding what I need. As far as I can tell, as soon as one of the
IFTHEN=(WHEN is met, all the others are ignored. So, how do I test
different positions on a INREC/OUTREC statement?
Your help will be, as always, greatly aprecciated
Jack

On Fri, 23 Sept 2022 at 09:24, Mike Schwab  wrote:

> Yes.  There are Unpack field types to do this.
>
> On Fri, Sep 23, 2022 at 2:59 AM Jack Zukt  wrote:
> >
> > Hi all,
> >
> > I have a rexx that reads a DCOLLECT output, processes the type "D"
> records
> > and creates a file with a list of datasets that have over 200 extents.
> As I
> > am using a SORT between the DCOLLECT and the rexx in order to have only
> the
> > type "D" records, I was wondering if it would be possible to process the
> > DCOLLECT output with DFSORT and get the same result.
> > My output file has this layout::
> >
> +1+2+3+4+5+6+7+8+9+
> > Data Set NameOrg Alloc  Used
> Perc%
> > #Extn  Lrecl RFM  Blksz
> > PROD.FILE.WORKPS  24423325   6105811
> 100.0%
> >  8599452  FB  27572
> > Thank you all for any suggestions
> > Regards
> > Jack
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
>
>
> --
> Mike A Schwab, Springfield IL USA
> Where do Forest Rangers go to get away from it all?
>
> --
> 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: LONGPARM applies?

[Peter Relson]

Regarding your quarrel about "mainly": It is likely nothing will be changed.
There are many possible uses and there is no value in guessing at them in order 
to try to list them.
And if one were to change to "only" then your analogous approach would be to 
quibble about that because it is incorrect by being incomplete.


Breaking an existing authorized program in that fashion could be a buffer
overrun leading to escalation of privilige; an integrity threat that I'd 
consider
an incompatibility.

That's exactly why I wrote what I wrote about LONGPARM being incompatible if 
allowed without specification, but not allowing LONGPARM for an authorized 
program unless the directory entry indicated it was OK.


Historically, unauthorized programs could be invoked by LINK/ATTACH (I've done
so, constructively.)

You can "invoke" anything you want. Whether it will work properly depends on 
the program. The program's documentation (or lack thereof) is your guide.
If their doc says that you are to use EXEC PGM=xx and you choose to use LINK or 
ATTACH, then maybe it will work, maybe it won't, but if it doesn't (or if it 
seems to but has subtle problems that you might not even notice aside from 
error cases), that's on you.

Peter Relson
z/OS Core Technology Design


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Minor disaster

[Lennie Dymoke-Bradshaw]

Thanks Lionel. I was looking at PDSEGEN and I was unclear whether it could
help.
In this case the system was z/OS 2.5. The 'D' took out all generations.
I have recovered last night's copy from HSM.
No to try and remember all the changes I made this morning.

'Blessed are the pessimistic - for they took a backup'.

Lennie Dymoke-Bradshaw
https://rsclweb.com 
‘Dance like no one is watching. Encrypt like everyone is.’

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of
Lionel B. Dyck
Sent: 28 September 2022 13:14
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Minor disaster

If these are PDSE's with generations then the question is what release of
z/OS are you running?  If 2.4 then the ISPF delete member selections will
delete all generations along with the base member. If 2.3 or earlier then
only the base (generation 0) member is deleted and the generations will
remain - just not accessible.

If you are z/OS 2.3, or earlier, then you can use PDSEGEN (CBTTape file 969)
to see those 'ghost' generations and easily recover them.

If you are z/OS 2.4 or 2.5 then hope you have HSM backups or some other
backup system.


Lionel B. Dyck <><
Website: https://www.lbdsoftware.com
Github: https://github.com/lbdyck

“Worry more about your character than your reputation. Character is what you
are, reputation merely what others think you are.”   - - - John Wooden

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of
Lennie Dymoke-Bradshaw
Sent: Wednesday, September 28, 2022 7:01 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Minor disaster

Aaargghhh!

I just pressed "D" next to a PDSe member I was editing, instead of "S".

I have generations set up for this PDSe, but I cannot see how to get to the
member I just accidentally deleted.

Is there a way to recover the member?

 



Lennie Dymoke-Bradshaw

  https://rsclweb.com 


'Dance like no one is watching. Encrypt like everyone is.'

 

 

 

 

 


--
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

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Minor disaster

[Lennie Dymoke-Bradshaw]

Itschak, 
You are right. I am a zPDT client.
However, in this case I was working on a client's machine ☹.
Lennie

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Itschak Mugzach
Sent: 28 September 2022 13:17
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Minor disaster

If you are a zPDT client, and I think you are, you can restore the member from 
backup using pdsUtil.

ITschak

*| **Itschak Mugzach | Director | SecuriTeam Software **|** IronSphere
Platform* *|* *Information Security Continuous Monitoring for Z/OS, zLinux and 
IBM I **|  *

*|* *Email**: i_mugz...@securiteam.co.il **|* *Mob**: +972 522 986404 **|*
*Skype**: ItschakMugzach **|* *Web**: www.Securiteam.co.il  **|*





On Wed, Sep 28, 2022 at 3:02 PM Lennie Dymoke-Bradshaw < 
032fff1be9b4-dmarc-requ...@listserv.ua.edu> wrote:

> Aaargghhh!
>
> I just pressed "D" next to a PDSe member I was editing, instead of "S".
>
> I have generations set up for this PDSe, but I cannot see how to get 
> to the member I just accidentally deleted.
>
> Is there a way to recover the member?
>
>
>
>
>
> Lennie Dymoke-Bradshaw
>
>   https://rsclweb.com
>
>
> 'Dance like no one is watching. Encrypt like everyone is.'
>
>
>
>
>
>
>
>
>
>
>
>
> --
> 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

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

SYSPLEX / SYSNAME / SMFID stability

[Matt Hogstrom]

We had an internal debate about the stability of SYSNAME and smfID in a 
sysplex.  The discussion was that smfID is not stable and can be changed and 
that there can be more than one system in a sysplex with the same sysname / 
smfid.  I haven’t had a chance to try it out but the argument seems to be 
counterintuitive that anyone would use the same SYSNAME / SMFID in a SYSPLEX.  

The IBM documents to not specifically say that it is not allowed but I’m 
curious if anyone has seen such a configuration / can think of a reason why you 
would do that.

The problem I’m trying to get a handle on is to uniquely identify a z/OS 
instance over time and the SYSPLEX.SYSNAME seemed like a good combination (I 
still think that they will be stable over time) but I thought I’d pose the 
question to the brain trust here.   

Another proposal was to use the hostname / domain name as unique but it seems 
that you can have multiple instances of those depending on how many TCPIP 
stacks you are running in a z/OS instance.

Thoughts?

Matt Hogstrom
m...@hogstrom.org

“It may be cognitive, but, it ain’t intuitive."
— Hogstrom
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: SYSPLEX / SYSNAME / SMFID stability

[Martin Packer]

If it moves to another machine is it still the same LPAR?

From: IBM Mainframe Discussion List  on behalf of 
Matt Hogstrom 
Date: Wednesday, 28 September 2022 at 13:59
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: [EXTERNAL] SYSPLEX / SYSNAME / SMFID stability
We had an internal debate about the stability of SYSNAME and smfID in a 
sysplex.  The discussion was that smfID is not stable and can be changed and 
that there can be more than one system in a sysplex with the same sysname / 
smfid.  I haven’t had a chance to try it out but the argument seems to be 
counterintuitive that anyone would use the same SYSNAME / SMFID in a SYSPLEX.

The IBM documents to not specifically say that it is not allowed but I’m 
curious if anyone has seen such a configuration / can think of a reason why you 
would do that.

The problem I’m trying to get a handle on is to uniquely identify a z/OS 
instance over time and the SYSPLEX.SYSNAME seemed like a good combination (I 
still think that they will be stable over time) but I thought I’d pose the 
question to the brain trust here.

Another proposal was to use the hostname / domain name as unique but it seems 
that you can have multiple instances of those depending on how many TCPIP 
stacks you are running in a z/OS instance.

Thoughts?

Matt Hogstrom
m...@hogstrom.org

“It may be cognitive, but, it ain’t intuitive."
— Hogstrom
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Unless otherwise stated above:

IBM United Kingdom Limited
Registered in England and Wales with number 741598
Registered office: PO Box 41, North Harbour, Portsmouth, Hants. PO6 3AU

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Using DFSORT over DCOLLECT to get dataset extent number

[Sri h Kolusu]

>> I am using OUTREC IFTHEN=(WHEN=( I have been reading the DFSORT Application 
>> Programming Guide but I have not been finding what I need. As far as I can 
>> tell, as soon as one of the IFTHEN=(WHEN is met, all the others are ignored. 
>> So, how do I test different positions on a INREC/OUTREC statement?

Jack,

You need to use HIT=NEXT which Specifies that IFTHEN processing should continue 
even if the logical expression is true. By default (if HIT=NEXT is not 
specified), IFTHEN processing stops if the logical expression is true.

Thanks,
Kolusu
DFSORT Development
IBM Corporation


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: SYSPLEX / SYSNAME / SMFID stability

[Matt Hogstrom]

That’s a good question … I hope I used the term z/OS instance and not LPAR in 
my question.  A z/OS instance could be run on different CECs and LPARs at 
different times.

There is no canonical UUID for an instance but I think there is likely an 
industry best practice that could be relied upon.

Matt Hogstrom

“It may be cognitive, but, it ain’t intuitive."
— Hogstrom

> On Sep 28, 2022, at 9:14 AM, Martin Packer  wrote:
> 
> If it moves to another machine is it still the same LPAR?


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: zOS 1.13 (really) how copy MVS loadmod from ZFS to PDSE

[Nightwatch RenBand]

Thanks to all.
I have tested the Windows version SCRT 28 and since that works I do have a
work-around. May stick with it

I did try "cp -X ..." while it copied OK, would not execute.

Charles Mills: I might play with the zOS unix version

I have requested the SMPE Java 8, seems you have to go thru your IBM Rep.
I could not find it in ShopZ

Charles Mills: The binder did return RC=00 with info msg in the sysout.
IEW2278I B352 INVOCATION PARAMETERS - LIST,REUS,RENT,NCAL,LET,MAP

IEW2322I 1220  1INCLUDE INLIB
IEW2322I 1220  2NAME JVMLDM86(R)
IEW2650I 5102 MODULE ENTRY NOT PROVIDED.  ENTRY DEFAULTS TO SECTION
CELQSTRT.
I used "IEBEyeBall" on the zFS loadmod and found CEESTART but the link
failed using that.  Confess I have little experience with the Binder.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: zOS 1.13 (really) how copy MVS loadmod from ZFS to PDSE

[Paul Gilmartin]

On Wed, 28 Sep 2022 06:30:19 -0700, Nightwatch RenBand wrote:
>...
>Charles Mills: The binder did return RC=00 with info msg in the sysout.
>IEW2278I B352 INVOCATION PARAMETERS - LIST,REUS,RENT,NCAL,LET,MAP
>
>IEW2322I 1220  1INCLUDE INLIB
>
Perhaps  INCLUDE -ATTR INLIB?
 ^

>IEW2322I 1220  2NAME JVMLDM86(R)
>IEW2650I 5102 MODULE ENTRY NOT PROVIDED.  ENTRY DEFAULTS TO SECTION CELQSTRT.



-- 
gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: LONGPARM applies?

[Walt Farrell]

On Tue, 27 Sep 2022 13:50:14 -0500, Paul Gilmartin  wrote:

>
>Breaking an existing authorized program in that fashion could be a buffer
>overrun leading to escalation of privilige; an integrity threat that I'd 
>consider
>an incompatibility.

But are you talking about PARM=, which Peter has covered (long parms not 
allowed unless specified by the authorized program's directory entry), or about 
the APIs you mentioned (LINK, ATTACH, etc.)?

For the APIs, you can only "break" the existing authorized program if you (the 
program issuing the API call) are also running authorized. If you're not 
authorized, the program you're invoking won't run authorized, either, and 
there's no integrity exposure.

-- 
Walt

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Minor disaster

[Allan Staller]

Classification: Confidential

The PDS command from the CBTTAPE should be able to recover this member. Or the 
commercial version from Serena.

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Lennie Dymoke-Bradshaw
Sent: Wednesday, September 28, 2022 7:01 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Minor disaster

[CAUTION: This Email is from outside the Organization. Unless you trust the 
sender, Don't click links or open attachments as it may be a Phishing email, 
which can steal your Information and compromise your Computer.]

Aaargghhh!

I just pressed "D" next to a PDSe member I was editing, instead of "S".

I have generations set up for this PDSe, but I cannot see how to get to the 
member I just accidentally deleted.

Is there a way to recover the member?





Lennie Dymoke-Bradshaw

 

 
https://apc01.safelinks.protection.outlook.com/?url=https%3A%2F%2Frsclweb.com%2F&data=05%7C01%7Callan.staller%40HCL.COM%7Cf8c05ef548424a1d512708daa14932f0%7C189de737c93a4f5a8b686f4ca9941912%7C0%7C0%7C637999633025120838%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&sdata=fi2wvnf%2Fv74ofniqLyz6Y%2F%2BjA9BLSMGGC6sAZiugTHc%3D&reserved=0


'Dance like no one is watching. Encrypt like everyone is.'












--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN
::DISCLAIMER::

The contents of this e-mail and any attachment(s) are confidential and intended 
for the named recipient(s) only. E-mail transmission is not guaranteed to be 
secure or error-free as information could be intercepted, corrupted, lost, 
destroyed, arrive late or incomplete, or may contain viruses in transmission. 
The e mail and its contents (with or without referred errors) shall therefore 
not attach any liability on the originator or HCL or its affiliates. Views or 
opinions, if any, presented in this email are solely those of the author and 
may not necessarily reflect the views or opinions of HCL or its affiliates. Any 
form of reproduction, dissemination, copying, disclosure, modification, 
distribution and / or publication of this message without the prior written 
consent of authorized representative of HCL is strictly prohibited. If you have 
received this email in error please delete it and notify the sender 
immediately. Before opening any email and/or attachments, please check them for 
viruses and other defects.


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Minor disaster

[Seymour J Metz]

In general PDS and StarrTool can recovery a deleted member of a PDS, but not a 
deleted load module. PDSE is another matter.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Allan Staller [0387911dea17-dmarc-requ...@listserv.ua.edu]
Sent: Wednesday, September 28, 2022 10:48 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Minor disaster

Classification: Confidential

The PDS command from the CBTTAPE should be able to recover this member. Or the 
commercial version from Serena.

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Lennie Dymoke-Bradshaw
Sent: Wednesday, September 28, 2022 7:01 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Minor disaster

[CAUTION: This Email is from outside the Organization. Unless you trust the 
sender, Don't click links or open attachments as it may be a Phishing email, 
which can steal your Information and compromise your Computer.]

Aaargghhh!

I just pressed "D" next to a PDSe member I was editing, instead of "S".

I have generations set up for this PDSe, but I cannot see how to get to the 
member I just accidentally deleted.

Is there a way to recover the member?





Lennie Dymoke-Bradshaw

 

 
https://nam11.safelinks.protection.outlook.com/?url=https%3A%2F%2Frsclweb.com%2F&data=05%7C01%7Csmetz3%40gmu.edu%7C2e53f3c2b51b4a1cb2eb08daa160aa62%7C9e857255df574c47a0c00546460380cb%7C0%7C0%7C637999733822716342%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&sdata=UU6JT09H7Ai%2B5MsQAKIKS%2BpmmJN5a4Gr8k63pvAY37E%3D&reserved=0


'Dance like no one is watching. Encrypt like everyone is.'












--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN
::DISCLAIMER::

The contents of this e-mail and any attachment(s) are confidential and intended 
for the named recipient(s) only. E-mail transmission is not guaranteed to be 
secure or error-free as information could be intercepted, corrupted, lost, 
destroyed, arrive late or incomplete, or may contain viruses in transmission. 
The e mail and its contents (with or without referred errors) shall therefore 
not attach any liability on the originator or HCL or its affiliates. Views or 
opinions, if any, presented in this email are solely those of the author and 
may not necessarily reflect the views or opinions of HCL or its affiliates. Any 
form of reproduction, dissemination, copying, disclosure, modification, 
distribution and / or publication of this message without the prior written 
consent of authorized representative of HCL is strictly prohibited. If you have 
received this email in error please delete it and notify the sender 
immediately. Before opening any email and/or attachments, please check them for 
viruses and other defects.


--
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: zOS 1.13 (really) how copy MVS loadmod from ZFS to PDSE

[Seymour J Metz]

Did you set executable in the permissions?


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Nightwatch RenBand [johnmattson...@gmail.com]
Sent: Wednesday, September 28, 2022 9:30 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: zOS 1.13 (really) how copy MVS loadmod from ZFS to PDSE

Thanks to all.
I have tested the Windows version SCRT 28 and since that works I do have a
work-around. May stick with it

I did try "cp -X ..." while it copied OK, would not execute.

Charles Mills: I might play with the zOS unix version

I have requested the SMPE Java 8, seems you have to go thru your IBM Rep.
I could not find it in ShopZ

Charles Mills: The binder did return RC=00 with info msg in the sysout.
IEW2278I B352 INVOCATION PARAMETERS - LIST,REUS,RENT,NCAL,LET,MAP

IEW2322I 1220  1INCLUDE INLIB
IEW2322I 1220  2NAME JVMLDM86(R)
IEW2650I 5102 MODULE ENTRY NOT PROVIDED.  ENTRY DEFAULTS TO SECTION
CELQSTRT.
I used "IEBEyeBall" on the zFS loadmod and found CEESTART but the link
failed using that.  Confess I have little experience with the Binder.

--
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: SYSPLEX / SYSNAME / SMFID stability

[Seymour J Metz]

IMHO duplicate names are undesirable; you can avoid them by implementing 
appropriate naming conventions. Ideally the names should be constructed from a 
combination of the IPL volume serial and the LPAR name.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Matt Hogstrom [m...@hogstrom.org]
Sent: Wednesday, September 28, 2022 8:59 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: SYSPLEX / SYSNAME / SMFID stability

We had an internal debate about the stability of SYSNAME and smfID in a 
sysplex.  The discussion was that smfID is not stable and can be changed and 
that there can be more than one system in a sysplex with the same sysname / 
smfid.  I haven’t had a chance to try it out but the argument seems to be 
counterintuitive that anyone would use the same SYSNAME / SMFID in a SYSPLEX.

The IBM documents to not specifically say that it is not allowed but I’m 
curious if anyone has seen such a configuration / can think of a reason why you 
would do that.

The problem I’m trying to get a handle on is to uniquely identify a z/OS 
instance over time and the SYSPLEX.SYSNAME seemed like a good combination (I 
still think that they will be stable over time) but I thought I’d pose the 
question to the brain trust here.

Another proposal was to use the hostname / domain name as unique but it seems 
that you can have multiple instances of those depending on how many TCPIP 
stacks you are running in a z/OS instance.

Thoughts?

Matt Hogstrom
m...@hogstrom.org

“It may be cognitive, but, it ain’t intuitive."
— Hogstrom
--
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: zOS 1.13 (really) how copy MVS loadmod from ZFS to PDSE

[Paul Gilmartin]

On Wed, 28 Sep 2022 15:39:48 +, Seymour J Metz wrote:

>Did you set executable in the permissions?
>
> 
How does one do that for a program object in a PDSE, the OP's requirement?

There is a case where /bin/ld will create a file set executable in the 
permissions,
but lacking the executable magic number.  Then exec(), per POSIX requirement,
treats it as a shell script with surprising results.

-- 
gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Minor disaster

[Michael Babcock]

Do you have an HSM backup of the PDSE?  Or a volume backup?  Otherwise I
don’t know.  BTW, I always have prompting turned on so that if I
accidentally hit D, I get a prompt verifying I really want to delete it.

On Wed, Sep 28, 2022 at 7:02 AM Lennie Dymoke-Bradshaw <
032fff1be9b4-dmarc-requ...@listserv.ua.edu> wrote:

> Aaargghhh!
>
> I just pressed "D" next to a PDSe member I was editing, instead of "S".
>
> I have generations set up for this PDSe, but I cannot see how to get to the
> member I just accidentally deleted.
>
> Is there a way to recover the member?
>
>
>
>
>
> Lennie Dymoke-Bradshaw
>
>   https://rsclweb.com
>
>
> 'Dance like no one is watching. Encrypt like everyone is.'
>
>
>
>
>
>
>
>
>
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
-- 
Michael Babcock
OneMain Financial
z/OS Systems Programmer, Lead

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: zOS 1.13 (really) how copy MVS loadmod from ZFS to PDSE

[Seymour J Metz]

Aha! The text for -X didn't specify, but text further down made it clare that 
Unix to PDSE is valid. The only remaining question is what PDS(E)->Unix does 
with execute permission.

And, no, I don't know whether the option was valid in 1.13.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Paul Gilmartin [042bfe9c879d-dmarc-requ...@listserv.ua.edu]
Sent: Tuesday, September 27, 2022 5:31 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: zOS 1.13 (really) how copy MVS loadmod from ZFS to PDSE

On Tue, 27 Sep 2022 21:15:11 +, Seymour J Metz wrote:

>To copy to or from a program object, you need the binder; IEBCOPY can call it 
>under the covers, but doesn't handle Unix files.

RFE?

Given that: 

-X
Specifies that the data to be copied is an executable.
   Cannot be used with -F, -T, or -B.

I'd call it SR, not RFE.  But 1.13?

--
gil

--
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: zOS 1.13 (really) how copy MVS loadmod from ZFS to PDSE

[Seymour J Metz]

Sorry, I was thinking of the other direction. 

If the OP did a cp -X from Unix to PDSE and it wouldn't execute, it would be 
time to report it, assuming that he can reproduce it on 2.5.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Paul Gilmartin [042bfe9c879d-dmarc-requ...@listserv.ua.edu]
Sent: Wednesday, September 28, 2022 12:13 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: zOS 1.13 (really) how copy MVS loadmod from ZFS to PDSE

On Wed, 28 Sep 2022 15:39:48 +, Seymour J Metz wrote:

>Did you set executable in the permissions?
>
>
How does one do that for a program object in a PDSE, the OP's requirement?

There is a case where /bin/ld will create a file set executable in the 
permissions,
but lacking the executable magic number.  Then exec(), per POSIX requirement,
treats it as a shell script with surprising results.

--
gil

--
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: Minor disaster

[Ituriel do Neto]

I don't know if it is a valid contribution since I don't
remember how to do it anymore, but in the past I have recovered deleted members 
with DITTO.


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em quarta-feira, 28 de setembro de 2022 13:42:04 BRT, Michael Babcock 
 escreveu: 





Do you have an HSM backup of the PDSE?  Or a volume backup?  Otherwise I
don’t know.  BTW, I always have prompting turned on so that if I
accidentally hit D, I get a prompt verifying I really want to delete it.

On Wed, Sep 28, 2022 at 7:02 AM Lennie Dymoke-Bradshaw <
032fff1be9b4-dmarc-requ...@listserv.ua.edu> wrote:

> Aaargghhh!
>
> I just pressed "D" next to a PDSe member I was editing, instead of "S".
>
> I have generations set up for this PDSe, but I cannot see how to get to the
> member I just accidentally deleted.
>
> Is there a way to recover the member?
>
>
>
>
>
> Lennie Dymoke-Bradshaw
>
>   https://rsclweb.com
>
>
> 'Dance like no one is watching. Encrypt like everyone is.'
>
>
>
>
>
>
>
>
>
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
-- 
Michael Babcock
OneMain Financial
z/OS Systems Programmer, Lead


--
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: zOS 1.13 (really) how copy MVS loadmod from ZFS to PDSE

[Paul Gilmartin]

On Wed, 28 Sep 2022 16:42:42 +, Seymour J Metz wrote:

>Aha! The text for -X didn't specify, but text further down made it clare that 
>Unix to PDSE is valid. The only remaining question is what PDS(E)->Unix does 
>with execute permission.
>
>And, no, I don't know whether the option was valid in 1.13.


On Tue, 27 Sep 2022 13:30:12 -0700, Nightwatch RenBand wrote:
>...
>This shouldn't be this hard, really
>
He's right, y'know.

Do you expect DSFS will make it better, or worse?

--  
gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Minor disaster

[Allan Staller]

Classification: Confidential

Agreed. I haven't actually tried it. Almost everything else in the PDS command 
has worked.

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Seymour J Metz
Sent: Wednesday, September 28, 2022 10:37 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Minor disaster

[CAUTION: This Email is from outside the Organization. Unless you trust the 
sender, Don't click links or open attachments as it may be a Phishing email, 
which can steal your Information and compromise your Computer.]

In general PDS and StarrTool can recovery a deleted member of a PDS, but not a 
deleted load module. PDSE is another matter.


--
Shmuel (Seymour J.) Metz
https://apc01.safelinks.protection.outlook.com/?url=http%3A%2F%2Fmason.gmu.edu%2F~smetz3&data=05%7C01%7Callan.staller%40HCL.COM%7Cbe798c72be8449e2f87108daa1675dcf%7C189de737c93a4f5a8b686f4ca9941912%7C0%7C0%7C637999762579086339%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&sdata=N3CadwL0Sa9n%2FV0H1WA6Z5e7Xc8s9wYKS%2Bs5EVVlCck%3D&reserved=0


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Allan Staller [0387911dea17-dmarc-requ...@listserv.ua.edu]
Sent: Wednesday, September 28, 2022 10:48 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Minor disaster

Classification: Confidential

The PDS command from the CBTTAPE should be able to recover this member. Or the 
commercial version from Serena.

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Lennie Dymoke-Bradshaw
Sent: Wednesday, September 28, 2022 7:01 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Minor disaster

[CAUTION: This Email is from outside the Organization. Unless you trust the 
sender, Don't click links or open attachments as it may be a Phishing email, 
which can steal your Information and compromise your Computer.]

Aaargghhh!

I just pressed "D" next to a PDSe member I was editing, instead of "S".

I have generations set up for this PDSe, but I cannot see how to get to the 
member I just accidentally deleted.

Is there a way to recover the member?





Lennie Dymoke-Bradshaw

 

 
https://apc01.safelinks.protection.outlook.com/?url=https%3A%2F%2Frsclweb.com%2F&data=05%7C01%7Callan.staller%40HCL.COM%7Cbe798c72be8449e2f87108daa1675dcf%7C189de737c93a4f5a8b686f4ca9941912%7C0%7C0%7C637999762579086339%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&sdata=sI3T%2BjVt7vPPp%2BQMxcOAA896qRfJ95J4DZHRi0ijqsI%3D&reserved=0


'Dance like no one is watching. Encrypt like everyone is.'












--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN
::DISCLAIMER::

The contents of this e-mail and any attachment(s) are confidential and intended 
for the named recipient(s) only. E-mail transmission is not guaranteed to be 
secure or error-free as information could be intercepted, corrupted, lost, 
destroyed, arrive late or incomplete, or may contain viruses in transmission. 
The e mail and its contents (with or without referred errors) shall therefore 
not attach any liability on the originator or HCL or its affiliates. Views or 
opinions, if any, presented in this email are solely those of the author and 
may not necessarily reflect the views or opinions of HCL or its affiliates. Any 
form of reproduction, dissemination, copying, disclosure, modification, 
distribution and / or publication of this message without the prior written 
consent of authorized representative of HCL is strictly prohibited. If you have 
received this email in error please delete it and notify the sender 
immediately. Before opening any email and/or attachments, please check them for 
viruses and other defects.


--
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

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with 

Re: Minor disaster

[Tony Harminc]

On Wed, 28 Sept 2022 at 08:14, Lionel B. Dyck  wrote:

> If these are PDSE's with generations then the question is what release of
> z/OS are you running?  If 2.4 then the ISPF delete member selections will
> delete all generations along with the base member. If 2.3 or earlier then
> only the base (generation 0) member is deleted and the generations will
> remain - just not accessible.
>
> If you are z/OS 2.3, or earlier, then you can use PDSEGEN (CBTTape file
> 969)
> to see those 'ghost' generations and easily recover them.
>
> If you are z/OS 2.4 or 2.5 then hope you have HSM backups or some other
> backup system.
>

So, um, what are PDSE generations *for* if not this kind of thing? I've
never used them, but just assumed recovering from such finger trouble was
the purpose. Is there some "production" use case for them?

Tony H.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

wc3270. cipher attls

[Jake Anderson]

Hello

Cross posted

Does anyone know the default cipher option supported by wc3270 TELNET
connectivity to mainframe?

Jake

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: z/OSMF PSWI

[Michael Babcock]

Okay, more issues.  As I stated, we use a permanent maintenance
volume/system.  With ServerPac, we could define an SSA and have the SYSRES
datasets cataloged in our maintenance systems master cat then ServerPac
would allocate the dataset using an SSA. later it would generate jobs to
remove the SSA.

Unless I’m missing something, this doesn’t seem possible with z/OSMF
because the Modify Catalog section doesn’t let us change the master cat
(even though it says it will).   The only way I see around that is to
rename the SYSRES dataset with the SSA.  Of course we would then need to
create our own rename job to remove the SSA.   Jeez, COME ON PEOPLE!

We were told z/OSMF would provide the same functionality as ServerPac but I
guess not.

On Wed, Sep 21, 2022 at 3:28 PM Michael Babcock 
wrote:

> We are installing z/OS 2.5 via z/OSMF and are using the Modify Deployment
> screens.  We can easily change the volumes, HLQs, etc, but wanted to modify
> the Primary and/or secondary allocation and don’t see a way to do that.
>
> We have a case opened with IBM and have been told there is no way to do
> that and no plans for it in the future.   What?We could do that with
> the ServerPac, why not with z/OSMF?   I was under the impression that
> z/OSMF would provide most functions that ServerPac provided.
>
> So, is that capability not going to be provided?
>
>
> --
> Michael Babcock
> OneMain Financial
> z/OS Systems Programmer, Lead
>
-- 
Michael Babcock
OneMain Financial
z/OS Systems Programmer, Lead

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Assembler courses

[Peter Sylvester]

Hi,

At least since 50 years it is understood that structured programming does'nt 
mean goto less.

D. Knuth's response to Dijkstra explains other things:

    All the examples are about 15 lines. Knuth shows different versions of the 
same algo.

    As long as you have 15 lines, you can find understandable code without "respecting" the purist 
"structured programming" dogma.


Interesting btw is the problem of "off by one" counters etc. control flow is 
not all.

It is shown that break, leave, repeat etc. are not sufficient (especially without 
"labels" )

do a nesting of for and switch/case and somewhere down a break... oops.


Now:

I (vaguely) remember an article talking about 'totally unstructured programs"

to explain:  an IF statement can be seen as a function of three (function) variables, the test and 
the two branches, this can also represented as the standard flowchart etc


While is similar with two parameters, the test, and the body.

Now take some funny (small) spaghetti flowchart with let's say three test and four actions connected 
in some way that cannot be expressed *easily* with the purist if/while etc.


what such operators can be useful, An unfamous is the python "else" on a for. It seems to that 
python tries to find simple to understand feature litle with conttextmanagers, For example not 
requiring to say close of a file that is opened in a with,


There is IMO another small example that consist of replacing    " a ; if (b) then c else d" by "if 
(a; b) then c alse d" to get rid of some if cascades "... else a; if b " to "elseif (a,b) then"  or


instead of  a; while b do c; a endwile to while (a, b) do c endwhile.

there are channels in "go". Looking at it, well, may give you cancer :-)



The linux kernel example:  it is language parsing with backtracking. the 
example is a shotgun parser.

You may use "predicates' of C..A.R. Koster's (Kees) CDL. A predicate is a function returning true or 
false, when false, there are no side effects.


The point iagain is quantum entanglement at large distance? . If the "repairing" is far down in the 
code, you cannot see it, and maybe you forget to code it


(like in a big blok of code that starts with open and two pages later you need or have forgotten the 
close.


Why was PASCAL popular in the early 80s on IBM machines. C was very bad, Donald Knuth used it, the 
IBM compiler was good on MVS and VM, not dynamic libraries. And one could write ANSI83 code that was 
usable on other systems (did that for some CDC). Remember BITNET NJE routing tables ;-)


here a little unstructured program. Assume whatever necesarry length of p let's 
say length 1.

for a brute force, you might want to replace  ++ by some incr function that adjusts p, or tells 
"probably no halt after 1 or so.


For which arrays p does the program halts?

l0: y1 = 1;
    y2 = 2;
    y3 = 3;;

l1: y3++;
    if (p[y3]) goto l2;
    goto halt;

l2: y3++;
    if (p[y3]) goto l4;

l3: y2++;
    if (!p[y2]) goto l2 ;

    y1++;
    if (!p[y1]) goto l1 ;
    goto halt;

l4: y1++;
    if (p[y1]) goto l3;
    goto halt;

halt:

I did this in assembler, so we can continue on the original question now?

the problem is about 50 years old. Whoever is aware of it, please don't 
immediately reveal the source.

best

Peter













--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Minor disaster

[Lennie Dymoke-Bradshaw]

I have sympathy with your scepticism. 
You can recover previous generations. But deleting a member deletes all 
generations. 
I think IBM have missed a trick here. Would not have been beyond the wit of man 
to have an UNDELETE operation.
Lennie
-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Tony Harminc
Sent: 28 September 2022 18:13
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Minor disaster

On Wed, 28 Sept 2022 at 08:14, Lionel B. Dyck  wrote:

> If these are PDSE's with generations then the question is what release 
> of z/OS are you running?  If 2.4 then the ISPF delete member 
> selections will delete all generations along with the base member. If 
> 2.3 or earlier then only the base (generation 0) member is deleted and 
> the generations will remain - just not accessible.
>
> If you are z/OS 2.3, or earlier, then you can use PDSEGEN (CBTTape 
> file
> 969)
> to see those 'ghost' generations and easily recover them.
>
> If you are z/OS 2.4 or 2.5 then hope you have HSM backups or some 
> other backup system.
>

So, um, what are PDSE generations *for* if not this kind of thing? I've never 
used them, but just assumed recovering from such finger trouble was the 
purpose. Is there some "production" use case for them?

Tony H.

--
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: Minor disaster

[Paul Gilmartin]

On Wed, 28 Sep 2022 23:16:25 +0100, Lennie Dymoke-Bradshaw wrote:

>I have sympathy with your scepticism. 
>You can recover previous generations. But deleting a member deletes all 
>generations. 
>I think IBM have missed a trick here. Would not have been beyond the wit of 
>man to have an UNDELETE operation.
> 
Or even an orderly "Revert to earlier generation".

"Delete" should present a dialog: "How many generations" as a profile option.


>-Original Message-
>From: Tony Harminc
>Sent: 28 September 2022 18:13
>...
>So, um, what are PDSE generations *for* if not this kind of thing? I've never 
>used them, but just assumed recovering from such finger trouble was the 
>purpose. Is there some "production" use case for them?
>
A marketing ploy to sell unusable DASD?

-- 
gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Minor disaster

[Peter Van Dyke]

FYI, IBM File Manager provides the PDSE Workbench utility which supports
working directly with any member generation in a PDSE V2. For example, you
can browse/view previous member generations, compare member generations and
recover  a member from an earlier generation. This can all be done from a
member list display. If you try to delete the current member (generation =
0) a confirmation panel is displayed where you have the option to either
delete the current member and all its generations or delete the current
member and have the most recent generation become the current member.

Now wouldn't it be great to have that type of functionality available with
the ISPF enhanced member list 😉

Peter Van Dyke
ex ISPF development team

On Thu, 29 Sept 2022 at 06:57, Paul Gilmartin <
042bfe9c879d-dmarc-requ...@listserv.ua.edu> wrote:

> On Wed, 28 Sep 2022 23:16:25 +0100, Lennie Dymoke-Bradshaw wrote:
>
> >I have sympathy with your scepticism.
> >You can recover previous generations. But deleting a member deletes all
> generations.
> >I think IBM have missed a trick here. Would not have been beyond the wit
> of man to have an UNDELETE operation.
> >
> Or even an orderly "Revert to earlier generation".
>
> "Delete" should present a dialog: "How many generations" as a profile
> option.
>
>
> >-Original Message-
> >From: Tony Harminc
> >Sent: 28 September 2022 18:13
> >...
> >So, um, what are PDSE generations *for* if not this kind of thing? I've
> never used them, but just assumed recovering from such finger trouble was
> the purpose. Is there some "production" use case for them?
> >
> A marketing ploy to sell unusable DASD?
>
> --
> gil
>
> --
> 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: Minor disaster

[Brian Westerman]

I use PDSEGEN on z/OS 2.5 all the time and have no problem recovering old 
versions.

Brian

On Wed, 28 Sep 2022 07:14:17 -0500, Lionel B. Dyck  wrote:

>If these are PDSE's with generations then the question is what release of
>z/OS are you running?  If 2.4 then the ISPF delete member selections will
>delete all generations along with the base member. If 2.3 or earlier then
>only the base (generation 0) member is deleted and the generations will
>remain - just not accessible.
>
>If you are z/OS 2.3, or earlier, then you can use PDSEGEN (CBTTape file 969)
>to see those 'ghost' generations and easily recover them.
>
>If you are z/OS 2.4 or 2.5 then hope you have HSM backups or some other
>backup system.
>
>
>Lionel B. Dyck <><
>Website: https://www.lbdsoftware.com
>Github: https://github.com/lbdyck
>
>�Worry more about your character than your reputation. Character is what you
>are, reputation merely what others think you are.��� - - - John Wooden
>
>-Original Message-
>From: IBM Mainframe Discussion List  On Behalf Of
>Lennie Dymoke-Bradshaw
>Sent: Wednesday, September 28, 2022 7:01 AM
>To: IBM-MAIN@LISTSERV.UA.EDU
>Subject: Minor disaster
>
>Aaargghhh!
>
>I just pressed "D" next to a PDSe member I was editing, instead of "S".
>
>I have generations set up for this PDSe, but I cannot see how to get to the
>member I just accidentally deleted.
>
>Is there a way to recover the member?
>
> 
>
>
>
>Lennie Dymoke-Bradshaw
>
>  https://rsclweb.com 
>
>
>'Dance like no one is watching. Encrypt like everyone is.'
>
> 
>
> 
>
> 
>
> 
>
> 
>
>
>--
>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

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Minor disaster

[Brian Westerman]

Wait, I missed the part where it was completely deleted.  Sorry about that.  I 
thought it was just overwritten.

Brian

On Thu, 29 Sep 2022 00:18:45 -0500, Brian Westerman 
 wrote:

>I use PDSEGEN on z/OS 2.5 all the time and have no problem recovering old 
>versions.
>
>Brian
>
>On Wed, 28 Sep 2022 07:14:17 -0500, Lionel B. Dyck  wrote:
>
>>If these are PDSE's with generations then the question is what release of
>>z/OS are you running?  If 2.4 then the ISPF delete member selections will
>>delete all generations along with the base member. If 2.3 or earlier then
>>only the base (generation 0) member is deleted and the generations will
>>remain - just not accessible.
>>
>>If you are z/OS 2.3, or earlier, then you can use PDSEGEN (CBTTape file 969)
>>to see those 'ghost' generations and easily recover them.
>>
>>If you are z/OS 2.4 or 2.5 then hope you have HSM backups or some other
>>backup system.
>>
>>
>>Lionel B. Dyck <><
>>Website: https://www.lbdsoftware.com
>>Github: https://github.com/lbdyck
>>
>>�Worry more about your character than your reputation. Character is what you
>>are, reputation merely what others think you are.��� - - - John Wooden
>>
>>-Original Message-
>>From: IBM Mainframe Discussion List  On Behalf Of
>>Lennie Dymoke-Bradshaw
>>Sent: Wednesday, September 28, 2022 7:01 AM
>>To: IBM-MAIN@LISTSERV.UA.EDU
>>Subject: Minor disaster
>>
>>Aaargghhh!
>>
>>I just pressed "D" next to a PDSe member I was editing, instead of "S".
>>
>>I have generations set up for this PDSe, but I cannot see how to get to the
>>member I just accidentally deleted.
>>
>>Is there a way to recover the member?
>>
>> 
>>
>>
>>
>>Lennie Dymoke-Bradshaw
>>
>>  https://rsclweb.com 
>>
>>
>>'Dance like no one is watching. Encrypt like everyone is.'
>>
>> 
>>
>> 
>>
>> 
>>
>> 
>>
>> 
>>
>>
>>--
>>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
>
>--
>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: Using DFSORT over DCOLLECT to get dataset extent number

[Jack Zukt]

Thank you Kolusu,

I am going to try it,

Best Regards,
Jack

On Wed, 28 Sept 2022 at 14:20, Sri h Kolusu  wrote:

> >> I am using OUTREC IFTHEN=(WHEN=( I have been reading the DFSORT
> Application Programming Guide but I have not been finding what I need. As
> far as I can tell, as soon as one of the IFTHEN=(WHEN is met, all the
> others are ignored. So, how do I test different positions on a INREC/OUTREC
> statement?
>
> Jack,
>
> You need to use HIT=NEXT which Specifies that IFTHEN processing should
> continue even if the logical expression is true. By default (if HIT=NEXT is
> not specified), IFTHEN processing stops if the logical expression is true.
>
> Thanks,
> Kolusu
> DFSORT Development
> IBM Corporation
>
>
> --
> 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