Re: [EXTERNAL] HCD question

[Dyck, Lionel B. (RavenTek)]

Why not just export your IODF files from your production system and import them 
onto the rescue system volume?

Or import/connect the catalog on the rescue system to your live system and use 
a different hlq (e.g. SYSR.) for those data sets?

Just two thoughts - hope this helps.

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Tony Thigpen
Sent: Monday, January 14, 2019 6:16 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] HCD question

We have a 3-pack rescue system that was built by a person long-gone. On the 
3-pack system, there are several IODF files. I need to update the current IODF 
file.

But, the IODF files on the rescue packs are not cataloged to the production 
z/OS. When I use the HCD panels, it does not appear that there is a way to 
specify the volume where the file is located, so HCD always says the file can 
not be found.

Is there a way to specify the volume, along with the name, when using the 
panel? Or, a command to start the panels using the uncataloged IODF file?

--
Tony Thigpen

--
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: [EXTERNAL] Re: Display active EDT ?

[Dyck, Lionel B. (RavenTek)]

Thank you all - D IOS,CONFIG is perfect - just couldn't remember it (must be 
getting older)

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners



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

Display active EDT ?

[Dyck, Lionel B. (RavenTek)]

Is there a command to display the active EDT?

Thanks
--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners



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

Re: IBM Mapping macro for ISPF statistics in PDS Directory entries?

[Dyck, Lionel B. (RavenTek)]

Found it here:  SYS1.SISPMACS(ISPDSTAT)

.*$MAC(ISPDSTAT) COMP(04021): ISPF Directory Entry mapping macro
.*
.* DESCRIPTIVE-NAME = ISPF Directory Entry mapping macro

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Allan Staller
Sent: Monday, December 31, 2018 7:50 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: IBM Mapping macro for ISPF statistics in PDS Directory 
entries?

Which Macro?

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Steve Smith
Sent: Saturday, December 29, 2018 9:05 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: IBM Mapping macro for ISPF statistics in PDS Directory entries?

I found this macro in the ISPF maclib.  It's not convenient for me to look for 
it now, but it should be easy to find.

btw, this question was asked before... in 2004.

sas

On Fri, Dec 28, 2018 at 7:35 PM Ed Jaffe 
wrote:

> On 12/28/2018 2:40 PM, David Cole wrote:
> >
> > I'm looking for an IBM written mapping macro for the ISPF statistics 
> > found in PDS directory entries. I've searched high and low, but I'm 
> > not having much luck.
>
> We had the same issue and ended up constructing our own.
>
> We never would have done so if an IBM macro existed...

--
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: [EXTERNAL] Thanks For All the Fish

[Dyck, Lionel B. (RavenTek)]

You will be MISSED.

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of John Eells
Sent: Wednesday, December 12, 2018 7:41 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Thanks For All the Fish

Friday, 14 December 2018, will be my last day at IBM.  For the curious, I 
started on a Wednesday, 1 June 1977, so it will be 41 years, 6 months since I 
started as a CE in the local Poughkeepsie branch office.

It's time to shed the daily stress, devote more time to my hobbies (diving, 
amateur radio, metalworking, cycling), and find a place in the County that can 
use an active volunteer for however many hours I feel like working (if any).

I won't be able to get notes on my IBM e-mail address after about noon Friday.  
I also won't get phone messages after that time at my work phone number, 
because they arrive as e-mail attachments.

Hanging out here has been quite instructive and usually fun (smile), so: 
Thanks, folks.

All the best, everyone.

--
John Eells
IBM Poughkeepsie
ee...@us.ibm.com (for a couple more days)

--
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: [EXTERNAL] Examples of roll your own "LIKE()" for data sets?

[Dyck, Lionel B. (RavenTek)]

Kirk - here is a routine from PDSEGEN that will do some of what you want

Do_Model: Expose pdsedsn zdsngen null zcmd 
   'dsinfo dataset('pdsedsn')'
   if words(zcmd) = 2 then mdsn = word(zcmd,2)
  else mdsn   = pdsedsn
   newgen = zdsngen
   munit  = left(zdsspc,1)
   dsnt   = left(zdsdsnt,1)
   'Control Display Save'
   'Addpop'
   do forever
  zcmd   = null
  'Display Panel(pdsegmdl)'
  xrc = rc
  if xrc > 0 then leave
  if sysdsn(mdsn) /= 'OK' then leave
  zerrsm = 'Error...'
  zerrlm = mdsn 'already exists - try a different dsn.'
  'setmsg msg(isrz002)'
  end
   'RemPop'
   'Control Display Restore'
   if xrc > 0 then do
 zerrsm = 'Cancelled'
 zerrlm = 'Model request has been cancelled.'
 'setmsg msg(isrz002)'
 return
 end
  zdsrf = strip(left(zdsrf,1)' 'substr(zdsrf,2,1)' 'substr(zdsrf,3,1))
  library = null
  if dsnt = 'P' then
library = 'Dsntype(PDS) dsorg(po) dir('zdsdira')'
  if (dsnt = 'L' & newgen = 0) then
library = 'Dsntype(Library,2) dsorg(po) dir(1)'
  if (dsnt = 'L' & newgen > 0) then
library = 'Dsntype(Library,2) dsorg(po) dir(1) maxgens('newgen')'
  if zdsvol = null then vol = null
   else vol = 'Vol('zdsvol')'
  space = null
  if munit = 'B' then space = 'Block('zdsblk')'
  if munit = 'T' then space = 'Tracks'
  if munit = 'C' then space = 'Cylinders'
  Address TSO ,
  'Alloc ds('mdsn') new spa('zds1ex','zds2ex')' vol ,
  'Recfm('zdsrf') Lrecl('zdslrec') Blksize('zdsblk')' ,
  library space
if rc = 0 then do
   zerrsm = 'Allocated'
   zerrlm = mdsn 'allocated with Space('zds1ex','zds2ex')' ,
'Recfm('zdsrf') Lrecl('zdslrec') Blksize('zdsblk')' ,
vol library space
topdse = mdsn
end
else do
 zerrsm = 'Error'
 zerrlm = 'Allocation failure for' mdsn
 end
'setmsg msg(isrz002)'
return

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners

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

Re: [EXTERNAL] Re: VTAM Question

[Dyck, Lionel B. (RavenTek)]

I ran a test on the application that I was concerned with, once I found a time 
when no one was online, and it does default to MSG10 so I'm good to go.

Thank you all

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Attila Fogarasi
Sent: Wednesday, November 21, 2018 5:26 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: VTAM Question

It results in SNA sense code 088A0003 (resource not available) and how that is 
handled depends upon the terminal type and definition.  If you are asking about 
Telnet (TN3270/E) terminals then that in turn depends on the Telnet 
configuration such as AUTOLOGON.  Most likely no MSG10 but it may be something 
that you can control for Telnet (lots of options and there are also some user 
exits in play).  Not easy to determine without digging deep and could well be 
different by terminal.  Plus VTAM has options for searching the network to find 
an active APPL elsewhere (which you may or may not have on).

On Thu, Nov 22, 2018 at 6:38 AM Dyck, Lionel B. (RavenTek) < 
01d7f21a6167-dmarc-requ...@listserv.ua.edu> wrote:

> I'm researching options for a DR exercise and we found our main 
> session manager product requires that the license codes be updated 
> before it will work. Gets us in a catch-22 in that if you don't plan 
> the DR then you don't have the DR license keys and thus when we IPL the 
> session manager will fail.
>
> My question is - what happens when a user connects and VTAM is defined 
> to connect that user to the session manager?
>
>
>   1.  Will the user see MSG10
>   2.  Or will the user be presented with a message that their 
> application is unavailable? (from a security perspective this is what 
> I would expect)
>
> Thank you
>
> --
> 
> Lionel B. Dyck (Contractor)  <
> Mainframe Systems Programmer - RavenTek Solution Partners
>
>
>
> --
> 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: [EXTERNAL] Re: Checksum or hashing

[Dyck, Lionel B. (RavenTek)]

Here is more information on the CBTTape.Org file 900 which may provide more 
information for the OP and others:

//***FILE 900 is a set of programs which run under either old MVS   
//*   or z/OS to calculate MD5 checksums.  Please see the   
//*   member called @FILEMD5, which contains descriptions   
//*   of all the MD5**  pds members found in this file. 
//* 
//*   support:  sbgo...@cbttape.org  or 
//* sbgo...@att.net 
//* 
//*   SHA-1 and SHA-2 support added, May 2016.  
//* 
//*   SHA-384 and SHA-512 support added, Aug 2016.  
//* 
//*   Fixed for 8-character TSO prefixes in z/OS 2.3.   
//* 
//*  SHA1SUM  - Assembler source for SHA-1 generating command   
//*   (Fix. DS1LSTAR is always 0 for a PDSE,
//*so always read the dataset even if   
//*DS1LSTAR is 0.)  
//* 
//*  SHA2SUM  - Assembler source for SHA-2 generating command   
//*   (Fix. DS1LSTAR is always 0 for a PDSE,
//*so always read the dataset even if   
//*DS1LSTAR is 0.)  
//* 
//*  SHA3SUM  - Assembler source for SHA-384 generating command 
//*   (Fix. DS1LSTAR is always 0 for a PDSE,
//*so always read the dataset even if   
//*DS1LSTAR is 0.)  
//* 
//*  SHA5SUM  - Assembler source for SHA-512 generating command 
//*   (Fix. DS1LSTAR is always 0 for a PDSE,
//*so always read the dataset even if   
//*DS1LSTAR is 0.)  
//* 
//*  MD5  - Assembler source for MD5 subprogram, which  
//* is a modification of the MD5 program for
//* REXX.  This must be linked with the MD5SUM  
//* TSO command.
//* 
//*  MD5A - Assembler source for same MD5 subprogram,   
//* with inline macros changed for IFOX00   
//* assembler.  Intended for MVS370 systems.
//* 
//*  MD5R - Assembler source for same MD5 subprogram,   
//* with 8 STCM instructions replaced with 2
//* STRV.  STRV is comparatively new, from circa
//* 2002.  STRV is like ST but the bytes are
//* stored in reverse order, as in hex 12345678 
//* being stored as hex 78563412. The MVS 3.8   
//* assembler IFOX00 does not support the STRV  
//* op code.
//* 
//*  MD5COB$  - JCL to compile and run an Enterprise Cobol  
//* program that calls the MD5 subroutine.  
//* 
//*  MD5DATA  - JCL to create test data for MD5SUM, the same
//* test data used in MD5REXX   
//* 
//*  MD5FORT$ - JCL to compile and run a Fortran G program  
//* that calls the MD5 subroutine.  
//* 
//*  MD5PLI$  - JCL to compile and run an Enterprise PL/I   
//* program that calls the MD5 subroutine.  
//* 
//*  MD5REXX  - A copy of the source code for the MD5 for   
//* REXX by Leland Lucius, which was the base   
//* from which member MD5 was created.  
//* 
//*  MD5SUM   - assembler source for the 31-bit MD5SUM TSO  
//* command.  It calls the MD5 subprogram.  
//*   (Fix. DS1LSTAR is always 0 

VTAM Question

[Dyck, Lionel B. (RavenTek)]

I'm researching options for a DR exercise and we found our main session manager 
product requires that the license codes be updated before it will work. Gets us 
in a catch-22 in that if you don't plan the DR then you don't have the DR 
license keys and thus when we IPL the session manager will fail.

My question is - what happens when a user connects and VTAM is defined to 
connect that user to the session manager?


  1.  Will the user see MSG10
  2.  Or will the user be presented with a message that their application is 
unavailable? (from a security perspective this is what I would expect)

Thank you

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners



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

Re: [EXTERNAL] Re: Checksum or hashing

[Dyck, Lionel B. (RavenTek)]

I didn't see the original posting but if you're looking for tools to do a 
checksum on a z/OS data set check out file 900 on the CBTTAPE.ORG site:

From the file:

//***FILE 900 is a set of programs which run under either old MVS
//*   or z/OS to calculate MD5 checksums.  Please see the
//*   member called @FILEMD5, which contains descriptions
//*   of all the MD5**  pds members found in this file.  
//*  
//*   support:  sbgo...@cbttape.org  or  
//* sbgo...@att.net  
//*  
//*   SHA-1 and SHA-2 support added, May 2016.   
//*  
//*   SHA-384 and SHA-512 support added, Aug 2016.   


--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners


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

Re: [EXTERNAL] Re: Co-posted: Rexx performance measures

[Dyck, Lionel B. (RavenTek)]

So it's working (aka broken) as coded and the only way to get it fixed is to 
open an RFE, take 2 aspirins, and then take a bottle of sleeping pills - then 
by the time you wake up you'll have completely forgotten about the issue and 
moved on and IBM still won't have fixed it.

If they agree it's broken then they should take an APAR at the very least.

What is wrong with this picture ☹

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of ITschak Mugzach
Sent: Monday, November 12, 2018 2:37 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: Co-posted: Rexx performance measures

an update about syssrc & syscpu under systemrexx:
I opened a PMR. IBM agrees it does not work. However, they supplied a long 
explanation how it works under TSO/E, why it doesn't work under SystemRexx, and 
a workaround based on Rexx STORAGE function. If I want the issue to be fixed, I 
need to open a requirement for this.

ITschak

On Mon, Sep 17, 2018 at 3:54 PM Tom Marchant < 
000a2a8c2020-dmarc-requ...@listserv.ua.edu> wrote:

> On Sat, 15 Sep 2018 15:29:48 +0800, David Crayford wrote:
>
> >On 14/09/2018 9:21 PM, Tom Marchant wrote:
> >>
> >> What model is that? How severely is it kneecapped?
> >>
> >
> >We're pretty heavily kneecapped but I would still expect better 
> >performance than a emulated machine
> >
> >Processor Information from MXI. We run 3 LPARs
> >
> >CPU Model2965   CPU Type Code00
> >Physical CPUs4  Processor Name   Z10#T03
> >Total MIPS   375.52 SU/Second4553.21
> >MIPS/CPU 93.88  CPU Adjustment   3514
> >MSU  66
>
> This doesn't tell what model it is. What does D M=CPU show?
>
> 4 CPUs and 66 MSU for a z13s suggests that it is a 2965-F04.
> If you look at the LSPR data at
>
> https://www-01.ibm.com/servers/resourcelink/lib03060.nsf/pages/lsprITR
> zOSv2r2?OpenDocument#z13s you can see that a full speed z13s 
> (2965-Z04) is 622 MSU, not quite 10 times as fast as an F04.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


--
ITschak Mugzach
*|** IronSphere Platform* *|* *Information Security Contiguous Monitoring for 
Legacy **|  *

--
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: [EXTERNAL] Re: ZZSA question

[Dyck, Lionel B. (RavenTek)]

I've tested ZZSA under Hercules - Thanks to Sam Golob's fine work - but I 
didn't see how to define a console as an HMC integretated console (hmcs) ?

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners




-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Tom Brennan
Sent: Friday, October 05, 2018 10:14 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: ZZSA question

Oh... you mean HMC console.  New answer:  I did not try that, but prior to 
going to that site I had never user ZZSA before so I tested it under Hercules, 
and that simulates the HMC console I believe, so I'd bet the answer is yes.

On 10/5/2018 8:07 AM, Tom Brennan wrote:
> I used (well mostly watched) ZZSA work via ICC with no problems.  That 
> was a couple of years ago on a new z13s with OSA 5S cards.
> 
> On 10/5/2018 4:58 AM, Dyck, Lionel B. (RavenTek) wrote:
>> Does anyone know if the ZZSA tool (stand alone utilities) on the 
>> CBTTape can use the HMC Integrated Console?
>>
>> -
>> -
>>
>> Lionel B. Dyck (Contractor)  <
>> Mainframe Systems Programmer - RavenTek Solution Partners
>>
>>
>>
>> -
>> - 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

ZZSA question

[Dyck, Lionel B. (RavenTek)]

Does anyone know if the ZZSA tool (stand alone utilities) on the CBTTape can 
use the HMC Integrated Console?

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners



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

Re: [EXTERNAL] Re: Problem with XMITIP, TXT attachment and ZVM / NJE

[Dyck, Lionel B. (RavenTek)]

My understanding is that this is an NJE issue.  The user is using XMITIP to 
generate an e-mail in SMTP format, placing the data in the JES Spool routed to 
z/VM where the SMTP server is that then sends the e-mail somewhere.  I suspect 
it has something to do with record size limitations on the NJE data.  XMITIP 
will let the user know if the data exceeds the SMTP LRECL limit already.

I suspect they are JES2 but could be using JES3 - in either case does anyone 
know of any LRECL restrictions on data flowing across NJE as that would help 
the OP.

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Paul Gilmartin
Sent: Friday, September 21, 2018 8:31 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: Problem with XMITIP, TXT attachment and ZVM / NJE

On Fri, 21 Sep 2018 04:00:45 -0500, Jean-Loup PIETIN wrote:

>Hi
>
>i use FORMAT TXT/filename.TXT
>
>if i use FORMAT XMIT/filename.TXT, the content is converted in binary and is 
>not in good format when i open the attachment...
> 
Is this an ASCII-EBCDIC problem?  Shouldn't be since both z/OS and z/VM are 
EBCDIC.

-- 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: [EXTERNAL] Re: Report volumes with IPLText

[Dyck, Lionel B. (RavenTek)]

Logic does not work for this site ☹

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Richards, Robert B.
Sent: Monday, September 10, 2018 6:40 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [EXTERNAL] Re: Report volumes with IPLText

Most shops I have "stopped by at" used a variation  of RES*, IODF*, CAT*, SAE* 
and SAD*.

A lot of SYSRES "00 or 01" volumes too (where SYSRES is your four character 
convention for same).

Bob 


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Dyck, Lionel B. (RavenTek)
Sent: Monday, September 10, 2018 7:07 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [EXTERNAL] Re: Report volumes with IPLText

Good one 

No - we are taking responsibility for a sister data center and the individuals 
who knew where things were have retired without adequate doc. I'm looking to 
find which volumes have ipltext - we know of the ones in active use - just 
curious about others - looking for sad and possible stand alone edit.

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Beverly Caldwell
Sent: Friday, September 07, 2018 2:16 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: Report volumes with IPLText

Don't tell me. Your systems are so reliable you've forgotten where your IPL 
volumes are.!

On Fri, Sep 7, 2018 at 10:36 AM Dyck, Lionel B. (RavenTek) < 
01d7f21a6167-dmarc-requ...@listserv.ua.edu> wrote:

> Is there a utility that will display all mounted volumes that have IPL 
> Text installed?
>
> --
> 
> Lionel B. Dyck (Contractor)  <
> Mainframe Systems Programmer - RavenTek Solution Partners
>
>
>
> --
> 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

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

Re: [EXTERNAL] Re: ISPF command for owner of DSN enqueue

[Dyck, Lionel B. (RavenTek)]

Take a look at CBT FILE 716:  QUERYENQ ISPF implementation from Jim Moore

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Lizette Koehler
Sent: Friday, September 07, 2018 2:34 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: ISPF command for owner of DSN enqueue

Then it is probably the WHOHAS command which is on the CBTTAPE.ORG

Lizette

> -Original Message-
> From: IBM Mainframe Discussion List  On 
> Behalf Of Tom Conley
> Sent: Friday, September 07, 2018 12:08 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: ISPF command for owner of DSN enqueue
> 
> On 9/7/2018 10:59 AM, IBM user wrote:
> > We once had a product that would allow us to issue a shortcut 
> > command in a
> 3.4 ISPF DIRLIST.  The command would tell us who owned the dataset in 
> question.
> >
> > Does anyone know of an open source version of that function, that 
> > works in
> ISPF without any special RACF authorizations for the users, or that 
> does not involve using a D GRS console command?
> >
> > 
> > -- For IBM-MAIN subscribe / signoff / archive access instructions, 
> > send email to lists...@listserv.ua.edu with the message: INFO 
> > IBM-MAIN
> >
> 
> ISRDDN (DDLIST) ENQ command, or TASID ENQ.  Doesn't work from 3.4, but 
> you could whip up a REXX with the ISPF QUERYENQ service.
> 
> Regards,
> Tom Conley
> 
> --
> 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: [EXTERNAL] Re: Report volumes with IPLText

[Dyck, Lionel B. (RavenTek)]

Good one 

No - we are taking responsibility for a sister data center and the individuals 
who knew where things were have retired without adequate doc. I'm looking to 
find which volumes have ipltext - we know of the ones in active use - just 
curious about others - looking for sad and possible stand alone edit.

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Beverly Caldwell
Sent: Friday, September 07, 2018 2:16 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: Report volumes with IPLText

Don't tell me. Your systems are so reliable you've forgotten where your IPL 
volumes are.!

On Fri, Sep 7, 2018 at 10:36 AM Dyck, Lionel B. (RavenTek) < 
01d7f21a6167-dmarc-requ...@listserv.ua.edu> wrote:

> Is there a utility that will display all mounted volumes that have IPL 
> Text installed?
>
> --
> 
> Lionel B. Dyck (Contractor)  <
> Mainframe Systems Programmer - RavenTek Solution Partners
>
>
>
> --
> 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

Report volumes with IPLText

[Dyck, Lionel B. (RavenTek)]

Is there a utility that will display all mounted volumes that have IPL Text 
installed?

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners



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

minizip ?

[Dyck, Lionel B. (RavenTek)]

Does anyone have an ISPF dialog or REXX front-end for the z/OS version of 
minizip (cbt file 865) ?

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners



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

Re: [EXTERNAL] RES: SHARE handouts

[Dyck, Lionel B. (RavenTek)]

I found the presentations from the last share here: 
https://events.share.org/Summer2018/Public/sessions.aspx

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Carlos Bodra - Pessoal
Sent: Friday, August 24, 2018 8:23 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] RES: SHARE handouts

I guess that SHARE allows download of presentations only for members or who 
participate of conference in target;

I support your opinion about make presentations available to everyone after 
conference has ended. 

Carlos Bodra
IBM System Certified System z
São Paulo - Brazil

-Mensagem original-
De: IBM Mainframe Discussion List  Em nome de R.S.
Enviada em: sexta-feira, 24 de agosto de 2018 06:45
Para: IBM-MAIN@LISTSERV.UA.EDU
Assunto: SHARE handouts

Is there any repository for SHARE conference materials?
Sometimes it's possible to download the PDF file and sometimes not.
I guess SHARE is not interested in sharing that outside the organisation (at 
least not just in time of conference), however many presentations are available.
What are the rules? What are the links for download? Are there any rules?

BTW: From copyright point of view, as far as I understand the presentation is 
owned by the author and usually author is willing to
*share* it...

--
Radoslaw Skorupka
Lodz, Poland




==

Jeśli nie jesteś adresatem tej wiadomości:

- powiadom nas o tym w mailu zwrotnym (dziękujemy!),
- usuń trwale tę wiadomość (i wszystkie kopie, które wydrukowałeś lub zapisałeś 
na dysku).
Wiadomość ta może zawierać chronione prawem informacje, które może wykorzystać 
tylko adresat.Przypominamy, że każdy, kto rozpowszechnia (kopiuje, rozprowadza) 
tę wiadomość lub podejmuje podobne działania, narusza prawo i może podlegać 
karze.

mBank S.A. z siedzibą w Warszawie, ul. Senatorska 18, 00-950 
Warszawa,www.mBank.pl, e-mail: kont...@mbank.pl. Sąd Rejonowy dla m. st. 
Warszawy XII Wydział Gospodarczy Krajowego Rejestru Sądowego, KRS 025237, 
NIP: 526-021-50-88. Kapitał zakładowy (opłacony w całości) według stanu na 
01.01.2018 r. wynosi 169.248.488 złotych.

If you are not the addressee of this message:

- let us know by replying to this e-mail (thank you!),
- delete this message permanently (including all the copies which you have 
printed out or saved).
This message may contain legally protected information, which may be used 
exclusively by the addressee.Please be reminded that anyone who disseminates 
(copies, distributes) this message or takes any similar action, violates the 
law and may be penalised.

mBank S.A. with its registered office in Warsaw, ul. Senatorska 18, 00-950 
Warszawa,www.mBank.pl, e-mail: kont...@mbank.pl. District Court for the Capital 
City of Warsaw, 12th Commercial Division of the National Court Register, KRS 
025237, NIP: 526-021-50-88. Fully paid-up share capital amounting to PLN 
169,248,488 as at 1 January 2018.

--
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: [EXTERNAL] Re: does anyone remember a program called BLKTAPE?

[Dyck, Lionel B. (RavenTek)]

What about using TAPEMAP from CBT file 299 to see the characteristics of the 
tape, then read it BLP and copy it into a disk file to clean up.

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Paul Gilmartin
Sent: Monday, August 20, 2018 8:40 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: does anyone remember a program called BLKTAPE?

On Mon, 20 Aug 2018 07:42:04 -0500, Dave Jones wrote:

>This will deblock a BLOCKTAP tape into its original format:
>PIPE tape | deblock vb | > tape outfile a if you have CMS Pipelines 
>available.
> 
Couldn't one then just FILEDEF ... RECFM VB and read it directly?

(How could one have CMS but not have Pipelines?  Really old OS?)

-- 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: [EXTERNAL] Re: JES2 Spool Data Set Browse (SDSB) sample

[Dyck, Lionel B. (RavenTek)]

If you have SDSF, or similar ISV product, then you should be able to 'extract' 
the JESJCLIN or JESJCL or any other spool file and process it.

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Chris Cantrell
Sent: Thursday, August 16, 2018 9:43 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: JES2 Spool Data Set Browse (SDSB) sample

I want to read the JCL for the job as it is running. I want to execute a 
program as the first step that reads the JCL of the actual job that it is being 
executed in.

--
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: [EXTERNAL] Zowe install woes

[Dyck, Lionel B. (RavenTek)]

Tried to look at it from the office and our firewall blocks it ☹

I did read up on it and my 1st impressions are that it is yet another attempt 
to create a new system management interface utilizing z/OSMF and provide the 
tools/parts for anyone to build them. Is this worthwhile - I'm not sure yet. 
Replacing a sub-second response interface using TN3270 with a multi-second web 
interface (based on experience using z/OSMF ISPF option) does not seem like a 
step in the right direction.

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of David Crayford
Sent: Thursday, August 16, 2018 6:27 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Zowe install woes

Lots of buzz about Zowe [1] at SHARE this week and first impressions are 
overwhelmingly positive. It looks like a great initiative to modernize the 
mainframe without tubby Eclipse. We downloaded the beta but it was missing 
parts, most importantly installation scripts so it's a bit of a anti-climax. 
Has anybody
managed to install Zowe successfully?

[1] https://zowe.org

--
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: Need help with ISPF Dialogue Manager and VGET

[Dyck, Lionel B. (RavenTek)]

To make it easy check out www.cbttape.org and FILE 803 - it is a collection of 
ISPF macros that I ran across in the last millennium that make it very easy to 
code ISPF dialogs in assembler.

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Joe Testa
Sent: Wednesday, August 01, 2018 1:50 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: Need help with ISPF Dialogue Manager and VGET

Yes, you need VDEFINEs to map the ISPF dialog variable names to storage 
locations in your Assembler program, so that VGET knows where to save the data 
it gets.

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Beverly Caldwell
Sent: Wednesday, August 1, 2018 2:43 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Need help with ISPF Dialogue Manager and VGET

Well, you are almost there, Paul. You seem to have the hang of this. What do 
you need, someone to write it for you?

On Mon, Jul 30, 2018 at 1:45 PM, esst...@juno.com  wrote:

> Hello,
> .
> I need some clarification on using the ISPF VGET Service in an 
> Assembler Program, the examples I've found were not much help.
> .
> .
> I have a CLIST which issues a VPUT for three Fields Name, City, STATE. 
> These variable are placed on the SHARED POOL.
> The CLIST then invokes an Assembler Program which should issue a VGET 
> for the three variables and write them to a VSAM dataset.
> .
> In the examples I found I never see the Variables for the VGET defined 
> in the program.
> .
> I suspect I need to first issue a VDEFINE, with a Name List, Variable 
> list, Format List and Length List  prior to issuing the VGET.
> .
> THE VGET SERVICE only identifies a name-list like NAME-LIST EQU *
>   DC  A(3)
>   DC  A(0)
>   DC  CL8'NAME '
>   DC  CL8'CITY '
>   DC  CL8'STATE'
> .
> Do I need to issue a VDEFINE first  for the Variables specified in the 
> VGET. Would someone please clarify 
> .
> .
> Paul
> .
> .
>
> --
> 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: [EXTERNAL] (OT) Good bye everyone

[Dyck, Lionel B. (RavenTek)]

Ed - praying you find a new path that is rewarding and enjoyable. Thank you for 
ALL your help over the years.

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Edward Gould
Sent: Monday, July 16, 2018 2:24 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] (OT) Good bye everyone

Approximately 2 months I had a life altering incident. 
I can no longer function as a sysprog. I resigned my no pay job at the place I 
used to donate my time.
I find I can no longer do the job.
I hope much success to all of you and hope that you can carry on with your 
work, despite IBM’s best efforts to do away with the profession.
Thanks, to John Ells and the many other IBMer’s who give their time and their 
experience with IBM-MAIN.
Not sure what is ahead for me, other than traveling with a companion as I can 
barely walk.
I am 70 years old and I am finding life without a technical challenge not 
interesting and since I can no longer function in that capacity I will have to 
find some other outlet.
Best wishes to you all.

Ed

--
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: Friday Strangeness ISRDDN ENQ ?

[Dyck, Lionel B. (RavenTek)]

That's great for those with SDSF (we don't have it)

I found an RFE requesting the enhancement to ISRDDN ENQ:

https://www.ibm.com/developerworks/rfe/execute?use_case=viewRfe_ID=27691

Please vote for it (I'm still assuming voting for RFE's, just like SHARE 
requirements, does have meaning)

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Jesse 1 Robinson
Sent: Friday, July 13, 2018 12:52 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: Friday Strangeness ISRDDN ENQ ?

SDSF issue. "ENQ * *" shows everything.

Format:  ENQ (major-name) (system-name)
major-name is the enqueue major name to process including  
* (any string of characters) or % (any single character).  
The default is SYSDSN. 
   
system-name is the MVS system name, up to 8 characters 
including * (any string of characters) or % (any single
character).  The default is the local system name. 

.
.
J.O.Skip Robinson
Southern California Edison Company
Electric Dragon Team Paddler 
SHARE MVS Program Co-Manager
323-715-0595 Mobile
626-543-6132 Office ⇐=== NEW
robin...@sce.com


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Richards, Robert B.
Sent: Friday, July 13, 2018 10:44 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: (External):Re: Friday Strangeness ISRDDN ENQ ?

Jim,

What about the SDSF's ENQ? SYSNAME * only shows the system I am logged onto

I tried changing to SYSNAME "lparx" and the display did not change?

Feel  free to not reply while I RTFM. :-)

Bob

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Jim Mulder
Sent: Friday, July 13, 2018 1:36 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Friday Strangeness ISRDDN ENQ ?

 This message suggests that ISRDDN is using GQSCAN with XSYS=NO  or ISGQUERY 
with  GATHERFROM=SYSTEM

 I don't know if there is any way to tell ISRDDN to use XSYS=YES or 
GATHERFROM=SYSPLEX. 

Jim Mulder z/OS Diagnosis, Design, Development, Test  IBM Corp. 
Poughkeepsie NY

> When I use the command TSO ISRDDN ENQ 'SYS1.PROCLIB' I get this message:
> 
> ISRDD020 This system is running with SETGRS MODE=STAR. ENQ information
will
> not be collected from othe

r systems. As a result, ENQ displays may not
> reflect all of the ENQs which are known to GRS.
> 
> Is there a way to enhance ISRDDN to get all the ENQ's?


--
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: Friday Strangeness ISRDDN ENQ ?

[Dyck, Lionel B. (RavenTek)]

Skip - exactly - one would expect using STAR mode would provide more info and 
ISRDDN ENQ should provide the info but somethings amiss here.

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Jesse 1 Robinson
Sent: Friday, July 13, 2018 11:48 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: Friday Strangeness ISRDDN ENQ ?

I never used the ENQ keyword before. Yup, I get the same behavior. No idea how 
to get around it. Moreover, I don't know why it behaves this way. In most 
respects, star mode is far superior to ring mode. Go figure. 

.
.
J.O.Skip Robinson
Southern California Edison Company
Electric Dragon Team Paddler 
SHARE MVS Program Co-Manager
323-715-0595 Mobile
626-543-6132 Office ⇐=== NEW
robin...@sce.com


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Dyck, Lionel B. (RavenTek)
Sent: Friday, July 13, 2018 8:46 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: (External):Friday Strangeness ISRDDN ENQ ?

When I use the command TSO ISRDDN ENQ 'SYS1.PROCLIB' I get this message:

ISRDD020 This system is running with SETGRS MODE=STAR. ENQ information will not 
be collected from other systems. As a result, ENQ displays may not reflect all 
of the ENQs which are known to GRS.

Is there a way to enhance ISRDDN to get all the ENQ's?

Thanks

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners

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

Friday Strangeness ISRDDN ENQ ?

[Dyck, Lionel B. (RavenTek)]

When I use the command TSO ISRDDN ENQ 'SYS1.PROCLIB' I get this message:

ISRDD020 This system is running with SETGRS MODE=STAR. ENQ information will
not be collected from other systems. As a result, ENQ displays may not
reflect all of the ENQs which are known to GRS.

Is there a way to enhance ISRDDN to get all the ENQ's?

Thanks

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners



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

Re: Seeking a tool to do a network security scan of z/OS

[Dyck, Lionel B. (RavenTek)]

There are various tools that do network scans looking for vulnerabilities on 
the systems being scanned and while we have them for windows, *nix platforms, 
there seem to be none (that we can find) that will test the security of the 
network interfaces on z/OS. That is what we are looking for.

thx

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Seymour J Metz
Sent: Thursday, July 12, 2018 11:35 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: Seeking a tool to do a network security scan of z/OS

Does your SMTP server not do authentication? That would certain get the 
auditors' attention.

Do your users respond to phish attempts? Another security problem, and one that 
has nothing to do with the mainframe.

I suppose it's to much to expect for users to look at the trace fields to 
determine the provenances of messages.


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


From: IBM Mainframe Discussion List  on behalf of 
ITschak Mugzach 
Sent: Wednesday, July 11, 2018 4:35 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: Seeking a tool to do a network security scan of z/OS

Do you mean outside of the mainframe? Not as a single package, but NMAP
will show you which ports are opened on the mainframe. If your mainframe
answers the scan, you already have a problem... Now assume that port 25 is
open and your mail server is configured an MTA. One can connect to the
server with HELLO call and send emails under fake name and domain as spam
to collect userids, passwords and other secrets.

It's a good idea to have an extra agent to IronSphere to do that -)

ITschak

On Wed, Jul 11, 2018 at 9:53 PM Dyck, Lionel B. (RavenTek) <
lionel.d...@va.gov> wrote:

> Is there a tool available that can do a network security scan of a z/OS
> system to identify network vulnerabilities?
>
> thanks
>
> --
> Lionel B. Dyck (Contractor)  <
> Mainframe Systems Programmer - RavenTek Solution Partners
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


--
ITschak Mugzach
*|** IronSphere Platform* *|* *Information Security Contiguous Monitoring
for Legacy **|  *

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

Seeking a tool to do a network security scan of z/OS

[Dyck, Lionel B. (RavenTek)]

Is there a tool available that can do a network security scan of a z/OS system 
to identify network vulnerabilities?

thanks

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners



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

Re: [EXTERNAL] Re: Deleting all members of a PDS

[Dyck, Lionel B. (RavenTek)]

I don't know if this has been suggested but using StarTools or the PDS (cbt 
file 182) command:

FIXPDS RESET

Will both delete all members and reset the PDS so it doesn't need to be 
compressed.

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Scott Barry
Sent: Wednesday, July 11, 2018 1:56 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: Deleting all members of a PDS

On Wed, 11 Jul 2018 10:43:42 -0700, Sri h Kolusu  wrote:

>>>but I'm curious if there's some additional keyword that will ignore the
>SHR enqueues. I have not found anything.
>
>Skip,
>
>You need to use FILE keyword on IDCAMS delete like shown below
>
>//DELALL   EXEC PGM=IDCAMS
>//SYSPRINT DD SYSOUT=*
>//PDS  DD DISP=SHR,DSN=Your.PDS
>//SYSINDD *
>  DELETE 'Your.PDS(*)' FILE(PDS)
>/*
>
>Thanks,
>Kolusu
>
>

With the use of "splat" and "delete all members" request, sadly the IDC0553I 
message doesn't provide a list of the members deleted, instead only mention 
"ALL MEMBERS IN DATA SET  DELETED".  

Now no Auditor-type would go for that -- heck, I even would appreciate knowing 
what I just deleted !!

Still like the enhanced functionality permitting various DSN-mask 
specifications, similar to TSO/ISPF DSLIST (option 3.4).

Scott Barry
SBBWorks, Inc.

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

Friday - off topic - human factors and TN3270

[Dyck, Lionel B. (RavenTek)]

For years I was used to the default TN3270 client having a black background and 
colors that seemed to glow at times. Then I found that I could adjust the 
colors and found that a grey (or is it gray) background worked better for my 
viewing experience and I adjusted the other colors accordingly and made them 
more muted where possible. Now I'm using Reflections and am using the Ice theme 
with some slight modifications and it works great. When I'm using Vista TN3270 
I have adjusted all the colors for a grey background as well.

With Reflections there are many other color themes and I'm sure other TN3270 
products also support them in varying ways of completeness.

Has anyone does any human factor studies on optimizing screen colors?

Thoughts/comments for a Friday

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners



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

Re: [EXTERNAL] Re: Connect:Direct and VOL=REF ?

[Dyck, Lionel B. (RavenTek)]

The use we need to to xfer a tape with multiple files on it (label=1,2,3,) 
and thus need the vol=ref.

The working syntax after a suggestion from ibm is VOL=(,RETAIN,REF=dsn)

And since we are using GDG's it must be VOL=(,RETAIN,REF='dsn')

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Steve Thompson
Sent: Tuesday, July 03, 2018 12:23 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [EXTERNAL] Re: Connect:Direct and VOL=REF ?

Wow, this doc is not formatted the way it used to be.

When one does a copy, one can send the data or one can pull the 
data. Let us assume that the system that starts the process is 
the one in control (Process control *AND* PNODE), and that one is 
going to copy *from* the PNODE to the SNODE (again, it can be 
done the other way).

Now, where the data set is going *TO* one can use REF=dsn, and 
this will force that data set being copied to the same VOLUME as 
the DSN specified by the REF=.

Why would one want to do this?

One may want or need to do this because one knows the name of a 
DSN on the client's system and by using that reference, one can 
put another file over there where the client has asked for it to be.

HTHs

Steve Thompson




On 07/02/2018 03:53 PM, Joe Monk wrote:
> I think it is saying that the system picks the volume from the referenced
> dsn, which must be cataloged (i.e. can't be a temp data set).
> 
> Joe
> 
> On Mon, Jul 2, 2018 at 3:49 PM, Paul Gilmartin <
> 000433f07816-dmarc-requ...@listserv.ua.edu> wrote:
> 
>> On Mon, 2 Jul 2018 15:07:07 -0400, Joe Monk wrote:
>>
>>> REF allows you to place a data set on the same volume as the referenced
>>> data set. It must be cataloged on the system where it is referenced.
>>>
>>> https://www.ibm.com/support/knowledgecenter/en/CD_PROC_LANG/com.ibm.help.
>> cdprocstmtsparams.doc/cdproc_stmt_zos_Process_Parameters.html
>>>
>> Not always, but good point:
>>  ([SER=(serial-no, [serial-no,...]) | ,REF=dsn])
>>  specifies the volume serial number(s) containing the file and
>> optional processing associated
>>  with the file. If VOL is not specified with the FROM parameter,
>> the file must be cataloged.
>>
>> (They're careless about distinction between "file" and "data set".)
>>
>> Is this trying to say that the default VOL for TO is the VOL specified on
>> FROM?
>>
>> Is it possible that Lionel is referring to a data set created in the same
>> COPY
>> command and COPY does not ALLOCATE/CATALOG that data set until the
>> command runs?
>>
>> But Lionel seems to indicate he's seeing a syntax error, not "Data set not
>> found".
>>
>> -- 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
> 

--
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: [EXTERNAL] Re: Formatting (was: JCL ERROR : IGD01022I)

[Dyck, Lionel B. (RavenTek)]

Agreed - the only thing that would be challenging is remembering that instead 
of executing the program at the top of the allocations that in REXX the 
allocations must come first.

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Charles Mills
Sent: Tuesday, July 03, 2018 9:51 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: Formatting (was: JCL ERROR : IGD01022I)

Making the wee joke. Ha ha.

Charles


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of Seymour J Metz
Sent: Tuesday, July 3, 2018 7:10 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Formatting (was: JCL ERROR : IGD01022I)

The Enya is perfectly  valid in ISO-1 and ISO-15. Would you rather he wrote
it as sennor?


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


From: IBM Mainframe Discussion List  on behalf of
Charles Mills 
Sent: Monday, July 2, 2018 6:24 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: Formatting (was: JCL ERROR : IGD01022I)

There you go using them dang Unicode characters again.

--
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: [EXTERNAL] Re: Connect:Direct and VOL=REF ?

[Dyck, Lionel B. (RavenTek)]

The quotes had to be around the GDG DSN in the VOL=(,RETAIN,REF='gdg.dsn(0)')

Go figure - hoping they take an apar on that as the syntax error message was 
totally worthless.

I also found a RESGDG keyword but could not find any explanation of what it 
does?

Another Question: Is there a way to serialize multiple COPY's within a PROCESS?

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Elardus Engelbrecht
Sent: Tuesday, July 03, 2018 7:24 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: Connect:Direct and VOL=REF ?

Dyck, Lionel B. wrote:

>The problem was the TO was a GDG and the dsn needed to be in quotes :-)

In quotes? It is not documented in the C:D manuals (at naming conventions and 
syntax diagram for VOL=) or I missed that somewhere. Where dsn (lowercase) is 
documented, no mentioning of quotes are stated.


Ok, I will remember that. Many thanks, Lionel. 

On to the next quest! ;-)

Groete / Greetings
Elardus Engelbrecht

--
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: Connect:Direct and VOL=REF ?

[Dyck, Lionel B. (RavenTek)]

The problem was the TO was a GDG and the dsn needed to be in quotes :-)

thx

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners


-Original Message-
From: Gibson, Jamie [mailto:jamie.gib...@toysrus.com] 
Sent: Tuesday, July 03, 2018 6:02 AM
To: Dyck, Lionel B. (RavenTek)
Subject: [EXTERNAL] RE: Connect:Direct and VOL=REF ?

Try
VOL=(,,,REF=dsn)



-Original Message-
From: Dyck, Lionel B. (RavenTek) [mailto:lionel.d...@va.gov]
Sent: Monday, July 02, 2018 10:01 AM
Subject: Connect:Direct and VOL=REF ?

After pouring thru the connect:direct pubs and finding that REF= is support, 
I've not been able to find the correct syntax to do a VOL=REF=dsn within a 
Connect:Direct Proc on the TO parameters.

Can anyone offer any suggestions/advice/direction?

The documented syntax is:

VOL = ( [PRIVATE],[RETAIN] ,[volume-sequence-no] ,[volume-count] ,[SER = 
(serial-no[,serial-no,...] ) ] ) | ( [SER = (serial-no, [serial-no,...] ) | REF 
= dsn])

We've tried:

Vol=ref=dsn
Vol=(ref=dsn)
Vol=ser=(ref=dsn)
=
This email message is for the sole use of the intended recipient(s) and may 
contain confidential and privileged information. Any unauthorized review, use, 
disclosure or distribution is prohibited. If you are not the intended 
recipient, please contact the sender by reply email and destroy all copies of 
the original message. To reply to our email administrator directly, send an 
email to emailad...@toysrus.com. Toys "R" Us, Inc.

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

Re: [EXTERNAL] Re: REXX as JCL replacement

[Dyck, Lionel B. (RavenTek)]

I like this up to a point - I would prefer to have an execution command and 
then be able to do if/then/else and another step, etc.

Or just use standard TSO allocation and program call syntax, perhaps simplified 
to be more JCL 'like'

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Hobart Spitz
Sent: Monday, July 02, 2018 1:37 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: REXX as JCL replacement

How about something like this?

Use REXX syntax and a JCL host command with JCL-like semantics:

/* REXX */

arg String /* From SUBMIT or start task command. */

"jcl job myjob: (acct),'john smith',class=t,msgclass=h,notify="userid()
"jcl exec pgm=myprog,parm="date("s")
"jcl sysprint: dd sysout=*"

"jcl sysin dd *"

"jcl data" String

...


The JCL host command could create the exact same control blocks as the
existing JCL statements today, but not begin execution.  When the REXX exec
exited, ENQs would be processed as now, followed by the current processing,
including step execution, and cleanup.  All exit/interfaces would be
preserved so that third-party software would still work unchanged.


OREXXMan
JCL is the buggy whip of 21st century computing.  Stabilize it.
Put Pipelines in the z/OS base.  Would you rather process data one
character at a time (Unix/C style), or one record at a time?
IBM has been looking for an HLL for program products; REXX is that language.

On Mon, Jul 2, 2018 at 2:26 PM, Paul Gilmartin <
000433f07816-dmarc-requ...@listserv.ua.edu> wrote:

> On Mon, 2 Jul 2018 11:10:31 -0700, Charles Mills wrote:
>
> >Oh my gosh, you would have to maintain JCL forever for that and a dozen
> other reasons.
> >
> >BUT! Conceivably ... conceivably ... you might stabilize it and do
> everything new in Rexx going forward.
> >
> If the replacement had a superset of JCL function, providing a
> JCL-to-replacement
> translation utility would allow discarding direct support for JCL.
>
> >-Original Message-
> >From: John Melcher, Jr
> >Sent: Monday, July 2, 2018 10:46 AM
> >
> >Once upon a time a LONG time ago this was a GUIDE  requirement.  It was
> >voted down due to the amount of automated systems that generated JCL.
> >You'd have to keep JCL, probably forever, because of those systems.
>
> -- 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

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

Re: [EXTERNAL] Re: Connect:Direct and VOL=REF ?

[Dyck, Lionel B. (RavenTek)]

I don't think I can accept an RFE on this one - the documentation clearly shows 
it should work :-)

That and we need it to work 

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Paul Gilmartin
Sent: Monday, July 02, 2018 1:22 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [EXTERNAL] Re: Connect:Direct and VOL=REF ?

On Mon, 2 Jul 2018 17:26:00 +0000, Dyck, Lionel B. (RavenTek) wrote:

>The use of VOL=SER=xx works but that is only useful for the 1st data set 
>being copied. I've tried variations of ,'s also without success.
>
>Time for a PMR :-)
> 
What if they tell you that has to be an RFE?  (I suppose that if there is a
documented function that simply doesn't work, PMR should be accepted.)

-- 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: [EXTERNAL] Re: Connect:Direct and VOL=REF ?

[Dyck, Lionel B. (RavenTek)]

JCL and Connect:Direct syntax, while similar are not the same :-)

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Steve Beaver
Sent: Monday, July 02, 2018 12:49 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [EXTERNAL] Re: Connect:Direct and VOL=REF ?

Suggestion

Code the parms on a DD statement and once you have that working 
transfer it to the CD COPY Statement

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Dyck, Lionel B. (RavenTek)
Sent: Monday, July 2, 2018 10:34 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [EXTERNAL] Re: Connect:Direct and VOL=REF ?

Using C:D 5.2 and yes I had tried that :-)

The 'error' message, if that is what you want to call it, claims invalid 
VOL=SER= usage.

Banging head against the wall removes the pain of trying to figure this out but 
that is only temporary.

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Elardus Engelbrecht
Sent: Monday, July 02, 2018 9:59 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: Connect:Direct and VOL=REF ?

Dyck, Lionel B. (RavenTek) wrote:

>After pouring thru the connect:direct pubs and finding that REF= is support, 
>I've not been able to find the correct syntax to do a VOL=REF=dsn within a 
>Connect:Direct Proc on the TO parameters.

>Can anyone offer any suggestions/advice/direction?

>The documented syntax is:

>VOL = ( [PRIVATE],[RETAIN] ,[volume-sequence-no]
>,[volume-count]
>,[SER = (serial-no[,serial-no,...] ) ] ) | ( [SER = (serial-no,
>[serial-no,...] ) | REF = dsn])

>We've tried:
>Vol=ref=dsn
>Vol=(ref=dsn)
>Vol=ser=(ref=dsn)

According to what you post and my copy of the C:D PDF doc I have, after a lot 
of trimming that looong and hard to read syntax diagram, 

... try Vol=(ref=dsn) , but you have done that???

If not working, what version of C:D do you have?
Do you see any error message(s)? 
Are you using C:D batch or online?

Groete / Greetings
Elardus Engelbrecht

--
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: [EXTERNAL] Re: Connect:Direct and VOL=REF ?

[Dyck, Lionel B. (RavenTek)]

The use of VOL=SER=xx works but that is only useful for the 1st data set 
being copied. I've tried variations of ,'s also without success.

Time for a PMR :-)

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Paul Gilmartin
Sent: Monday, July 02, 2018 12:20 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [EXTERNAL] Re: Connect:Direct and VOL=REF ?

On Mon, 2 Jul 2018 10:31:58 -0600, Roger Bolan wrote:

>The syntax you showed makes me think that preceding commas are required.
>
That's what it seems to say, but does it mean it?  Is this JCL, or an attempt to
replicate JCL syntax?

I can produce from this either:
VOL = ( ,  ,  , SER = ( serial-no[,serial-no,...] )  )
or:
VOL = ( REF = dsn )
(the parentheses are not indicated as optional.)

But the OP says he has tried the latter and failed.

RCF?  "Enny fool kin plainly see what it means." is not polished
documentation.

>> >The documented syntax is:
>>
>> >VOL = ( [PRIVATE],[RETAIN] ,[volume-sequence-no]
>> >,[volume-count]
>> >,[SER = (serial-no[,serial-no,...] ) ] ) | ( [SER = (serial-no,
>> >[serial-no,...] ) | REF = dsn])

(Once, when I coded some SMP/E control statements intended for customers,
I used blanks as token separators rather than commas.  A reviewer marked
me down for that; it wasn't documented.  I went to RCF, saying that a ","
should appear as "[,]" wherever the "," is optional.  IBM took the easy out
by adding a statement in the frontmatter of the Ref. that commas appeaing
in syntax diagrams are (usually?) optional.)

-- 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: [EXTERNAL] Re: Connect:Direct and VOL=REF ?

[Dyck, Lionel B. (RavenTek)]

Using C:D 5.2 and yes I had tried that :-)

The 'error' message, if that is what you want to call it, claims invalid 
VOL=SER= usage.

Banging head against the wall removes the pain of trying to figure this out but 
that is only temporary.

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Elardus Engelbrecht
Sent: Monday, July 02, 2018 9:59 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: Connect:Direct and VOL=REF ?

Dyck, Lionel B. (RavenTek) wrote:

>After pouring thru the connect:direct pubs and finding that REF= is support, 
>I've not been able to find the correct syntax to do a VOL=REF=dsn within a 
>Connect:Direct Proc on the TO parameters.

>Can anyone offer any suggestions/advice/direction?

>The documented syntax is:

>VOL = ( [PRIVATE],[RETAIN] ,[volume-sequence-no]
>,[volume-count]
>,[SER = (serial-no[,serial-no,...] ) ] ) | ( [SER = (serial-no,
>[serial-no,...] ) | REF = dsn])

>We've tried:
>Vol=ref=dsn
>Vol=(ref=dsn)
>Vol=ser=(ref=dsn)

According to what you post and my copy of the C:D PDF doc I have, after a lot 
of trimming that looong and hard to read syntax diagram, 

... try Vol=(ref=dsn) , but you have done that???

If not working, what version of C:D do you have?
Do you see any error message(s)? 
Are you using C:D batch or online?

Groete / Greetings
Elardus Engelbrecht

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

Connect:Direct and VOL=REF ?

[Dyck, Lionel B. (RavenTek)]

After pouring thru the connect:direct pubs and finding that REF= is support, 
I've not been able to find the correct syntax to do a VOL=REF=dsn within a 
Connect:Direct Proc on the TO parameters.

Can anyone offer any suggestions/advice/direction?

The documented syntax is:

VOL = ( [PRIVATE],[RETAIN] ,[volume-sequence-no]
,[volume-count]
,[SER = (serial-no[,serial-no,...] ) ] ) | ( [SER = (serial-no,
[serial-no,...] ) | REF = dsn])

We've tried:

Vol=ref=dsn
Vol=(ref=dsn)
Vol=ser=(ref=dsn)

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners


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

Re: [EXTERNAL] Re: ICEGENER to the rescue again?

[Dyck, Lionel B. (RavenTek)]

I missed the discussion on issues with my DOALL exec - there may have been 
issues with the posting of it

You can download it from http://www.lbdsoftware.com/doall.txt

Hope that helps - let me know - I use this a lot when the PDS command (CBT File 
182) can't do something.

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Paul Gilmartin
Sent: Tuesday, June 26, 2018 1:04 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: ICEGENER to the rescue again?

On Tue, 26 Jun 2018 12:01:32 +0100, Sean Gleann wrote:

>Wayne - yes, I'd be very interested, please.
>
>I've been plugging away at Lionel Dyck's suggestion of a REXX calling a
>REXX, so far with a notable lack of success (I keep getting a RC(-3), so
>I*think* I'm doing something wrong with the environment)
> 
RC(-3) can indicate either unknown addressing environment or command
unknown in the active environment.

What does SAY ADDRESS() tell you?

How are you invoking Rexx?

-- 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: [EXTERNAL] AW: ICEGENER to the rescue again?

[Dyck, Lionel B. (RavenTek)]

Another approach is to run an exec that uses listd to get all the members and 
then invoke ispf edit with a macro for each member - that macro could then do a 
REN,UNNUM, and then SAVE and END, which will clear out columns 73-80.

Here is my exec that will invoke an edit macro on all members of a PDS with a 
sample edit macro after that will do what you want:

/* -  rexx procedure  -- *
  * Name:  DoAll  *
  *   *
  * Function:  This rexx exec will process the specified  *
  *ispf edit macro against every member of the*
  *specified partitioned dataset. *
  *   *
  *Only standard system services are used. The*
  *LISTD TSO command with the MEMBERS keyword *
  *is used to extract the member names.   *
  *   *
  * Syntax:%DoAll dsname edit-macro   *
  *   *
  * Sample Edit Macro to change SYS1 to SYS2  *
  *  * rexx exec chsys1t2 (change sys1 to sys2) * *
  *  (the / was removed from the above line to avoid syntax   *
  *   errors in this exec).   *
  *  Address ISREDIT  *
  *  "MACRO"  *
  *  "CHANGE 'DSN=SYS1.' 'DSN=SYS2.' ALL" *
  *  "SAVE"   *
  *  "END"*
 *   *
 * Sample Execution:  %Doall 'sys2.testjcl' chsys1t2 *
 *   *
 * Author:Lionel B. Dyck *
 *Internet: lbd...@gmail.com *
 *   *
 * History:   11/30/90 - created *
 *   *
 * - */

arg dsn exec

if left(dsn,1) <> "'" then do
   dsn = sysvar(syspref)"."dsn
   end
   else do
dsn = substr(dsn,2,length(dsn)-2)
end

x = outtrap("lm.","*")

"LISTD" "'"dsn"'" "MEMBERS"

  x = outtrap("off")

  do i = 1 to lm.0
 if lm.i = "--MEMBERS--" then leave
 end

  domem:  do j = i+1 to lm.0
  parse value lm.j with mem extra
  Address ISPEXEC "EDIT DATASET('"dsn"("mem")')" ,
  "MACRO("exec")"
  end


/* REXX */
/* FIXNUM Edit Macro */
Address ISREdit
'Macro'
'REN'
'UNNUM'
'Save'
'End'

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Peter Hunkeler
Sent: Monday, June 25, 2018 6:13 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] AW: ICEGENER to the rescue again?

Please excuse the bad formatting. Trying Again.
 
Are you familiar with REXX? If so, here is how you could do this:

In a REXX:- LISTDS to get a list of the members in the PDS.- ALLOCATE an new 
PDS for the changed members.- FREE the output dsn.

- In a loop for each member: 

-- ALLOCATE the input dsn(member_nn)-- EXECIO to read the member into input 
stem.
-- FREE the input dsn

-- in a loop move each reccord from input to output stem, but only first 72 
positions
--- end of inner loop

-- ALLOCATE the output dsn(member_nn)
-- EXECIO to write the changed data back into the member.
-- FREE the output dsn
-- end of outer loop

 
Not the most efficient way, but if this is a one-time job, it probably doesn't 
matter. 
 
--
Peter Hunkeler 
 



--
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: [EXTERNAL] Re: Two new RFE's to consider supporting

[Dyck, Lionel B. (RavenTek)]

You nailed it - it is all in the application and not in the 3270 architecture 
itself.

It's just code - stringing together one's and zero's in the right sequence to 
cause the computer to do the right thing.

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Peter Hunkeler
Sent: Friday, June 22, 2018 9:57 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: AW: Re: [EXTERNAL] Re: Two new RFE's to consider supporting

> Does 3270 protocol require that PAS fields be writable, therefore tabbable? 
Bad design.  It's perfectly reasonable to want to specify a read-only PAS 
menu item.  (Too few bits in the attribute byte?) 


I'm no expert in the 3270 protocol, but I don't think PAS is described in the 
architecture. I'd rather think PAS is purely something a 3270 application has 
to implement: Read the cursor position returned, check if it lies within the 
"PAS field", and if so act accordingly.


--
Peter Hunkeler 
 



--
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: [EXTERNAL] Re: Two new RFE's to consider supporting

[Dyck, Lionel B. (RavenTek)]

Tom - that is my issue - when you enable tabbing to a PAS field then it is now 
possible to overtype them - that is what I would like to change - to make them 
protected but still allow tabbing to them.

Just trying to make some ISPF applications more 'modern' :-)

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Tom Marchant
Sent: Friday, June 22, 2018 7:48 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [EXTERNAL] Re: Two new RFE's to consider supporting

On Fri, 22 Jun 2018 12:00:29 +0000, Dyck, Lionel B. (RavenTek) wrote:

>Those fields in SDSF are probably PAS fields but you don't see that as the 
>panels are more than likely dynamic in nature (I don't run SDSF so I can't 
>check that).  

Similarly, the ISPF Primary Option Menu uses point-and-shoot, and has for 
years. Put your cursor on, for example, "Settings" and press enter, and you 
will be taken to the Settings panel. If you enable "Tab to point-and-shoot 
fields", you can tab to those fields and press enter. However, you can now 
overtype those fields.

-- 
Tom Marchant

--
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: [EXTERNAL] Re: Two new RFE's to consider supporting

[Dyck, Lionel B. (RavenTek)]

Those fields in SDSF are probably PAS fields but you don't see that as the 
panels are more than likely dynamic in nature (I don't run SDSF so I can't 
check that).  I'm looking at ISPF dialogs where I want to allow PAS fields 
where the user can either TAB or mouse and then click to activate the action. I 
also, in some cases, want the value in the field to be based on a variable. 
When that happens the field must be defined as TYPE(OUTPUT) and for some reason 
a TYPE(OUTPUT) field allows the user to overtype it even if the entered text is 
ignored. That is what I want protected.

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Tom Marchant
Sent: Friday, June 22, 2018 6:51 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: Two new RFE's to consider supporting

On Thu, 21 Jun 2018 20:32:54 -0500, Paul Gilmartin wrote:

>On Thu, 21 Jun 2018 18:13:21 -0400, Phil Smith III wrote:
> 
>>Correct. You cannot tab to a protected field. And I suspect that a request
>>for an update to the 3270 protocol is not likely to be fulfilled at this
>>point.
>>
>Reading the RFE, it appears that the submitter does not want to be able to
>tab to a PAS field; rather he wants to be able to define a PAS field that
>will be skipped by tab.

There is no need that a point-and-shoot field be one that you can tab to. See, 
for example, the changes in SDSF to make the jobname be a point-and-shoot 
field, likewise the DD name after issuing ?, or pointing and shooting on 
jobname.

-- 
Tom Marchant

--
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: [EXTERNAL] Re: Two new RFE's to consider supporting

[Dyck, Lionel B. (RavenTek)]

If you can tab to a PAS field then you don't need the mouse, but using a PAS 
allows those who want to use the mouse to do so.

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of David Crayford
Sent: Friday, June 22, 2018 6:28 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: Two new RFE's to consider supporting

On 22/06/2018 9:32 AM, Paul Gilmartin wrote:
> On Thu, 21 Jun 2018 18:13:21 -0400, Phil Smith III wrote:
>   
>> Steve Smith wrote:
>>
>>> Isn't #1 impossible?  From what I've retained (or think I have) of 3270
>>> programming, a "tab" is merely the start of an unprotected field.
>> Catch-22.
>>
>> Correct. You cannot tab to a protected field. And I suspect that a request
>> for an update to the 3270 protocol is not likely to be fulfilled at this
>> point.
>>
> I believe many emulators nowadays interpret double-click as "shoot".  Or
> provide "shoot" as a pop-up selection.

But that requires using a mouse which is one of the the biggest 
productivity killers ever invented, especially for text UIs.

--
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: [EXTERNAL] Re: Two new RFE's to consider supporting

[Dyck, Lionel B. (RavenTek)]

Actually the desire is to tab to the PAS field but not allow the field to be 
over-typed.

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Paul Gilmartin
Sent: Thursday, June 21, 2018 8:33 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: Two new RFE's to consider supporting

On Thu, 21 Jun 2018 19:08:53 +0000, Dyck, Lionel B. (RavenTek) wrote:

>Please consider supporting these RFE's that I just submitted:
>
>ISPF Point and Shoot Protected Fields
>
>https://www.ibm.com/developerworks/rfe/execute?use_case=viewRfe_ID=121576


On Thu, 21 Jun 2018 18:13:21 -0400, Phil Smith III wrote:
 
>Steve Smith wrote:
>
>>Isn't #1 impossible?  From what I've retained (or think I have) of 3270
>>programming, a "tab" is merely the start of an unprotected field.
>Catch-22.
>
>Correct. You cannot tab to a protected field. And I suspect that a request
>for an update to the 3270 protocol is not likely to be fulfilled at this
>point.
>
Reading the RFE, it appears that the submitter does not want to be able to
tab to a PAS field; rather he wants to be able to define a PAS field that
will be skipped by tab.

Does 3270 protocol require that PAS fields be writable, therefore tabbable?
Bad design.  It's perfectly reasonable to want to specify a read-only PAS
menu item.  (Too few bits in the attribute byte?)

I believe many emulators nowadays interpret double-click as "shoot".  Or
provide "shoot" as a pop-up selection.

Long ago, I tried to specify a single-cell PAS field.  The host application 
rejected
this, claiming that a light pen can not resolve a single cell.  Bad Lowest 
Common
Denominator design.  The application should support a possibly hi-res light pen
or other PAS device.

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

Two new RFE's to consider supporting

[Dyck, Lionel B. (RavenTek)]

Please consider supporting these RFE's that I just submitted:

ISPF Point and Shoot Protected Fields

https://www.ibm.com/developerworks/rfe/execute?use_case=viewRfe_ID=121576

And

Improve ISPF 3.17 by allowing CD on the command line

https://www.ibm.com/developerworks/rfe/execute?use_case=viewRfe_ID=121575


--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners


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

Re: [EXTERNAL] Re: z/OS 2.2 - how to order ?

[Dyck, Lionel B. (RavenTek)]

John - that is true BUT in this case 2.2 is the last release that will run on a 
z10 so one would hope that it would remain around and available a bit longer.

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of John Eells
Sent: Wednesday, June 20, 2018 11:24 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: z/OS 2.2 - how to order ?

Dyck, Lionel B. , RavenTek wrote:
> We are trying to order z/OS 2.2 but ShopZ won't let us as 2.2 is no longer 
> orderable. We have two z10's that will never run z/OS 2.3 and which are 
> currently z/OS 2.1 (don't ask).  We could use our current z/OS 2.2 system but 
> it has a number of usermods, and products, that are not needed for those 
> boxes so we would like to order a clean z/OS 2.2 set of media.
> 
> Any suggestions?
> 
> This is just another example of IBM removing something that should have left 
> alone - just like the z/OS 2.1 documentation that now seems semi-fixed.

Except for fairly short periods of overlap, we have *always* withdrawn 
the prior operating system release when we make the new release 
available, going back as far as I can recall.

-- 
John Eells
IBM Poughkeepsie
ee...@us.ibm.com

--
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: z/OS 2.2 - how to order ?

[Dyck, Lionel B. (RavenTek)]

Arg - That was it - EOM:

z/OS Version2.2.x
PID5650-zOS
License type ICA
Lifecycle dates, announcement letters and other information
GA30-Sep-2015, 215-267 
EOM 29-Jan-2018, 917-078   <=
Lifecycle policy Enhanced
Last updated: 17-Aug-2017.

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Ronald Kristel
Sent: Wednesday, June 20, 2018 11:20 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: z/OS 2.2 - how to order ?

Is z/OS 2.2 not End of Marketing since beginning this year? I believe something 
becomes unordable via ShopZ when something is EoM..

Best guess is contacting your IBM Representative?

https://www-01.ibm.com/software/support/lifecycleapp/PLCDetail.wss?q45=Z497063S01245B61

Ronald Kristel


From: IBM Mainframe Discussion List  on behalf of 
Dyck, Lionel B. (RavenTek) 
Sent: Wednesday, June 20, 2018 6:13:42 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: z/OS 2.2 - how to order ?

We are trying to order z/OS 2.2 but ShopZ won't let us as 2.2 is no longer 
orderable. We have two z10's that will never run z/OS 2.3 and which are 
currently z/OS 2.1 (don't ask).  We could use our current z/OS 2.2 system but 
it has a number of usermods, and products, that are not needed for those boxes 
so we would like to order a clean z/OS 2.2 set of media.

Any suggestions?

This is just another example of IBM removing something that should have left 
alone - just like the z/OS 2.1 documentation that now seems semi-fixed.

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners


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

z/OS 2.2 - how to order ?

[Dyck, Lionel B. (RavenTek)]

We are trying to order z/OS 2.2 but ShopZ won't let us as 2.2 is no longer 
orderable. We have two z10's that will never run z/OS 2.3 and which are 
currently z/OS 2.1 (don't ask).  We could use our current z/OS 2.2 system but 
it has a number of usermods, and products, that are not needed for those boxes 
so we would like to order a clean z/OS 2.2 set of media.

Any suggestions?

This is just another example of IBM removing something that should have left 
alone - just like the z/OS 2.1 documentation that now seems semi-fixed.

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners


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

Re: [EXTERNAL] AW: ISPF programming

[Dyck, Lionel B. (RavenTek)]

Agreed - better to let ISPF services do their own thing *but* if you need to do 
something like this at least you can. 

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Immo
Sent: Tuesday, June 19, 2018 9:43 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: AW: [EXTERNAL] AW: ISPF programming

Hi Lionel,

that sound like something everybody would rather avoid .

Thanks,
Immo

-Ursprüngliche Nachricht-
Von: IBM Mainframe Discussion List  Im Auftrag von 
Dyck, Lionel B. (RavenTek)
Gesendet: Dienstag, 19. Juni 2018 16:29
An: IBM-MAIN@LISTSERV.UA.EDU
Betreff: Re: [EXTERNAL] AW: ISPF programming

There is no way that I know of to capture the scrolling unless you make the 
scrolling a passthru and then your application would have to process it. That 
is doable - again just more code.

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Immo
Sent: Tuesday, June 19, 2018 9:26 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: AW: [EXTERNAL] AW: ISPF programming

Hi Lionel,

thanks for your reply. That's exactly what I'm doing. My problem is the 
disappearance of the short message 'block command incomplete' during scrolling. 
If sufficient table rows are already put into the table, my program won't 
receive control from ISPF during scrolling. So I cannot redisplay the message. 
Do you have any idea about this?

Greetings,
Immo

-Ursprüngliche Nachricht-
Von: IBM Mainframe Discussion List  Im Auftrag von 
Dyck, Lionel B. (RavenTek)
Gesendet: Dienstag, 19. Juni 2018 16:17
An: IBM-MAIN@LISTSERV.UA.EDU
Betreff: Re: [EXTERNAL] AW: ISPF programming

For your processing when you have a block command entered, that is a block 
command that your application must process. You must first determine the 1st 
row with the block command and then save that row as you scroll until you get 
to the 2nd occurrence of the block command. After the user enters 'DD' (for 
example) you can display a message if you don't find a 2nd 'DD'. It's just code 
- perhaps not easy - but map it out and you'll get it.

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Immo
Sent: Tuesday, June 19, 2018 9:06 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] AW: ISPF programming

Hi Elardus,
thanks for you fast response.

>Are you referring to 'ISPF Tables' or your own table?
I'm processing a table I've defined in a panel definition using a ')Model' 
section. The table includes a 2 byte command input field in every line that is 
mapped to a ZVAR. Does that answer your question?

>In what language? What ISPF utilities and macros are you using?
I'm using 370/390 assembler calling 'ISPLINK' in order to request ISPF 
functionality.

Groete / Greetings,
Immo

-Ursprüngliche Nachricht-
Von: IBM Mainframe Discussion List  Im Auftrag von 
Elardus Engelbrecht
Gesendet: Dienstag, 19. Juni 2018 15:41
An: IBM-MAIN@LISTSERV.UA.EDU
Betreff: Re: ISPF programming

Immo wrote:

>while programming a ISPF test program I would like to implement the use of 
>block commands such as 'CC..CC' or 'DD..DD' in the ISPF editor. In order to do 
>so I may need to display a message like 'block command incomplete' on various 
>panel displays until the user either cancels the request or completes the 
>incomplete block command.

Did you considered using an Edit Macro? Something like this?

ISREDIT MACRO
  ISREDIT blah blah 
ISREDIT END  

or the 'Dialog Services' in ISPF? 


>The problem I'm facing right now is the fact that ISPF won't return control to 
>my application program when the user scrolls through parts of the table 
>display where no new lines need to be provided by my application program.

Are you referring to 'ISPF Tables' or your own table?


>Does anybody know how to handle this or can I specify something e. g. in the 
>panel definition in order to receive control in my application program when 
>the user presses a scroll key without making any change to an input field of 
>my panel?

In what language? What ISPF utilities and macros are you using?

Groete / Greetings
Elardus Engelbrehct

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

--

Re: [EXTERNAL] AW: ISPF programming

[Dyck, Lionel B. (RavenTek)]

There is no way that I know of to capture the scrolling unless you make the 
scrolling a passthru and then your application would have to process it. That 
is doable - again just more code.

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Immo
Sent: Tuesday, June 19, 2018 9:26 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: AW: [EXTERNAL] AW: ISPF programming

Hi Lionel,

thanks for your reply. That's exactly what I'm doing. My problem is the 
disappearance of the short message 'block command incomplete' during scrolling. 
If sufficient table rows are already put into the table, my program won't 
receive control from ISPF during scrolling. So I cannot redisplay the message. 
Do you have any idea about this?

Greetings,
Immo

-Ursprüngliche Nachricht-
Von: IBM Mainframe Discussion List  Im Auftrag von 
Dyck, Lionel B. (RavenTek)
Gesendet: Dienstag, 19. Juni 2018 16:17
An: IBM-MAIN@LISTSERV.UA.EDU
Betreff: Re: [EXTERNAL] AW: ISPF programming

For your processing when you have a block command entered, that is a block 
command that your application must process. You must first determine the 1st 
row with the block command and then save that row as you scroll until you get 
to the 2nd occurrence of the block command. After the user enters 'DD' (for 
example) you can display a message if you don't find a 2nd 'DD'. It's just code 
- perhaps not easy - but map it out and you'll get it.

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Immo
Sent: Tuesday, June 19, 2018 9:06 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] AW: ISPF programming

Hi Elardus,
thanks for you fast response.

>Are you referring to 'ISPF Tables' or your own table?
I'm processing a table I've defined in a panel definition using a ')Model' 
section. The table includes a 2 byte command input field in every line that is 
mapped to a ZVAR. Does that answer your question?

>In what language? What ISPF utilities and macros are you using?
I'm using 370/390 assembler calling 'ISPLINK' in order to request ISPF 
functionality.

Groete / Greetings,
Immo

-Ursprüngliche Nachricht-
Von: IBM Mainframe Discussion List  Im Auftrag von 
Elardus Engelbrecht
Gesendet: Dienstag, 19. Juni 2018 15:41
An: IBM-MAIN@LISTSERV.UA.EDU
Betreff: Re: ISPF programming

Immo wrote:

>while programming a ISPF test program I would like to implement the use of 
>block commands such as 'CC..CC' or 'DD..DD' in the ISPF editor. In order to do 
>so I may need to display a message like 'block command incomplete' on various 
>panel displays until the user either cancels the request or completes the 
>incomplete block command.

Did you considered using an Edit Macro? Something like this?

ISREDIT MACRO
  ISREDIT blah blah 
ISREDIT END  

or the 'Dialog Services' in ISPF? 


>The problem I'm facing right now is the fact that ISPF won't return control to 
>my application program when the user scrolls through parts of the table 
>display where no new lines need to be provided by my application program.

Are you referring to 'ISPF Tables' or your own table?


>Does anybody know how to handle this or can I specify something e. g. in the 
>panel definition in order to receive control in my application program when 
>the user presses a scroll key without making any change to an input field of 
>my panel?

In what language? What ISPF utilities and macros are you using?

Groete / Greetings
Elardus Engelbrehct

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

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

Re: [EXTERNAL] AW: ISPF programming

[Dyck, Lionel B. (RavenTek)]

For your processing when you have a block command entered, that is a block 
command that your application must process. You must first determine the 1st 
row with the block command and then save that row as you scroll until you get 
to the 2nd occurrence of the block command. After the user enters 'DD' (for 
example) you can display a message if you don't find a 2nd 'DD'. It's just code 
- perhaps not easy - but map it out and you'll get it.

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Immo
Sent: Tuesday, June 19, 2018 9:06 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] AW: ISPF programming

Hi Elardus,
thanks for you fast response.

>Are you referring to 'ISPF Tables' or your own table?
I'm processing a table I've defined in a panel definition using a ')Model' 
section. The table includes a 2 byte command input field in every line that is 
mapped to a ZVAR. Does that answer your question?

>In what language? What ISPF utilities and macros are you using?
I'm using 370/390 assembler calling 'ISPLINK' in order to request ISPF 
functionality.

Groete / Greetings,
Immo

-Ursprüngliche Nachricht-
Von: IBM Mainframe Discussion List  Im Auftrag von 
Elardus Engelbrecht
Gesendet: Dienstag, 19. Juni 2018 15:41
An: IBM-MAIN@LISTSERV.UA.EDU
Betreff: Re: ISPF programming

Immo wrote:

>while programming a ISPF test program I would like to implement the use of 
>block commands such as 'CC..CC' or 'DD..DD' in the ISPF editor. In order to do 
>so I may need to display a message like 'block command incomplete' on various 
>panel displays until the user either cancels the request or completes the 
>incomplete block command.

Did you considered using an Edit Macro? Something like this?

ISREDIT MACRO
  ISREDIT blah blah 
ISREDIT END  

or the 'Dialog Services' in ISPF? 


>The problem I'm facing right now is the fact that ISPF won't return control to 
>my application program when the user scrolls through parts of the table 
>display where no new lines need to be provided by my application program.

Are you referring to 'ISPF Tables' or your own table?


>Does anybody know how to handle this or can I specify something e. g. in the 
>panel definition in order to receive control in my application program when 
>the user presses a scroll key without making any change to an input field of 
>my panel?

In what language? What ISPF utilities and macros are you using?

Groete / Greetings
Elardus Engelbrehct

--
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: [EXTERNAL] Re: [MVS-OE] Change in ls -la behavior from 2.2 to 2.3

[Dyck, Lionel B. (RavenTek)]

Thank you - good to know

I appreciate your reply

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners

-Original Message-
From: MVS OpenEdition [mailto:mvs...@vm.marist.edu] On Behalf Of Philippe 
Richard1
Sent: Monday, June 18, 2018 8:50 AM
To: mvs...@vm.marist.edu
Subject: [EXTERNAL] Re: [MVS-OE] Change in ls -la behavior from 2.2 to 2.3

Lionel,

it's not a z/OS 2.3 behavior change.
it came with z/OS 1.9, along with the sysplex hfs sharing support.
at that time, and in order to accomodate for that new function a number of 
directorieswere changed to become symbolic links, namely:

/etc
/var
/tmp
/dev

>From that point on, if you want to list the content of those directories, you 
>have to use ls -l /etc/ and not ls -l /etc  (as indicated in the migration 
>guide of z/OS 1.9)


Cordialement, Philippe
  

Philippe richard1/France/IBM@IBMFR (n'oubliez pas le 1...) IBM Client Center, 
Montpellier

mailto:philippe_rich...@fr.ibm.com   Mail: Cie IBM France Sce 146301
Phone: +33 4 6799580705 (38 0705)Rue de la Vieille Poste -CS 81021
Fax:   +33 4 67346477  34060 Montpellier Cedex  2 





From:   "Dyck, Lionel B. (RavenTek)" 
To: mvs...@vm.marist.edu
Date:   18/06/2018 15:34
Subject:Change in ls -la behavior from 2.2 to 2.3
Sent by:MVS OpenEdition 



With z/OS 2.2 the command:  ls -la /etc returns:

total 1644
drwxr-xr-x  16 MVSTCP   OMVSGRP 8192 Aug 10  2016 .
drwxr-xr-x  17 MVSTCP   OMVSGRP 8192 Oct 19  2017 ..
-rwxr-xr-x   1 MVSTCP   OMVSGRP24486 Mar 19  2009 CSDIBMEF
drwxr-xr-x   2 MVSTCP   OMVSGRP  256 Sep 25  2008 Printsrv
-rwx--   1 MVSTCP   OMVSGRP   85 Jul 28  2016 auto.master
drwxr-xr-x   2 MVSTCP   OMVSGRP  256 Sep 25  2008 bpa

But on z/OS 2.3 it returns this:

lrwxrwxrwx   1 OMVSKERN IPGROUP   12 Oct 29  2014 /etc -> $SYSNAME/etc

Why this change and did I just miss this in the upgrade documentation?

Thanks

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners Service Operations - 
Infrastructure Operations Office of Information and Technology, IT Operations 
and Services
Office: 512-326-6173


--
For MVS-OE subscribe / signoff / archive access instructions, send email to 
lists...@vm.marist.edu with the message: INFO MVS-OE





--
For MVS-OE subscribe / signoff / archive access instructions, send email to 
lists...@vm.marist.edu with the message: INFO MVS-OE

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

Change in ls -la behavior from 2.2 to 2.3

[Dyck, Lionel B. (RavenTek)]

With z/OS 2.2 the command:  ls -la /etc returns:

total 1644
drwxr-xr-x  16 MVSTCP   OMVSGRP 8192 Aug 10  2016 .
drwxr-xr-x  17 MVSTCP   OMVSGRP 8192 Oct 19  2017 ..
-rwxr-xr-x   1 MVSTCP   OMVSGRP24486 Mar 19  2009 CSDIBMEF
drwxr-xr-x   2 MVSTCP   OMVSGRP  256 Sep 25  2008 Printsrv
-rwx--   1 MVSTCP   OMVSGRP   85 Jul 28  2016 auto.master
drwxr-xr-x   2 MVSTCP   OMVSGRP  256 Sep 25  2008 bpa

But on z/OS 2.3 it returns this:

lrwxrwxrwx   1 OMVSKERN IPGROUP   12 Oct 29  2014 /etc -> $SYSNAME/etc

Why this change and did I just miss this in the upgrade documentation?

Thanks

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners
Service Operations - Infrastructure Operations
Office of Information and Technology, IT Operations and Services
Office: 512-326-6173


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

KC - once again

[Dyck, Lionel B. (RavenTek)]

Is IBM trying to reduce the usefulness of the KC?

I just searched for the z14 HMC doc with Google and the top link resulted in 
this message. Seems the content in the KC is being reduced. Is IBM trying to 
reduce their DASD footprint. Is AWS charging too much for it :)

Documentation for z14, HMC V2.14.0, and SE V2.14.0 is no longer available in 
the IBM Knowledge Center.

You can find information on the console help system, or on Resource Link.

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners


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

Re: [EXTERNAL] Re: OT: Rap music (was Re: opinion: multi-platform program design)

[Dyck, Lionel B. (RavenTek)]

That's the way it should be :-)

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Mike Schwab
Sent: Monday, June 11, 2018 12:16 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [EXTERNAL] Re: OT: Rap music (was Re: opinion: multi-platform 
program design)

https://www.youtube.com/watch?v=CiRMGYQfXrs
On Mon, Jun 11, 2018 at 7:23 AM Dyck, Lionel B. (RavenTek)
 wrote:
>
> Nothing beats rap in the original Klingon however... :-)
>
> --
> Lionel B. Dyck (Contractor)  <
> Mainframe Systems Programmer – RavenTek Solution Partners
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
> Behalf Of David Crayford
> Sent: Monday, June 11, 2018 7:18 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: [EXTERNAL] Re: OT: Rap music (was Re: opinion: multi-platform 
> program design)
>
> IMHO, Rammstein should only be listened to in German! They are one of
> the only German bands that have had mainstream commercial success in
> English speaking countries
> singing in their native tongue. 99 luftballons doesn't have the same
> impact! :)
>
>
> On 11/06/2018 6:15 PM, Ron hawkins wrote:
> > You're quoting the English version. I am quoting the translation from the 
> > original German.
> >
> > Liberally from Google:
> >   Du hast mich gefragt, und ich hab nichts gesagt!
> >   You asked me and I did not say anything!
> >
> > And from human:
> >   You have asked me and I have said nothing.
> >
> >
> > There are several differences between the English and German versions, but 
> > your version below seems to be a mix of the translation, and the English 
> > version. For example, the English version uses "hate" instead of "have" 
> > (hasst instead of hast).
> >
> > I don't speak German, but I love the song and remembered some of the 
> > translation.
> >
> > Ron
> >
> >
> > -Original Message-
> > From: IBM Mainframe Discussion List  On Behalf Of 
> > Savor, Thomas (Alpharetta)
> > Sent: Sunday, June 10, 2018 10:57 PM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Re: [IBM-MAIN] OT: Rap music (was Re: opinion: multi-platform 
> > program design)
> >
> > Weird, here is the English translation I have:
> > You
> > You have
> > You have me
> > You have me to say
> > You have me to say
> > And I did not obey
> >
> > Will you until death does sever
> > Be upright to her forever
> >
> > Never
> >
> > Will you 'til death be her rider
> > Her lover too, to stay inside her
> >
> > Never
> >
> > Thanks,
> >
> > Tom Savor
> >
> >
> > -Original Message-
> > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
> > Behalf Of Ron hawkins
> > Sent: Saturday, June 09, 2018 3:16 AM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Re: OT: Rap music (was Re: opinion: multi-platform program design)
> >
> > You have asked me and I have said nothing.
> >
> >  From Du Hast - Rammstein.
> >
> > -Original Message-
> > From: IBM Mainframe Discussion List  On Behalf Of 
> > David Crayford
> > Sent: Friday, June 8, 2018 11:13 PM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Re: [IBM-MAIN] OT: Rap music (was Re: opinion: multi-platform 
> > program design)
> >
> > On 9/06/2018 7:03 AM, Ron hawkins wrote:
> >> You have asked me and I have said nothing.
> > Are they lyrics from a Barnsey song?
> >
> >> -Original Message-
> >> From: IBM Mainframe Discussion List  On
> >> Behalf Of Savor, Thomas (Alpharetta)
> >> Sent: Thursday, June 7, 2018 9:50 PM
> >> To: IBM-MAIN@LISTSERV.UA.EDU
> >> Subject: Re: [IBM-MAIN] OT: Rap music (was Re: opinion: multi-platform
> >> program design)
> >>
> >> Rammstein
> >>
> >> Thanks,
> >>
> >> Tom Savor
> >>
> >>
> >> -Original Message-
> >> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
> >> On Behalf Of David Crayford
> >> Sent: Friday, June 08, 2018 12:12 AM
> >> To: IBM-MAIN@LISTSERV.UA.EDU
> >> Subject: Re: OT: Rap music (was Re: opinion: multi-platform program
> >

Re: [EXTERNAL] Re: PDSEGEN - 2 years old

[Dyck, Lionel B. (RavenTek)]

See these recent APAR closures to resolve the PDSE scroll max issue and one 
other:

APAR or PTF Updated Status  CC  Component   Abstract and comments
OA55431 6/7/18  CLOSED  PER ISPF Z/OS PDF AN ABEND 002-A8 OCCURS DOING A 
SCROLL MAX DOWN ON A PDSE MEMBER
OA54890 6/6/18  CLOSED  PER EXTENDED DATA S IEBPDSE DETECTED PDSE DIRECTORY 
CORRUPTION FOLLOWING AN ISPF IEBPDSE

I prefer to use member generations rather than a full blown source control 
system for my personal JCL, REXX, ISPF Panel, and a few other libraries. I keep 
up to 20 generations while working on updates and will then prune down to 1-3 
after things are looking solid and then prune down to 0 generations when I'm 
truly happy with the updates. Prune is a feature of PDSEGEN that deletes 
generations while leaving the requested number of generations alive.

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Steve Smith
Sent: Monday, June 11, 2018 9:00 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: PDSEGEN - 2 years old

That's it for me.  I like JCL and working source libraries to have 2-5
generations just so I can go back if the need arises (or I just
accidentally save when I didn't really want to).

As a side note, the other "improvements" with PDSE V2 seem to cause
problems when trying to scroll max down through large members.  This is
almost certainly a bug, and it may have been fixed already, or at least
will be.  But unless I need generations, I usually stick with V1.

sas

On Mon, Jun 11, 2018 at 9:48 AM, Jerry Callen  wrote:

> So, I'm curious: What are people actually USING member generations for?
>
> For source code, it seems like a decent source control system is a better
> bet. Are member generations primarily a form of "oops recovery?"
>
> -- Jerry
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>



-- 
sas

--
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: [EXTERNAL] Re: OT: Rap music (was Re: opinion: multi-platform program design)

[Dyck, Lionel B. (RavenTek)]

Nothing beats rap in the original Klingon however... :-)

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of David Crayford
Sent: Monday, June 11, 2018 7:18 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: OT: Rap music (was Re: opinion: multi-platform program 
design)

IMHO, Rammstein should only be listened to in German! They are one of 
the only German bands that have had mainstream commercial success in 
English speaking countries
singing in their native tongue. 99 luftballons doesn't have the same 
impact! :)


On 11/06/2018 6:15 PM, Ron hawkins wrote:
> You're quoting the English version. I am quoting the translation from the 
> original German.
>
> Liberally from Google:
>   Du hast mich gefragt, und ich hab nichts gesagt!
>   You asked me and I did not say anything!
>
> And from human:
>   You have asked me and I have said nothing.
>
>
> There are several differences between the English and German versions, but 
> your version below seems to be a mix of the translation, and the English 
> version. For example, the English version uses "hate" instead of "have" 
> (hasst instead of hast).
>
> I don't speak German, but I love the song and remembered some of the 
> translation.
>
> Ron
>
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf Of 
> Savor, Thomas (Alpharetta)
> Sent: Sunday, June 10, 2018 10:57 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: [IBM-MAIN] OT: Rap music (was Re: opinion: multi-platform 
> program design)
>
> Weird, here is the English translation I have:
> You
> You have
> You have me
> You have me to say
> You have me to say
> And I did not obey
>
> Will you until death does sever
> Be upright to her forever
>
> Never
>
> Will you 'til death be her rider
> Her lover too, to stay inside her
>
> Never
>
> Thanks,
>
> Tom Savor
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
> Behalf Of Ron hawkins
> Sent: Saturday, June 09, 2018 3:16 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: OT: Rap music (was Re: opinion: multi-platform program design)
>
> You have asked me and I have said nothing.
>
>  From Du Hast - Rammstein.
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf Of 
> David Crayford
> Sent: Friday, June 8, 2018 11:13 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: [IBM-MAIN] OT: Rap music (was Re: opinion: multi-platform 
> program design)
>
> On 9/06/2018 7:03 AM, Ron hawkins wrote:
>> You have asked me and I have said nothing.
> Are they lyrics from a Barnsey song?
>
>> -Original Message-
>> From: IBM Mainframe Discussion List  On
>> Behalf Of Savor, Thomas (Alpharetta)
>> Sent: Thursday, June 7, 2018 9:50 PM
>> To: IBM-MAIN@LISTSERV.UA.EDU
>> Subject: Re: [IBM-MAIN] OT: Rap music (was Re: opinion: multi-platform
>> program design)
>>
>> Rammstein
>>
>> Thanks,
>>
>> Tom Savor
>>
>>
>> -Original Message-
>> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
>> On Behalf Of David Crayford
>> Sent: Friday, June 08, 2018 12:12 AM
>> To: IBM-MAIN@LISTSERV.UA.EDU
>> Subject: Re: OT: Rap music (was Re: opinion: multi-platform program
>> design)
>>
>> On 8/06/2018 3:15 AM, Peter Hunkeler wrote:
>>> It's amost Friday, right. At least here in Zurich
 Rap music is performed by those that can not sing so others can not think.
>>> rap music? Isn't this a contradiction in terms ;-)
>> What do you listen to, Beethoven? Ramstein? :)
>>
>>
>>> Apologies to all the rappers out there, and the ones who like that 
>>> contradiction, ahem.. music. No offense intended.
>>>
>>>
>>> --
>>> Peter Hunkeler
>>>
>>>
>>>
>>> -
>>> - 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
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
> lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> 

Re: [EXTERNAL] AW: Re: Weird thought for ISPF enhancement

[Dyck, Lionel B. (RavenTek)]

I have a fairly simple ISPF dialog to work with the ZSTART variable.  Get it 
from www.lbdsoftware.com/zstart.zip or www.cbttape.org file 314.

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Peter Hunkeler
Sent: Thursday, June 07, 2018 2:20 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] AW: Re: Weird thought for ISPF enhancement

 
>If you like the benefits of many split screens then have a logon proc 
>(Clist/REXX) create the split screens automagically for you each logon. I have 
>8 session created behind the scenes.  




Have a look aht the ZSTART ISPF variable. It is there for just this reason. As 
usual with the ISPF guys, the forget to make it easy to use; there is no 
standard ISPF dialog to set it. Build your own or manipulate ZSTART via ISPF 
variable dialogue.


--
Peter Hunkeler



--
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: zFS V5: Good news.

[Dyck, Lionel B. (RavenTek)]

I found the answer - the command to display all zFS files and their version is:

zfsadm aggrinfo -long

Cheers

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Dyck, Lionel B. (RavenTek)
Sent: Tuesday, June 05, 2018 6:55 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: zFS V5: Good news.

This is good information.

Is there a command that will list the zFS version for all zFS data sets?

Thanks

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Vernooij, Kees (ITOPT1) - KLM
Sent: Tuesday, June 05, 2018 2:04 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] zFS V5: Good news.

Hello,

Some good news, benefits free for all.

After installing z/OS V2.2, we carefully converted some zFS-s from V4 to V5.
V5 should better tune the zFS traffic and give each system more autonomic 
access to the zFS, eliminating the need to route traffic through the 'owing' 
system.

Since we encountered no problems, we took the deep dive and added 
"converttov5=on" to IOEFSPRM with our last Sysplex IPL round.
The results were impressive:

-  A huge reduction in XCF traffic, in the IOEZFS Group by 99% and in 
the SYSGRS Group by 80%.

-  A substantial CPU reduction in the XCFAS and the GRS address space 
by a factor 2 - 3. This resulted in a noticeable reduction of the LPAR CPU 
consumption in some LPARs, mainly those LPARs that did not really use the 
zFS-s, but were designated as owner by ownership-automove because of IPLs of 
former owning LPARs.

As I said: it is free, grab it.

Kees.


For information, services and offers, please visit our web site: 
http://www.klm.com. This e-mail and any attachment may contain confidential and 
privileged material intended for the addressee only. If you are not the 
addressee, you are notified that no part of the e-mail or any attachment may be 
disclosed, copied or distributed, and that any other action related to this 
e-mail or attachment is strictly prohibited, and may be unlawful. If you have 
received this e-mail by error, please notify the sender immediately by return 
e-mail, and delete this message.

Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or its 
employees shall not be liable for the incorrect or incomplete transmission of 
this e-mail or any attachments, nor responsible for any delay in receipt.
Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal Dutch 
Airlines) is registered in Amstelveen, The Netherlands, with registered number 
33014286


--
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: zFS V5: Good news.

[Dyck, Lionel B. (RavenTek)]

This is good information.

Is there a command that will list the zFS version for all zFS data sets?

Thanks

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Vernooij, Kees (ITOPT1) - KLM
Sent: Tuesday, June 05, 2018 2:04 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] zFS V5: Good news.

Hello,

Some good news, benefits free for all.

After installing z/OS V2.2, we carefully converted some zFS-s from V4 to V5.
V5 should better tune the zFS traffic and give each system more autonomic 
access to the zFS, eliminating the need to route traffic through the 'owing' 
system.

Since we encountered no problems, we took the deep dive and added 
"converttov5=on" to IOEFSPRM with our last Sysplex IPL round.
The results were impressive:

-  A huge reduction in XCF traffic, in the IOEZFS Group by 99% and in 
the SYSGRS Group by 80%.

-  A substantial CPU reduction in the XCFAS and the GRS address space 
by a factor 2 - 3. This resulted in a noticeable reduction of the LPAR CPU 
consumption in some LPARs, mainly those LPARs that did not really use the 
zFS-s, but were designated as owner by ownership-automove because of IPLs of 
former owning LPARs.

As I said: it is free, grab it.

Kees.


For information, services and offers, please visit our web site: 
http://www.klm.com. This e-mail and any attachment may contain confidential and 
privileged material intended for the addressee only. If you are not the 
addressee, you are notified that no part of the e-mail or any attachment may be 
disclosed, copied or distributed, and that any other action related to this 
e-mail or attachment is strictly prohibited, and may be unlawful. If you have 
received this e-mail by error, please notify the sender immediately by return 
e-mail, and delete this message.

Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or its 
employees shall not be liable for the incorrect or incomplete transmission of 
this e-mail or any attachments, nor responsible for any delay in receipt.
Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal Dutch 
Airlines) is registered in Amstelveen, The Netherlands, with registered number 
33014286


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

Mantissa z86VM ?

[Dyck, Lionel B. (RavenTek)]

The last update I can find is in their blog from June 2015 - does anyone know 
what happened to this promising product to enable x86 software to run on Z?

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners


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

PDSEGEN - 2 years old

[Dyck, Lionel B. (RavenTek)]

I wanted to let y'all know that PDSEGEN turns 2 years old tomorrow - 5/26. That 
is the day that I created the very first alpha version of PDSEGEN using 
information from Thomas Reed's SHARE presentation on how to access PDSE V2 
Member Generations.

Since then it has grown thanks to the input, and assistance, from a number of 
individuals around the world.

Today, at version 5.4.2,  it consists of

1,452 lines of Assembler Code in 3 modules
9,233 lines of REXX Code in 13 modules
5,712 lines of ISPF Panel Code in 96 panels

Documentation in MS Word (DOCX), PDF, eBook (ePub and Mobi).

During the development of PDSEGEN numerous issues were found with PDSE V2 
Member Generation handling and over a dozen APARs were taken by IBM to address 
the issues that were found with PTFs being generated and released. Other 
vendors, such as CA, also accepted feedback on issues and provided PDSE V2 
Member Generation support.

It's been a fun 2 years and PDSEGEN is stable and usable. It isn't a commercial 
product, and it isn't the fastest product, but it has more features and 
functions than most will use and it does it very well.

Check it out at www.lbdsoftware.com, which always 
has the latest version) or www.cbttape.org in file 969 
(always check the http://cbttape.org/updates.htm page for the latest iteration).

For those unfamiliar with PDSEGEN here is a brief overview:

PDSEGEN is an ISPF dialog tool that makes it easy to use PDSE Version 2 Member 
Generations in a way that the native ISPF does not. It uses all standard system 
interfaces so it shouldn't require updates in the future (unless IBM changes 
the standard interfaces which is unlikely).

All of the member processing functions that the user expects with a PDS are 
provided along with many others that are specific to member generations, such 
as:


1.  Copy the base member and all generations between PDSE V2 libraries

2.  The ability to backup and restore a PDSE with all member generations

3.  Compare a generation to another generation

4.  Compare a generation to a base member

5.  Easily list all base members and generations

6.  Browse, view, copy, etc. any generation

7.  Edit is restricted to only base members (native ISPF, and other 
products, allow editing generations which I feel is a Bozo No-No)

8.  Copy a generation into a new base member

9.  8 different member table display options

10.  User customized panel colors

11.  19 line selection commands

12.  32 primary commands

13.  And more

And if you don't like the way it works the complete source is provided so that 
it can be updated, or customized, for your environment.

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners


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

Re: [EXTERNAL] Re: IP printing from JES2?

[Dyck, Lionel B. (RavenTek)]

See this

https://www.ibm.com/support/knowledgecenter/SSLTBW_2.3.0/com.ibm.zos.v2r3.aopu000/lpruse.htm

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Paul Gilmartin
Sent: Tuesday, May 22, 2018 8:52 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: IP printing from JES2?

On Tue, 22 May 2018 11:04:11 +0000, Dyck, Lionel B. (RavenTek) wrote:

>Take a look at the TSO LPR command 
> 
I used to know that command, but I don't find it in:
z/OS IBM  TSO/E Command Reference  Version 2 Release 3  SA32-0975-30

>I've an ispf dialog to simplify using it at http://lbdsoftware.com/print.zip

-- 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: [EXTERNAL] TSO notifications from batch job on different LPAR?

[Dyck, Lionel B. (RavenTek)]

I phrased the question incorrectly or at least it wasn't complete.

The batch job end notification does appear on the TSO LPAR but messages from 
Connect:Direct that run on the Batch LPAR to no show up on the TSO LPAR until 
the users signs back on or does a LISTBC>

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Sankaranarayanan, Vignesh
Sent: Tuesday, May 22, 2018 8:22 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [EXTERNAL] TSO notifications from batch job on different LPAR?

/*ROUTE XEQ  a batch job with a step to do a SEND command... ?

- Vignesh
Mainframe Infrastructure

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Dyck, Lionel B. (RavenTek)
Sent: 22 May 2018 14:07
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] TSO notifications from batch job on different LPAR?

Is there a way to enable TSO notifications from batch jobs that run on a 
different LPAR in the plex?

Thank you

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners


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

MARKSANDSPENCER.COM

 Unless otherwise stated above:
Marks and Spencer plc
Registered Office:
Waterside House
35 North Wharf Road
London
W2 1NW

Registered No. 214436 in England and Wales.

Telephone (020) 7935 4422
Facsimile (020) 7487 2670

www.marksandspencer.com

Please note that electronic mail may be monitored.

This e-mail is confidential. If you received it by mistake, please let us know 
and then delete it from your system; you should not copy, disclose, or 
distribute its contents to anyone nor act in reliance on this e-mail, as this 
is prohibited and may be unlawful.

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

TSO notifications from batch job on different LPAR?

[Dyck, Lionel B. (RavenTek)]

Is there a way to enable TSO notifications from batch jobs that run on a 
different LPAR in the plex?

Thank you

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners


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

Re: [EXTERNAL] IP printing from JES2?

[Dyck, Lionel B. (RavenTek)]

Take a look at the TSO LPR command 

I've an ispf dialog to simplify using it at http://lbdsoftware.com/print.zip

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Tony Thigpen
Sent: Monday, May 21, 2018 6:14 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] IP printing from JES2?

Is there any non-cost solutions built within z/OS 1.13 to print from 
JES2 to basic IP printers?

-- 
Tony Thigpen

--
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: trying to reload a pdse after it has been unloaded and ftp'd

[Dyck, Lionel B. (RavenTek)]

You can easily use TSO Transmit (XMIT) to a dataset thus:

XMIT x.y DS(input) ODS(xxx.xmit)

Where x.y is node.userid but that can be anything as it is just going to a 
dataset

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Barkow, Eileen
Sent: Wednesday, May 16, 2018 11:52 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: trying to reload a pdse after it has been unloaded and 
ftp'd

I was going to try XMIT as a last resort but the TERSE/UNTERSE steps added to 
the ADRDSSU  jobs worked.
I think that XMIT needs a USERID to send to and there are different userids 
involved in each lpar.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Seymour J Metz
Sent: Wednesday, May 16, 2018 12:03 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: trying to reload a pdse after it has been unloaded and ftp'd

You can FTP an XMIT unload.


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


From: IBM Mainframe Discussion List  on behalf of 
Barkow, Eileen 
Sent: Wednesday, May 16, 2018 11:57 AM
To: IBM-MAIN@listserv.ua.edu
Subject: trying to reload a pdse after it has been unloaded and ftp'd

I am trying to reload an unloaded pdse after it has been ftp'd to a target lpar.
there is a known problem with this using IEBCOPY UNLOAD/RELOAD described on 
IBMLINK and none of the
work-around overrides to ftp work. TRSMAIN/TERSE does not support PDSE. So I 
switched over to ADRDSSU.

I dump a dataset and am able to restore it on the same lpar.
However, when i ftp the dumped dataset to the remote lpar, the restore fails 
because the input dataset is not valid for ADRDSSU
(tried ftp with both BIN and EBCDIC default).

both datasets (remote and local) look the same to me when browsing them and 
have the same dcb info.
does anyone know how to restore an unloaded pdse that has been ftp'd?

thanks in advance for any info.

 Data Set Name . . . . : XCICS.FA.HIST.DUMPED
   General Data
  Management class . . : **None**
  Storage class  . . . : **None**
  Volume serial . . . : W1STG2
  Device type . . . . : 3390
  Data class . . . . . : **None**
  Organization  . . . : PS
  Record format . . . : U
  Record length . . . : 0
  Block size  . . . . : 27998
  1st extent tracks . : 1500
  Secondary tracks  . : 60

***original job used to create XCICS.FA.HIST.DUMPED**
 //DUMP EXEC  PGM=ADRDSSU
 //SYSPRINT DDSYSOUT=A
 //DASD1DDUNIT=SYSDA,VOL=SER=XCICX0,DISP=SHR
 //TAPE DDUNIT=SYSDA,
 //  DISP=(NEW,CATLG),DSNAME=XCICS.FA.HIST.DUMPED,
 //  SPACE=(TRK,(1500,60),RLSE)
 //SYSINDD*
  DUMP  LOGINDDNAME(DASD1) OUTDDNAME(TAPE) -
 DATASET(INCLUDE(XCICS.FA.HIST)) WAIT(0,0)
 /*
//
**job to restore after ftp of XCICS.FA.HIST.DUMPED to remote lpar**
 //RESTFAEXEC  PGM=ADRDSSU COND=((0,NE),(0,EQ))
 //*ESTEXEC  PGM=ADRDSSU,PARM='TYPRUN=NORUN'
 //SYSPRINT  DD  SYSOUT=*
 //IN  DD DSN=XCICS.FA.HIST.DUMPED,DISP=SHR
 //OUT  DD VOL=SER=W1STG2,DISP=SHR,UNIT=SYSDA
 //SYSIN DD  *
   RESTORE INDD(IN) OUTDD(OUT) DATASET(INCLUDE(XCICS.FA.HIST)) -
   CATALOG -
  RENUNC(XCICS.FA.HIST,XCICS.FA.HIST.RESTORED) REPLACE
 //
*
PAGE 0001 5695-DF175  DFSMSDSS V2R02.0 DATA SET SERVICES 2018.136 11:13
  RESTORE INDD(IN) OUTDD(OUT) DATASET(INCLUDE(XCICS.FA.HIST)) -
  CATALOG -
 RENUNC(XCICS.FA.HIST,XCICS.FA.HIST.RESTORED) REPLACE
ADR101I (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'RESTORE '
ADR109I (R/I)-RI01 (01), 2018.136 11:13:26 INITIAL SCAN OF USER CONTROL STATEMEN
ADR016I (001)-PRIME(01), RACF LOGGING OPTION IN EFFECT FOR THIS TASK
ADR006I (001)-STEND(01), 2018.136 11:13:26 EXECUTION BEGINS
ADR389E (001)-TDDS (07), INVALID INPUT ON DDNAME IN, INPUT DATA SET NOT PRODUCED
ADR415W (001)-TDDS (02), NO DATA SETS WERE COPIED, DUMPED, OR RESTORED FROM ANY
ADR006I (001)-STEND(02), 2018.136 11:13:26 EXECUTION ENDS
ADR013I (001)-CLTSK(01), 2018.136 11:13:26 TASK COMPLETED WITH RETURN CODE 0008
ADR012I (SCH)-DSSU (01), 2018.136 11:13:26 DFSMSDSS PROCESSING COMPLETE. HIGHEST







  

This e-mail, including any attachments, may be confidential, privileged or 
otherwise legally protected. It is intended only for the addressee. If you 
received this e-mail in error or from someone who was not authorized to send it 
to you, do not disseminate, copy or otherwise use this e-mail or its 
attachments. Please notify the sender immediately by reply e-mail and delete 
the e-mail from your system.

Re: trying to reload a pdse after it has been unloaded and ftp'd

[Dyck, Lionel B. (RavenTek)]

For this I have always used ADRDSSU and then Terse'd the results before doing a 
binary FTP transfer - all while retaining the Terse DCB. Then unterse and 
ADRDSSU restore and it has worked.

Hope this helps

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Barkow, Eileen
Sent: Wednesday, May 16, 2018 10:57 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] trying to reload a pdse after it has been unloaded and ftp'd

I am trying to reload an unloaded pdse after it has been ftp'd to a target lpar.
there is a known problem with this using IEBCOPY UNLOAD/RELOAD described on 
IBMLINK and none of the
work-around overrides to ftp work. TRSMAIN/TERSE does not support PDSE. So I 
switched over to ADRDSSU.

I dump a dataset and am able to restore it on the same lpar.
However, when i ftp the dumped dataset to the remote lpar, the restore fails 
because the input dataset is not valid for ADRDSSU
(tried ftp with both BIN and EBCDIC default).

both datasets (remote and local) look the same to me when browsing them and 
have the same dcb info.
does anyone know how to restore an unloaded pdse that has been ftp'd?

thanks in advance for any info.

 Data Set Name . . . . : XCICS.FA.HIST.DUMPED
   General Data
  Management class . . : **None**
  Storage class  . . . : **None**
  Volume serial . . . : W1STG2
  Device type . . . . : 3390
  Data class . . . . . : **None**
  Organization  . . . : PS
  Record format . . . : U
  Record length . . . : 0
  Block size  . . . . : 27998
  1st extent tracks . : 1500
  Secondary tracks  . : 60

***original job used to create XCICS.FA.HIST.DUMPED**
 //DUMP EXEC  PGM=ADRDSSU
 //SYSPRINT DDSYSOUT=A
 //DASD1DDUNIT=SYSDA,VOL=SER=XCICX0,DISP=SHR
 //TAPE DDUNIT=SYSDA,
 //  DISP=(NEW,CATLG),DSNAME=XCICS.FA.HIST.DUMPED,
 //  SPACE=(TRK,(1500,60),RLSE)
 //SYSINDD*
  DUMP  LOGINDDNAME(DASD1) OUTDDNAME(TAPE) -
 DATASET(INCLUDE(XCICS.FA.HIST)) WAIT(0,0)
 /*
//
**job to restore after ftp of XCICS.FA.HIST.DUMPED to remote lpar**
 //RESTFAEXEC  PGM=ADRDSSU COND=((0,NE),(0,EQ))
 //*ESTEXEC  PGM=ADRDSSU,PARM='TYPRUN=NORUN'
 //SYSPRINT  DD  SYSOUT=*
 //IN  DD DSN=XCICS.FA.HIST.DUMPED,DISP=SHR
 //OUT  DD VOL=SER=W1STG2,DISP=SHR,UNIT=SYSDA
 //SYSIN DD  *
   RESTORE INDD(IN) OUTDD(OUT) DATASET(INCLUDE(XCICS.FA.HIST)) -
   CATALOG -
  RENUNC(XCICS.FA.HIST,XCICS.FA.HIST.RESTORED) REPLACE
 //
*
PAGE 0001 5695-DF175  DFSMSDSS V2R02.0 DATA SET SERVICES 2018.136 11:13
  RESTORE INDD(IN) OUTDD(OUT) DATASET(INCLUDE(XCICS.FA.HIST)) -
  CATALOG -
 RENUNC(XCICS.FA.HIST,XCICS.FA.HIST.RESTORED) REPLACE
ADR101I (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'RESTORE '
ADR109I (R/I)-RI01 (01), 2018.136 11:13:26 INITIAL SCAN OF USER CONTROL STATEMEN
ADR016I (001)-PRIME(01), RACF LOGGING OPTION IN EFFECT FOR THIS TASK
ADR006I (001)-STEND(01), 2018.136 11:13:26 EXECUTION BEGINS
ADR389E (001)-TDDS (07), INVALID INPUT ON DDNAME IN, INPUT DATA SET NOT PRODUCED
ADR415W (001)-TDDS (02), NO DATA SETS WERE COPIED, DUMPED, OR RESTORED FROM ANY
ADR006I (001)-STEND(02), 2018.136 11:13:26 EXECUTION ENDS
ADR013I (001)-CLTSK(01), 2018.136 11:13:26 TASK COMPLETED WITH RETURN CODE 0008
ADR012I (SCH)-DSSU (01), 2018.136 11:13:26 DFSMSDSS PROCESSING COMPLETE. HIGHEST







  

This e-mail, including any attachments, may be confidential, privileged or 
otherwise legally protected. It is intended only for the addressee. If you 
received this e-mail in error or from someone who was not authorized to send it 
to you, do not disseminate, copy or otherwise use this e-mail or its 
attachments. Please notify the sender immediately by reply e-mail and delete 
the e-mail from your system.


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

RFE - ISPF 3.17 UID Fix

[Dyck, Lionel B. (RavenTek)]

Please comment and if you agree please vote:

https://www.ibm.com/developerworks/rfe/execute?use_case=viewRfe_ID=120120


Description:ISPF 3.17 currently will leave the UID set to whatever the user set 
it to when the dialog exits. If the user has changed the UID while in ISPF 3.17 
then it should be reset back upon exit. Leaving it violates the principle of 
least astonishment. Please make this an ISPF site configuration option at a 
minimum.



Use case:User enters ISPF 3.17, issues su to get into UID(0), performs some 
work. Then exits ISPF 3.17 and unknowingly is still under UID(0) and can 
accidentally cause damage.



Business justification:This is a security/audit item. The user should 
explicitly know when they are under UID(0) and not be there by 'accident'

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners


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