date:20180917

Re: C macro processor - supply exteranl values - emulating CMake

2018-09-17 Thread Ze'ev Atlas

Gil, I do NOT use make!  I use JCL for this particular port, as it is designed 
to be used without Unix Services.

In my day job, I use Solaris, Windows and perhaps Linux and I am well aware 
about these tools (make, gcc, etc.) although usually I do not use them because 
I do not use compiled languages that much any more.

ZA

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

Re: IBM Z and cloud

2018-09-17 Thread scott Ford

Phil,

We do IdentityManagement and it *seems* development is either really slow
or dead.
Sales have slowed down, everyone s hot and bothered by DevOPS and Agile..
Interesting but weird times..

Scott

On Mon, Sep 17, 2018 at 8:27 PM Jeff Savit  wrote:

> Thanks! I knew the phrase but didn’t recognize it as acronym. The MBA
> portion misled me
>
> Sent from my iPhone
>
> > On Sep 17, 2018, at 5:21 PM, Phil Smith III  wrote:
> >
> > Task. Management By Airline Magazine!
> >
> > From: Jeff Savit [mailto:jsa...@gmail.com]
> > Sent: Monday, September 17, 2018 8:06 PM
> > To: li...@akphs.com
> > Cc: ibm-m...@bama.ua.edu
> > Subject: Re: IBM Z and cloud
> >
> > "MBAM"? I'm guessing that's MBA "something"
> >
> > I haven't had a chance to do more than skim the article, but it doesn't
> look good at all.
> >
> > On Mon, Sep 17, 2018 at 4:51 PM Phil Smith III  wrote:
> > Mohammad Khan wrote, in part:
> > >May be Ginny & friends don't want to be left out of all this cool cloud
> talk at the parties, so they made the claim. It's not like that there is a
> Cloud(TM) certifying authority that will shut them up :).
> > Indeed. That’s what I’m getting out of this: it’s MBAM, only worse. And
> is going to doom IBM if they don’t smarten up.
> > Article I tripped across, badly edited but trenchant:
> >
> https://seekingalpha-com.cdn.ampproject.org/c/s/seekingalpha.com/amp/article/4205420-sad-decline-international-business-machines
> > I (like most on this list) have made my career around IBM. I’ve had my
> frustrations with it, but it’s been Big Blue and a good thing for decades.
> Now it seems bent on self-destruction, and I’m watching its death-spiral
> and wishing I knew some way to stop it. I suppose Ginny & co. may feel the
> same way, but they sure don’t *appear* to be worried: it feels like it’s
> “full speed ahead, that can’t possibly be an iceberg up there!” and that’s
> both sad and scary. I’m not likely to give up on it – I have a proven track
> record of sticking with things long after it’s sensible, I’m afraid – but I
> can’t say I’m enjoying the current arc.
> > …phsiii
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
-- 
Scott Ford
IDMWORKS
z/OS Development

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

Re: IBM Z and cloud

2018-09-17 Thread Jeff Savit

Thanks! I knew the phrase but didn’t recognize it as acronym. The MBA portion 
misled me

Sent from my iPhone

> On Sep 17, 2018, at 5:21 PM, Phil Smith III  wrote:
> 
> Task. Management By Airline Magazine!
>  
> From: Jeff Savit [mailto:jsa...@gmail.com] 
> Sent: Monday, September 17, 2018 8:06 PM
> To: li...@akphs.com
> Cc: ibm-m...@bama.ua.edu
> Subject: Re: IBM Z and cloud
>  
> "MBAM"? I'm guessing that's MBA "something"
> 
> I haven't had a chance to do more than skim the article, but it doesn't look 
> good at all.
>  
> On Mon, Sep 17, 2018 at 4:51 PM Phil Smith III  wrote:
> Mohammad Khan wrote, in part:
> >May be Ginny & friends don't want to be left out of all this cool cloud talk 
> >at the parties, so they made the claim. It's not like that there is a 
> >Cloud(TM) certifying authority that will shut them up :).
> Indeed. That’s what I’m getting out of this: it’s MBAM, only worse. And is 
> going to doom IBM if they don’t smarten up.
> Article I tripped across, badly edited but trenchant:
> https://seekingalpha-com.cdn.ampproject.org/c/s/seekingalpha.com/amp/article/4205420-sad-decline-international-business-machines
> I (like most on this list) have made my career around IBM. I’ve had my 
> frustrations with it, but it’s been Big Blue and a good thing for decades. 
> Now it seems bent on self-destruction, and I’m watching its death-spiral and 
> wishing I knew some way to stop it. I suppose Ginny & co. may feel the same 
> way, but they sure don’t *appear* to be worried: it feels like it’s “full 
> speed ahead, that can’t possibly be an iceberg up there!” and that’s both sad 
> and scary. I’m not likely to give up on it – I have a proven track record of 
> sticking with things long after it’s sensible, I’m afraid – but I can’t say 
> I’m enjoying the current arc.
> …phsiii

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

Re: Why banks didn’t ‘rip and replace’ their mainframes | Network World

2018-09-17 Thread Jackson, Rob

"will consider"

"over time"

"potentially"

Yes, they're doing it today.  Indeed. 

First Tennessee Bank
Mainframe Technical Support

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of x 
ksi
Sent: Monday, September 17, 2018 7:38 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Why banks didn’t ‘rip and replace’ their mainframes | Network World

[External Email]

2000...

This is what happens today -
https://www.itnews.com.au/news/cbas-new-private-cloud-nears-completion-moves-to-infrastructure-as-code-511657

Thanks,
Filip Palian

W dniu wtorek, 18 września 2018 Mark Regan 
napisał(a):

> https://www.networkworld.com/article/3305745/hardware/why-
> banks-didnt-rip-and-replace-their-mainframes.html
> --
>
> Regards,
>
> Mark T. Regan
>
> --
> 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
FIRST TENNESSEE

Confidentiality notice: 
This e-mail message, including any attachments, may contain legally privileged 
and/or confidential information. If you are not the intended recipient(s), or 
the employee or agent responsible for delivery of this message to the intended 
recipient(s), you are hereby notified that any dissemination, distribution, or 
copying of this e-mail message is strictly prohibited. If you have received 
this message in error, please immediately notify the sender and delete this 
e-mail message from your computer.


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

Re: IBM Z and cloud

2018-09-17 Thread Phil Smith III

Task. Management By Airline Magazine!

From: Jeff Savit [mailto:jsa...@gmail.com] 
Sent: Monday, September 17, 2018 8:06 PM
To: li...@akphs.com
Cc: ibm-m...@bama.ua.edu
Subject: Re: IBM Z and cloud

"MBAM"? I'm guessing that's MBA "something"

I haven't had a chance to do more than skim the article, but it doesn't look 
good at all.

On Mon, Sep 17, 2018 at 4:51 PM Phil Smith III mailto:li...@akphs.com> > wrote:

Mohammad Khan wrote, in part:

>May be Ginny & friends don't want to be left out of all this cool cloud talk 
>at the parties, so they made the claim. It's not like that there is a 
>Cloud(TM) certifying authority that will shut them up :).

Indeed. That’s what I’m getting out of this: it’s MBAM, only worse. And is 
going to doom IBM if they don’t smarten up.

Article I tripped across, badly edited but trenchant:

https://seekingalpha-com.cdn.ampproject.org/c/s/seekingalpha.com/amp/article/4205420-sad-decline-international-business-machines

I (like most on this list) have made my career around IBM. I’ve had my 
frustrations with it, but it’s been Big Blue and a good thing for decades. Now 
it seems bent on self-destruction, and I’m watching its death-spiral and 
wishing I knew some way to stop it. I suppose Ginny & co. may feel the same 
way, but they sure don’t *appear* to be worried: it feels like it’s “full speed 
ahead, that can’t possibly be an iceberg up there!” and that’s both sad and 
scary. I’m not likely to give up on it – I have a proven track record of 
sticking with things long after it’s sensible, I’m afraid – but I can’t say I’m 
enjoying the current arc.

…phsiii

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

Re: IBM Z and cloud

2018-09-17 Thread Jeff Savit

"MBAM"? I'm guessing that's MBA "something"

I haven't had a chance to do more than skim the article, but it doesn't
look good at all.

On Mon, Sep 17, 2018 at 4:51 PM Phil Smith III  wrote:

> Mohammad Khan wrote, in part:
>
> >May be Ginny & friends don't want to be left out of all this cool cloud
> talk at the parties, so they made the claim. It's not like that there is a
> Cloud(TM) certifying authority that will shut them up :).
>
>
>
> Indeed. That’s what I’m getting out of this: it’s MBAM, only worse. And is
> going to doom IBM if they don’t smarten up.
>
>
>
> Article I tripped across, badly edited but trenchant:
>
>
> https://seekingalpha-com.cdn.ampproject.org/c/s/seekingalpha.com/amp/article/4205420-sad-decline-international-business-machines
>
>
>
> I (like most on this list) have made my career around IBM. I’ve had my
> frustrations with it, but it’s been Big Blue and a good thing for decades.
> Now it seems bent on self-destruction, and I’m watching its death-spiral
> and wishing I knew some way to stop it. I suppose Ginny & co. may feel the
> same way, but they sure don’t **appear** to be worried: it feels like
> it’s “full speed ahead, that can’t possibly be an iceberg up there!” and
> that’s both sad and scary. I’m not likely to give up on it – I have a
> proven track record of sticking with things long after it’s sensible, I’m
> afraid – but I can’t say I’m enjoying the current arc.
>
>
>
> …phsiii
>

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

Re: IBM Z and cloud

2018-09-17 Thread Phil Smith III

Mohammad Khan wrote, in part:

>May be Ginny & friends don't want to be left out of all this cool cloud talk 
>at the parties, so they made the claim. It's not like that there is a 
>Cloud(TM) certifying authority that will shut them up :).

 

Indeed. That's what I'm getting out of this: it's MBAM, only worse. And is 
going to doom IBM if they don't smarten up.

 

Article I tripped across, badly edited but trenchant:

https://seekingalpha-com.cdn.ampproject.org/c/s/seekingalpha.com/amp/article/4205420-sad-decline-international-business-machines

 

I (like most on this list) have made my career around IBM. I've had my 
frustrations with it, but it's been Big Blue and a good thing for decades. Now 
it seems bent on self-destruction, and I'm watching its death-spiral and 
wishing I knew some way to stop it. I suppose Ginny & co. may feel the same 
way, but they sure don't *appear* to be worried: it feels like it's "full speed 
ahead, that can't possibly be an iceberg up there!" and that's both sad and 
scary. I'm not likely to give up on it - I have a proven track record of 
sticking with things long after it's sensible, I'm afraid - but I can't say I'm 
enjoying the current arc.

 

.phsiii


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

Re: Why banks didn’t ‘rip and replace’ their mainframes | Network World

2018-09-17 Thread x ksi

2000...

This is what happens today -
https://www.itnews.com.au/news/cbas-new-private-cloud-nears-completion-moves-to-infrastructure-as-code-511657

Thanks,
Filip Palian

W dniu wtorek, 18 września 2018 Mark Regan 
napisał(a):

> https://www.networkworld.com/article/3305745/hardware/why-
> banks-didnt-rip-and-replace-their-mainframes.html
> --
>
> Regards,
>
> Mark T. Regan
>
> --
> 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

Fwd: What's Big and Blue – and makes its veteran staff sue? Yep, it's IBM • The Register

2018-09-17 Thread Mark Regan

https://www.theregister.co.uk/2018/09/17/ibm_sued_agism/

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

Re: C macro processor - supply exteranl values - emulating CMake

2018-09-17 Thread Paul Gilmartin

On Sun, 16 Sep 2018 11:58:14 +, Ze'ev Atlas wrote:

>Hi allI am using IBM C compiler via good ol' JCL.  I already know how to 
>supply external macro definitions by supplying://OPTFILE DD 
>DSN=MY.LIB(OPTFILE),...and an OPTFILE member that contains lines 
>like:DEF(HAVE_STDINT_H)or evenDEF(HAVE_STDINT_H=1)
>I have a new challenge, something like:#define HAVE_STDINT_H   
>@HAVE_STDINT_H@which means that I should not define the macro externally, but 
>get only the value from CMake… I do not have CMake and I do not use it since I 
>run with good ol' JCL.
>Is there a way to supply the value only?
> 
On a Linux system, I downloaded and unpacked:
curl -fOD - https://ftp.pcre.org/pub/pcre/pcre2-10.32.tar.gz

In src/config.h.in I read about several options.
In environments that support the GNU autotools, config.h.in is converted into
config.h by the "configure" script. In environments that use CMake,
config-cmake.in is converted into config.h. If you are going to build PCRE2 "by
hand" without using "configure" or CMake, you should copy the distributed
config.h.generic to config.h, and edit the macro definitions to be the way you
need them. You must then add -DHAVE_CONFIG_H to all of your compile commands,
so that config.h is included at the start of every source.

Note that CMake is one of the three options, not required.

With other products on z/OS, I have had good success using the "autotools" 
scheme.

When I run configure, the line:
../pcre2-10.32/Makefile.in:PCRE2_HAVE_STDINT_H = @PCRE2_HAVE_STDINT_H@

Is transformed to:
../bunsen/Makefile:PCRE2_HAVE_STDINT_H = 1

No need to do a bunch of DEF() or hand editing.

Just Read the Instructions,
gil

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

Re: SORT JOIN help needed - matched F2 only plus unmatched F2 hdr/trlr?

2018-09-17 Thread Farley, Peter x23353

For the archives, as promised.  My shorter solution to Sri's excellent tutorial 
worked as I needed.

One small (but critical!) typographical error:

  REFORMAT FIELDS=(F2:1,4,?,F2:6)

Should be instead:

  REFORMAT FIELDS=(F2:1,4,?,F2:5)

I missed that error when pasting for my earlier reply.

Thanks again Sri!

Peter

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Farley, Peter x23353
Sent: Monday, September 17, 2018 6:15 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SORT JOIN help needed - matched F2 only plus unmatched F2 hdr/trlr?

Thanks for replying so promptly Sri.  I think I failed to make clear that the 
header and trailer records have their key values in the same position as the F2 
matching key, so I think the marking of the header and trailer are not needed.

I think the following (using your example) will get me what I need:

//STEP0100 EXEC PGM=SORT
//SYSOUT   DD SYSOUT=*
//INA  DD DISP=SHR,DSN=&
//INB  DD DISP=SHR,DSN=&
//SORTOUT  DD SYSOUT=*
//SYSINDD *
  OPTION COPY
  JOINKEYS F1=INA,FIELDS=(01,7,A) $ KEY
  JOINKEYS F2=INB,FIELDS=(33,7,A) $ KEY
  JOIN UNPAIRED,F2
  REFORMAT FIELDS=(F2:1,4,?,F2:6)

  INCLUDE COND=(5,1,CH,EQ,C'B',OR,$ MATCH KEYS
   (34,7,CH,EQ,C'000',OR, $ HDROR
34,7,CH,EQ,C'999'))   $ TRL

  INREC BUILD=(1,4,   $ RDW
   6) $ DATA
/*

I'll report back on my results for the archives.

Thanks once again for your courteous and professional help.

Peter

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Sri h Kolusu
Sent: Monday, September 17, 2018 5:51 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SORT JOIN help needed - matched F2 only plus unmatched F2 hdr/trlr?

Peter,

You can get the unmatched header and trailer records from F2 file, but you
just need to handle it a bit differently.Since I don't have the input
data here is something that I made up.  I assumed that the header is denoted by 
all 0's in position 5 and trailer all 9's in position 5. Since you are matching 
the keys the header and trailer may not be in their original positions, so in 
order to preserve the position we need to tag the header as 0 and detail 
records as 1 and the trailer record as 9.

//
//* CREATE VB INPUT DATA WITH AN LRECL OF 1000   *
//
//STEP0050 EXEC PGM=SORT
//SYSOUT   DD SYSOUT=*
//SORTIN   DD *
000  - HEADER RECORD
YYY
YYY
BBB
BBB
BBB
BBB
ZZZ
ZZZ
999  - TRAILER RECORD
//SORTOUT  DD DSN=&,DISP=(,PASS),SPACE=(CYL,(1,1),RLSE)
//SYSINDD *
  OPTION COPY
  INREC OVERLAY=(996:X)
  OUTFIL FTOV
//*
//
//* CREATE FB INPUT DATA WITH AN LRECL OF 40 *
//
//STEP0060 EXEC PGM=SORT
//SYSOUT   DD SYSOUT=*
//SORTIN   DD *
AAA
BBB
ZZZ
//SORTOUT  DD DSN=&,DISP=(,PASS),SPACE=(CYL,(1,1),RLSE)
//SYSINDD *
  OPTION COPY
  INREC BUILD=(1,40)
//*
//
//* RUN JOINKEYS TO PULL THE MATCHED DATA AND UNMATCHED  *
//* HEADER AND TRAILER DATA  *
//
//STEP0100 EXEC PGM=SORT
//SYSOUT   DD SYSOUT=*
//INA  DD DISP=SHR,DSN=&
//INB  DD DISP=SHR,DSN=&
//SORTOUT  DD SYSOUT=*
//SYSINDD *
  OPTION COPY
  JOINKEYS F1=INA,FIELDS=(01,1,A, $ INDICATOR
  02,7,A) $ KEY

  JOINKEYS F2=INB,FIELDS=(05,1,A, $ INDICATOR
  34,7,A) $ KEY
  JOIN UNPAIRED,F2
  REFORMAT FIELDS=(F2:1,4,?,F2:6)

  INCLUDE COND=(5,1,CH,EQ,C'B',OR,$ MATCH KEYS
   (5,1,CH,EQ,C'2',AND,   $ IND = 2 AND
   (6,7,CH,EQ,C'000',OR,  $ HDROR
6,7,CH,EQ,C'999')))   $ TRL

  INREC BUILD=(1,4,   $ RDW
   6) $ DATA
/*
//JNF1CNTL DD *
  INREC BUILD=(C'1',  $ DTL = 1
   1,7)$ MATCHING KEY $ KEY
/*
//JNF2CNTL DD *
  OPTION VLSHRT
  INREC BUILD=(01,04, $ RDW
   05,07,CHANGE=(1,C'000',C'0',   $ HDR = 0
   C'999',C'9'),  $ TRL = 9

Re: SORT JOIN help needed - matched F2 only plus unmatched F2 hdr/trlr?

2018-09-17 Thread Farley, Peter x23353

Thanks for replying so promptly Sri.  I think I failed to make clear that the 
header and trailer records have their key values in the same position as the F2 
matching key, so I think the marking of the header and trailer are not needed.

I think the following (using your example) will get me what I need:

//STEP0100 EXEC PGM=SORT
//SYSOUT   DD SYSOUT=*
//INA  DD DISP=SHR,DSN=&
//INB  DD DISP=SHR,DSN=&
//SORTOUT  DD SYSOUT=*
//SYSINDD *
  OPTION COPY
  JOINKEYS F1=INA,FIELDS=(01,7,A) $ KEY
  JOINKEYS F2=INB,FIELDS=(33,7,A) $ KEY
  JOIN UNPAIRED,F2
  REFORMAT FIELDS=(F2:1,4,?,F2:6)

  INCLUDE COND=(5,1,CH,EQ,C'B',OR,$ MATCH KEYS
   (34,7,CH,EQ,C'000',OR, $ HDROR
34,7,CH,EQ,C'999'))   $ TRL

  INREC BUILD=(1,4,   $ RDW
   6) $ DATA
/*

I'll report back on my results for the archives.

Thanks once again for your courteous and professional help.

Peter

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Sri h Kolusu
Sent: Monday, September 17, 2018 5:51 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SORT JOIN help needed - matched F2 only plus unmatched F2 hdr/trlr?

EXTERNAL EMAIL

Peter,

You can get the unmatched header and trailer records from F2 file, but you
just need to handle it a bit differently.Since I don't have the input
data here is something that I made up.  I assumed that the header is denoted by 
all 0's in position 5 and trailer all 9's in position 5. Since you are matching 
the keys the header and trailer may not be in their original positions, so in 
order to preserve the position we need to tag the header as 0 and detail 
records as 1 and the trailer record as 9.

//
//* CREATE VB INPUT DATA WITH AN LRECL OF 1000   *
//
//STEP0050 EXEC PGM=SORT
//SYSOUT   DD SYSOUT=*
//SORTIN   DD *
000  - HEADER RECORD
YYY
YYY
BBB
BBB
BBB
BBB
ZZZ
ZZZ
999  - TRAILER RECORD
//SORTOUT  DD DSN=&,DISP=(,PASS),SPACE=(CYL,(1,1),RLSE)
//SYSINDD *
  OPTION COPY
  INREC OVERLAY=(996:X)
  OUTFIL FTOV
//*
//
//* CREATE FB INPUT DATA WITH AN LRECL OF 40 *
//
//STEP0060 EXEC PGM=SORT
//SYSOUT   DD SYSOUT=*
//SORTIN   DD *
AAA
BBB
ZZZ
//SORTOUT  DD DSN=&,DISP=(,PASS),SPACE=(CYL,(1,1),RLSE)
//SYSINDD *
  OPTION COPY
  INREC BUILD=(1,40)
//*
//
//* RUN JOINKEYS TO PULL THE MATCHED DATA AND UNMATCHED  *
//* HEADER AND TRAILER DATA  *
//
//STEP0100 EXEC PGM=SORT
//SYSOUT   DD SYSOUT=*
//INA  DD DISP=SHR,DSN=&
//INB  DD DISP=SHR,DSN=&
//SORTOUT  DD SYSOUT=*
//SYSINDD *
  OPTION COPY
  JOINKEYS F1=INA,FIELDS=(01,1,A, $ INDICATOR
  02,7,A) $ KEY

  JOINKEYS F2=INB,FIELDS=(05,1,A, $ INDICATOR
  34,7,A) $ KEY
  JOIN UNPAIRED,F2
  REFORMAT FIELDS=(F2:1,4,?,F2:6)

  INCLUDE COND=(5,1,CH,EQ,C'B',OR,$ MATCH KEYS
   (5,1,CH,EQ,C'2',AND,   $ IND = 2 AND
   (6,7,CH,EQ,C'000',OR,  $ HDROR
6,7,CH,EQ,C'999')))   $ TRL

  INREC BUILD=(1,4,   $ RDW
   6) $ DATA
/*
//JNF1CNTL DD *
  INREC BUILD=(C'1',  $ DTL = 1
   1,7)$ MATCHING KEY $ KEY
/*
//JNF2CNTL DD *
  OPTION VLSHRT
  INREC BUILD=(01,04, $ RDW
   05,07,CHANGE=(1,C'000',C'0',   $ HDR = 0
   C'999',C'9'),  $ TRL = 9
 NOMATCH=(C'1'),  $ DTL = 1
   5) $ RECORD AS IS
/*



The output from this job is

000  - HEADER RECORD
BBB
BBB
BBB
BBB
ZZZ
ZZZ
999  - TRAILER RECORD


Hope this gives you the desired results you looking for

Thanks,
 Kolusu
DFSORT Development
IBM Corporation

IBM Mainframe Discussion List  wrote on
09/17/2018 01:12:00 PM:

> From:

Re: SORT JOIN help needed - matched F2 only plus unmatched F2 hdr/trlr?

2018-09-17 Thread Sri h Kolusu

Peter,

You can get the unmatched header and trailer records from F2 file, but you
just need to handle it a bit differently.Since I don't have the input
data here is something that I made up.  I assumed that the header is
denoted by all 0's in position 5 and trailer all 9's in position 5. Since
you are matching the keys the header and trailer may not be in their
original positions, so in order to preserve the position we need to tag the
header as 0 and detail records as 1 and the trailer record as 9.

//
//* CREATE VB INPUT DATA WITH AN LRECL OF 1000   *
//
//STEP0050 EXEC PGM=SORT
//SYSOUT   DD SYSOUT=*
//SORTIN   DD *
000  - HEADER RECORD
YYY
YYY
BBB
BBB
BBB
BBB
ZZZ
ZZZ
999  - TRAILER RECORD
//SORTOUT  DD DSN=&,DISP=(,PASS),SPACE=(CYL,(1,1),RLSE)
//SYSINDD *
  OPTION COPY
  INREC OVERLAY=(996:X)
  OUTFIL FTOV
//*
//
//* CREATE FB INPUT DATA WITH AN LRECL OF 40 *
//
//STEP0060 EXEC PGM=SORT
//SYSOUT   DD SYSOUT=*
//SORTIN   DD *
AAA
BBB
ZZZ
//SORTOUT  DD DSN=&,DISP=(,PASS),SPACE=(CYL,(1,1),RLSE)
//SYSINDD *
  OPTION COPY
  INREC BUILD=(1,40)
//*
//
//* RUN JOINKEYS TO PULL THE MATCHED DATA AND UNMATCHED  *
//* HEADER AND TRAILER DATA  *
//
//STEP0100 EXEC PGM=SORT
//SYSOUT   DD SYSOUT=*
//INA  DD DISP=SHR,DSN=&
//INB  DD DISP=SHR,DSN=&
//SORTOUT  DD SYSOUT=*
//SYSINDD *
  OPTION COPY
  JOINKEYS F1=INA,FIELDS=(01,1,A, $ INDICATOR
  02,7,A) $ KEY

  JOINKEYS F2=INB,FIELDS=(05,1,A, $ INDICATOR
  34,7,A) $ KEY
  JOIN UNPAIRED,F2
  REFORMAT FIELDS=(F2:1,4,?,F2:6)

  INCLUDE COND=(5,1,CH,EQ,C'B',OR,$ MATCH KEYS
   (5,1,CH,EQ,C'2',AND,   $ IND = 2 AND
   (6,7,CH,EQ,C'000',OR,  $ HDROR
6,7,CH,EQ,C'999')))   $ TRL

  INREC BUILD=(1,4,   $ RDW
   6) $ DATA
/*
//JNF1CNTL DD *
  INREC BUILD=(C'1',  $ DTL = 1
   1,7)$ MATCHING KEY $ KEY
/*
//JNF2CNTL DD *
  OPTION VLSHRT
  INREC BUILD=(01,04, $ RDW
   05,07,CHANGE=(1,C'000',C'0',   $ HDR = 0
   C'999',C'9'),  $ TRL = 9
 NOMATCH=(C'1'),  $ DTL = 1
   5) $ RECORD AS IS
/*



The output from this job is

000  - HEADER RECORD
BBB
BBB
BBB
BBB
ZZZ
ZZZ
999  - TRAILER RECORD


Hope this gives you the desired results you looking for

Thanks,
 Kolusu
DFSORT Development
IBM Corporation

IBM Mainframe Discussion List  wrote on
09/17/2018 01:12:00 PM:

> From: "Farley, Peter x23353" 
> To: IBM-MAIN@LISTSERV.UA.EDU
> Date: 09/17/2018 01:13 PM
> Subject: SORT JOIN help needed - matched F2 only plus unmatched F2
hdr/trlr?
> Sent by: IBM Mainframe Discussion List 
>
> Using the "Smart DFSORT Tricks" manual, section "No match, VB, key
> in different places, duplicates", I understand how to get the NOT
> matched records from file 2.
>
> I need to get the MATCHED records from file 2 plus the always-un-
> matched header and trailer records from file 2 in one output file.
>
> The basic task is matching a file of keys-to-be-included (F1) with a
> data file (F2) containing those keys in a different position with
> many possible duplicates.  All duplicates in F2 are to be kept.  The
> data file (F2) also contains a header (assume a key of all zeroes)
> and a trailer (assume a key of all 9's) that never match.  Key
> length is 7 bytes.
>
> This (modified) example from the PDF will get me the UN-matched F2
records:
>
> //JK8 EXEC PGM=SORT
> //SYSOUT DD SYSOUT=*
> //IN1 DD DSN=... input file1 (FB/40)
> //IN2 DD DSN=... input file2 (VB/1000)
> //SORTOUT DD DSN=... output file (VB/1000)
> //SYSIN DD *
> JOINKEYS F1=IN1,FIELDS=(1,7,A)
> JOINKEYS F2=IN2,FIELDS=(33,7,A)
> JOIN UNPAIRED,F2,ONLY
> OPTION COPY
> /*
>
> How do I get MATCHED records from F2 only plus unmatched header and
> trailer from F2 in one output

Re: Spam alert: Model9

2018-09-17 Thread Seymour J Metz

Alas, the header does not include any e-mail address that cannot be spoofed. 
OTOH, the RECEIVED header field inserted by your e-mail provider cannot be 
spoofed.


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


From: IBM Mainframe Discussion List  on behalf of CM 
Poncelet 
Sent: Monday, September 17, 2018 1:58 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: Spam alert: Model9

Yes, I had mentioned that: "(Yes, it can be spoofed - but the
headers/metadata show the spammer's real email ID.)" CP


On 16/09/2018 21:18, Seymour J Metz wrote:
> Be careful; spammers often forge headers, so it's safest to learn how to read 
> headers and to check the Received header fields to determine the actual 
> provenance of the spam.
>
> See also 
> http://secure-web.cisco.com/1vs8h6joJJ_FBNWwYHrae_yil76zbNw5MCRUOo3wezy5LoHrn0hDc_hRIcKeHei3xqkqFk2mFrzfSG1VFpcmDMg5GQKY1uuOY-XCZcqfLZRws_X4HTMnn8bZ2oHCA0-hCGshdbSyHaHTMtLQfXINY5AfoIsOrFaZBP3XZNg5GMoLDIiI_QqGRttnvi6AqpF9Q3352PYIEEAYDRPaSpmMjEeqN_Ek06frfa6oG6VJNQ0HpJFiN3baqguSIqhNt53HQGqtGwDf6UgP9iWS8xSush97JKKFOv25FW_4R5gg8fX8aJN1UkKHvVAQNP_daDXKZLoazubw68xAC25p0_X-Wrs4hibkK6uaxshFy5-ClPTft1XKm_X6Jhq6bwIUYDPpiJnbv4l0Jj6zqHVFlX2Q1lvUJi_C_Y8RGcs0DzmsO1uaynVGDQuLTciDGJDhI04Up/http%3A%2F%2Fwww.medwayhosting.com%2Fspam-l%2Fdeobfuscation-by-Shmuel%2Findex.html
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
> 
> From: IBM Mainframe Discussion List  on behalf of 
> CM Poncelet 
> Sent: Saturday, September 15, 2018 11:18 AM
> To: IBM-MAIN@listserv.ua.edu
> Subject: Re: Spam alert: Model9
>
> FWIW SPAM mail can be sent to https://www.spamcop.net/ with a copy sent
> also to the spammer's email domain administrator (provided the
> abuse@ email ID is keyed into spamcop's spare 'copy-to' box
> that is).
>
> The spammer's email domain is the one following the '@' sign. The
> 'report abuse to administrator' email address for the spammer can then
> be found at 
> https://secure-web.cisco.com/11Rj0URRt6sLw_P2VizI4v2gdo26_pqiMBOP4zRkAM9-nlimjAnJlp6-HqEGNDK45XOhG_VTyx16nYKlAIefZOQmBra9MEF93HPIeLS5vbiAsFVzznEzHo2lSbXQvBnH38UQdlaGjh0FoMPuvBFVkKfKlCBLKlaZzbWslfmFqD5dTroH3mLYhTWW2-BpKFanB2QBw-KOxk-9bJxdS_VxcTS_e-V3LBt78MwqkwkTaFC9Pe27XGZ9RjDmjEydMCf-aKrgri83XGA-v0_4zruL8Mc6FiY11LtePMKgwlFflae5fq-bApl2L6OmK2rJ6fxWx5yGC5ZbmUNS-i4Sjt0Q_TbD7MEKvN8bydxHMmMYxno5rcBNluTJhs4-hLvVz4UFvMN6OhsxAGmGSLQBMR0y9oxuj5CYMaEklwXglSxfkWhROAtRqX2gQABZrZR7Zr0pd/https%3A%2F%2Fwww.whois.com%2F.
>  (Yes, it can be spoofed - but the
> headers/metadata show the spammer's real email ID.)
>
> This practically always stops any further junk mail being sent out.
>
> (BTW My filters store any emails from unrecognised senders - e.g. from
> Model9 - in my 'trash' folder, from where they are then deleted. So,
> NOPWAD.)
>
> HTH, CP
>
>
>
> On 14/09/2018 22:30, Arthur wrote:
>> On 14 Sep 2018 03:50:14 -0700, in bit.listserv.ibm-main
>> (Message-ID:<7316854461517568.wa.giliadwyahoo@listserv.ua.edu>)
>> 00d50942efa9-dmarc-requ...@listserv.ua.edu (Giliad Wilf) wrote:
>>
>>> Got this e-mail too, inspected it with some concerns, but finally
>>> opened it.
>>> It could prove useful, as the CEO advised my previous employer on
>>> performance issues we had, to our satisfaction.
>>> This CEO co-authored many IBM publications, both white and red, and
>>> was a visiting developer at IBM of some z/OS components.
>> If you know the CEO, tell him not to spam. Don't let spammers prosper.
>> It wouldn't be the first time a CEO didn't know what his marketing
>> people are doing.
>>
>> Also, I forwarded it to the edress in the anti-spam header:
>>> X-Report-Abuse-To: ab...@hubspot.com (see
>>> https://secure-web.cisco.com/1GujClvauL3cZ7Io1yNJWzrQB65DX2GHqmo7k9mSuX0Sw_X-mm6dI9Qi6EVPBrTOH1bNZmdgoKeqCGlQVoAkQHBsBRwEWzEUtgLBKc_OXDTtg9FYlTWokRgcLE2A0PMyKEUGrDJqOSv9MvA54e82tOnlC_8nzHszc-QYR18WjcIYd4GWOkx_PSaEwIPgkQ4CDw5dRThVxbmgCcfrz0gG9jfIQ7z-g6IHBxk8q8FI8aSUOB57tojOhkVtETICUfHE-_TVZtECjebk4N1dfijeEwuG435GtFJ-lnOcztvHRf5igqrrQB-wI6ferMNfOl-OOWPOr79Neji7M63YpKo-ChGzKU0NDnE3ASgupXuqc76ZV1P8vivc0Lvszw7JvqA80oVB7lEZlYS30wqvL6D4xxgz3jBHszeWYT9PF2Du5N3I5J5eA9hpKFn1dAYEArQ9cX17mBzGWPSUqFVmq4ieGAA/https%3A%2F%2Fwww.hubspot.com%2Fabuse-complaints%29
>> I'm not sure how much good it'll do, but I did get a response from
>> that. If the rest of you also report it, it might make a difference.
>> He did say they "will be investigating to ensure compliance with our
>> acceptable use policy."
>>
>> And, in reference to another post: I did not go to Share; I did not
>> subscribe; it was sent to this edress which I use *only* for 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 /

Re: IBM Z and cloud

2018-09-17 Thread Seymour J Metz

Just as OS/390 was not called z/OS; ObJackWeb "Only the names have been changed 
to protect the innocent."


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


From: IBM Mainframe Discussion List  on behalf of 
Mohammad Khan 
Sent: Monday, September 17, 2018 3:42 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: IBM Z and cloud

May be Ginny & friends don't want to be left out of all this cool cloud talk at 
the parties, so they made the claim. It's not like that there is a Cloud(TM) 
certifying authority that will shut them up :). Service bureaus were surely 
very much like clouds but were not called clouds and there are not many left 
that would let you run your own z/OS instance today.

mkk


On Sat, 15 Sep 2018 13:21:50 -0400, Phil Smith III  wrote:

>OK, so what do we mean by "cloud"? What *customers* seem to mean is "a compute 
>platform where I can run my stuff but not have to deal with buying hardware 
>and racking and cabling it and in general all the work of running a data 
>center". By which definition, of course, traditional timesharing fits.
>
>
>
>For x86, this is currently AWS and Google Cloud Platform and Microsoft Azure 
>(and not HPE Helion). For z, it's more like the IBM Dallas developer systems, 
>where you can rent a virtual machine that runs z/OS or z/VM or Linux, and then 
>do whatever you want with that OS.
>
>
>
>My conclusion is that the vendors (and IBM) who are saying "IBM Z and cloud" 
>are not being honest with themselves. Calling a tail a leg doesn't make it 
>one, and saying "We like IBM Z and it *can* do cloud-ish stuff, therefore we 
>will say it's good for cloud" is not a rational (much less convincing) 
>argument.
>
>
>
>Again, I'd love to be proven wrong. But the relative silence on this thread 
>tends to suggest that nobody else buys it either. Well, nobody besides Ginny & 
>Co.
>
>
>
>.phsiii
>

--
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: Help With PENDING OFFLINE Devices

2018-09-17 Thread Gibney, Dave

Really unsure what your goal is here, and it's looking dangerous. But, IDCAMS

EXPORT catalog name DISCONNECT will remove each catalog from the CATALOG 
address space

> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
> On Behalf Of George Rodriguez
> Sent: Monday, September 17, 2018 12:08 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Help With PENDING OFFLINE Devices
> 
> Boy, I'm way over my head here:
> 
> F CATALOG,ALLOCATED(PCAT00)
> IEC351I CATALOG ADDRESS SPACE MODIFY COMMAND ACTIVE IEC348I
> ALLOCATED CATALOGS 976
> *CAS***
> 
> * FLAGS -VOLSER-USER-CATALOG NAME   % *
> * Y---R- PCAT00 0001 CATALOG.SCHOOL.USERCAT 1 *
> * Y---R- PCAT00 0001 CATALOG.TAPEGDG.DB2.USERCAT1 *
> * Y---R- PCAT00 0001 CATALOG.TAPEGDG.PROD.USERCAT   1 *
> * Y---R- PCAT00 0001 CATALOG.FINANCE.USERCAT1 *
> * Y---R- PCAT00 0001 CATALOG.BUDGET.USERCAT 1 *
> * Y---R- PCAT00 0001 CATALOG.DFHSM.USERCAT  1 *
> * Y-I-R- PCAT00 0001 CATALOG.SDPBC.USERCAT  1 *
> ***
> 
> * Y/N-ALLOCATED TO CAS, S-SMS, V-VLF, I-ISC, C-CLOSED, D-DELETED, *
> * R-SHARED, A-ATL, E-ECS SHARED, K-LOCKED *
> *CAS***
> 
> IEC352I CATALOG ADDRESS SPACE MODIFY COMMAND COMPLETED
> 
> and for the next one:
> 
> F CATALOG,ALLOCATED(PCAT01)
> IEC351I CATALOG ADDRESS SPACE MODIFY COMMAND ACTIVE IEC348I
> ALLOCATED CATALOGS 981
> *CAS***
> 
> * FLAGS -VOLSER-USER-CATALOG NAME   % *
> * Y---R- PCAT01 0001 CATALOG.TEST.USERCAT   1 *
> * Y---R- PCAT01 0001 CATALOG.TAPEGDG.TEST.USERCAT   1 *
> * Y---R- PCAT01 0001 CATALOG.TESTNEW.USERCAT1 *
> * Y-I-R- PCAT01 0001 CATALOG.TSO.USERCAT1 *
> ***
> 
> * Y/N-ALLOCATED TO CAS, S-SMS, V-VLF, I-ISC, C-CLOSED, D-DELETED, *
> * R-SHARED, A-ATL, E-ECS SHARED, K-LOCKED *
> *CAS***
> 
> IEC352I CATALOG ADDRESS SPACE MODIFY COMMAND COMPLETED
> 
> 
> 
> 
> *George Rodriguez*
> 
> *Specialist II - IT Security*
> *PX - 47652*
> *(561) 357-7652 (office)*
> *(954) 415-7586 (mobile)*
> *School District of Palm Beach County*
> *3348 Forest Hill Blvd.*
> *Room B-332*
> *West Palm Beach, FL. 33406-5869*
> *Florida's Only A-Rated Urban District*
> 
> 
> On Mon, Sep 17, 2018 at 1:51 PM Dana Mitchell 
> wrote:
> 
> > For datasets allocated by your TSO session,  if you issue 'ddlist'
> > command, you can look for datasets that you currently have allocated
> > that are on the volumes in question.  Once found, you will have to
> > discern if they are allocated in the actual logon proc,  or logon
> > clist or rexx, or dynamically and  deal with them accordingly.
> >
> > For CATALOG,  issue console command   'F CATALOG,ALLOCATED(vvv)'
> > where vv= volser,  to see what catalog(s) are on the volume that
> > will need to be moved.
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions, send
> > email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
> 
> --
> 
> 
> 
> 
> 
> 
> *Disclaimer: *Under Florida law, e-mail addresses are public records.
> If you do not want your e-mail address released in response to a public
> records request, do not send electronic mail to this entity. Instead, contact
> this office by phone or in writing.
> 
> 
> 
> 
> 
> 
> 
> 
> --
> 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: Help With PENDING OFFLINE Devices

2018-09-17 Thread Mike Schwab

If you are varying volumes offline, I assume they are being emptied,
and your list above shows just catalogs.  About 3 years ago, I needed
to Reorg some of our catalogs, using
 http://www-01.ibm.com/support/docview.wss?uid=isg1II13354 .

First, I would run the IDCAMS LISTCAT ALL command.  This will list all
aliases and datasets in that catalog.  For catalogs with nothing but
aliases, you can just delete the Aliases in the master catalog,
deallocate the catalog from the catalog address space, and delete the
catalog, using some of the commands from the IBM Info APAR above.  If
there are datasets in the catalog, you need to follow *ALL* the
procedures in the IBM Info APAR above to move the catalog to a
different volume, which will require an outage for the datasets in the
catalog.. Or if you don't want to take an outage to move the just the
catalog then you can move the entire volume to a new UCB with TDMF,
FDRPAS, Etc without an outage.

Once the catalog is off the volume then you can vary the volume
offline and re-init as spare.
On Mon, Sep 17, 2018 at 2:08 PM George Rodriguez
<016eebd7289b-dmarc-requ...@listserv.ua.edu> wrote:
>
> Boy, I'm way over my head here:
>
> F CATALOG,ALLOCATED(PCAT00)
> IEC351I CATALOG ADDRESS SPACE MODIFY COMMAND ACTIVE
> IEC348I ALLOCATED CATALOGS 976
> *CAS***
> * FLAGS -VOLSER-USER-CATALOG NAME   % *
> * Y---R- PCAT00 0001 CATALOG.SCHOOL.USERCAT 1 *
> * Y---R- PCAT00 0001 CATALOG.TAPEGDG.DB2.USERCAT1 *
> * Y---R- PCAT00 0001 CATALOG.TAPEGDG.PROD.USERCAT   1 *
> * Y---R- PCAT00 0001 CATALOG.FINANCE.USERCAT1 *
> * Y---R- PCAT00 0001 CATALOG.BUDGET.USERCAT 1 *
> * Y---R- PCAT00 0001 CATALOG.DFHSM.USERCAT  1 *
> * Y-I-R- PCAT00 0001 CATALOG.SDPBC.USERCAT  1 *
> ***
> * Y/N-ALLOCATED TO CAS, S-SMS, V-VLF, I-ISC, C-CLOSED, D-DELETED, *
> * R-SHARED, A-ATL, E-ECS SHARED, K-LOCKED *
> *CAS***
> IEC352I CATALOG ADDRESS SPACE MODIFY COMMAND COMPLETED
>
> and for the next one:
>
> F CATALOG,ALLOCATED(PCAT01)
> IEC351I CATALOG ADDRESS SPACE MODIFY COMMAND ACTIVE
> IEC348I ALLOCATED CATALOGS 981
> *CAS***
> * FLAGS -VOLSER-USER-CATALOG NAME   % *
> * Y---R- PCAT01 0001 CATALOG.TEST.USERCAT   1 *
> * Y---R- PCAT01 0001 CATALOG.TAPEGDG.TEST.USERCAT   1 *
> * Y---R- PCAT01 0001 CATALOG.TESTNEW.USERCAT1 *
> * Y-I-R- PCAT01 0001 CATALOG.TSO.USERCAT1 *
> ***
> * Y/N-ALLOCATED TO CAS, S-SMS, V-VLF, I-ISC, C-CLOSED, D-DELETED, *
> * R-SHARED, A-ATL, E-ECS SHARED, K-LOCKED *
> *CAS***
> IEC352I CATALOG ADDRESS SPACE MODIFY COMMAND COMPLETED
>
>
>
>
> *George Rodriguez*
>
> *Specialist II - IT Security*
> *PX - 47652*
> *(561) 357-7652 (office)*
> *(954) 415-7586 (mobile)*
> *School District of Palm Beach County*
> *3348 Forest Hill Blvd.*
> *Room B-332*
> *West Palm Beach, FL. 33406-5869*
> *Florida's Only A-Rated Urban District*
>
>
> On Mon, Sep 17, 2018 at 1:51 PM Dana Mitchell  wrote:
>
> > For datasets allocated by your TSO session,  if you issue 'ddlist'
> > command, you can look for datasets that you currently have allocated that
> > are on the volumes in question.  Once found, you will have to discern if
> > they are allocated in the actual logon proc,  or logon clist or rexx, or
> > dynamically and  deal with them accordingly.
> >
> > For CATALOG,  issue console command   'F CATALOG,ALLOCATED(vvv)'
> > where vv= volser,  to see what catalog(s) are on the volume that will
> > need to be moved.
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
> --
>
>
>
>
>
>
> *Disclaimer: *Under Florida law, e-mail addresses are public records.
> If you do not want your e-mail address released in response to a public
> records request, do not send electronic mail to this entity. Instead,
> contact this office by phone or in writing.
>
>
>
>
>
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



-- 
Mike A Schwab, Springfield IL USA
Where do Forest Rangers go to get away from it all?

SORT JOIN help needed - matched F2 only plus unmatched F2 hdr/trlr?

2018-09-17 Thread Farley, Peter x23353

Using the "Smart DFSORT Tricks" manual, section "No match, VB, key in different 
places, duplicates", I understand how to get the NOT matched records from file 
2.

I need to get the MATCHED records from file 2 plus the always-un-matched header 
and trailer records from file 2 in one output file.

The basic task is matching a file of keys-to-be-included (F1) with a data file 
(F2) containing those keys in a different position with many possible 
duplicates.  All duplicates in F2 are to be kept.  The data file (F2) also 
contains a header (assume a key of all zeroes) and a trailer (assume a key of 
all 9's) that never match.  Key length is 7 bytes.

This (modified) example from the PDF will get me the UN-matched F2 records:

//JK8 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//IN1 DD DSN=... input file1 (FB/40)
//IN2 DD DSN=... input file2 (VB/1000)
//SORTOUT DD DSN=... output file (VB/1000)
//SYSIN DD *
JOINKEYS F1=IN1,FIELDS=(1,7,A)
JOINKEYS F2=IN2,FIELDS=(33,7,A)
JOIN UNPAIRED,F2,ONLY
OPTION COPY
/*

How do I get MATCHED records from F2 only plus unmatched header and trailer 
from F2 in one output file?

TIA for any assistance you can offer.

Peter
--


This message and any attachments are intended only for the use of the addressee 
and may contain information that is privileged and confidential. If the reader 
of the message is not the intended recipient or an authorized representative of 
the intended recipient, you are hereby notified that any dissemination of this 
communication is strictly prohibited. If you have received this communication 
in error, please notify us immediately by e-mail and delete the message and any 
attachments from your system.

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

Re: IBM Z and cloud

2018-09-17 Thread Mohammad Khan

May be Ginny & friends don't want to be left out of all this cool cloud talk at 
the parties, so they made the claim. It's not like that there is a Cloud(TM) 
certifying authority that will shut them up :). Service bureaus were surely 
very much like clouds but were not called clouds and there are not many left 
that would let you run your own z/OS instance today.  

mkk


On Sat, 15 Sep 2018 13:21:50 -0400, Phil Smith III  wrote:

>OK, so what do we mean by "cloud"? What *customers* seem to mean is "a compute 
>platform where I can run my stuff but not have to deal with buying hardware 
>and racking and cabling it and in general all the work of running a data 
>center". By which definition, of course, traditional timesharing fits.
>
> 
>
>For x86, this is currently AWS and Google Cloud Platform and Microsoft Azure 
>(and not HPE Helion). For z, it's more like the IBM Dallas developer systems, 
>where you can rent a virtual machine that runs z/OS or z/VM or Linux, and then 
>do whatever you want with that OS.
>
> 
>
>My conclusion is that the vendors (and IBM) who are saying "IBM Z and cloud" 
>are not being honest with themselves. Calling a tail a leg doesn't make it 
>one, and saying "We like IBM Z and it *can* do cloud-ish stuff, therefore we 
>will say it's good for cloud" is not a rational (much less convincing) 
>argument.
>
> 
>
>Again, I'd love to be proven wrong. But the relative silence on this thread 
>tends to suggest that nobody else buys it either. Well, nobody besides Ginny & 
>Co.
>
> 
>
>.phsiii
>

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

Re: Help With PENDING OFFLINE Devices

2018-09-17 Thread George Rodriguez

Boy, I'm way over my head here:

F CATALOG,ALLOCATED(PCAT00)
IEC351I CATALOG ADDRESS SPACE MODIFY COMMAND ACTIVE
IEC348I ALLOCATED CATALOGS 976
*CAS***
* FLAGS -VOLSER-USER-CATALOG NAME   % *
* Y---R- PCAT00 0001 CATALOG.SCHOOL.USERCAT 1 *
* Y---R- PCAT00 0001 CATALOG.TAPEGDG.DB2.USERCAT1 *
* Y---R- PCAT00 0001 CATALOG.TAPEGDG.PROD.USERCAT   1 *
* Y---R- PCAT00 0001 CATALOG.FINANCE.USERCAT1 *
* Y---R- PCAT00 0001 CATALOG.BUDGET.USERCAT 1 *
* Y---R- PCAT00 0001 CATALOG.DFHSM.USERCAT  1 *
* Y-I-R- PCAT00 0001 CATALOG.SDPBC.USERCAT  1 *
***
* Y/N-ALLOCATED TO CAS, S-SMS, V-VLF, I-ISC, C-CLOSED, D-DELETED, *
* R-SHARED, A-ATL, E-ECS SHARED, K-LOCKED *
*CAS***
IEC352I CATALOG ADDRESS SPACE MODIFY COMMAND COMPLETED

and for the next one:

F CATALOG,ALLOCATED(PCAT01)
IEC351I CATALOG ADDRESS SPACE MODIFY COMMAND ACTIVE
IEC348I ALLOCATED CATALOGS 981
*CAS***
* FLAGS -VOLSER-USER-CATALOG NAME   % *
* Y---R- PCAT01 0001 CATALOG.TEST.USERCAT   1 *
* Y---R- PCAT01 0001 CATALOG.TAPEGDG.TEST.USERCAT   1 *
* Y---R- PCAT01 0001 CATALOG.TESTNEW.USERCAT1 *
* Y-I-R- PCAT01 0001 CATALOG.TSO.USERCAT1 *
***
* Y/N-ALLOCATED TO CAS, S-SMS, V-VLF, I-ISC, C-CLOSED, D-DELETED, *
* R-SHARED, A-ATL, E-ECS SHARED, K-LOCKED *
*CAS***
IEC352I CATALOG ADDRESS SPACE MODIFY COMMAND COMPLETED




*George Rodriguez*

*Specialist II - IT Security*
*PX - 47652*
*(561) 357-7652 (office)*
*(954) 415-7586 (mobile)*
*School District of Palm Beach County*
*3348 Forest Hill Blvd.*
*Room B-332*
*West Palm Beach, FL. 33406-5869*
*Florida's Only A-Rated Urban District*


On Mon, Sep 17, 2018 at 1:51 PM Dana Mitchell  wrote:

> For datasets allocated by your TSO session,  if you issue 'ddlist'
> command, you can look for datasets that you currently have allocated that
> are on the volumes in question.  Once found, you will have to discern if
> they are allocated in the actual logon proc,  or logon clist or rexx, or
> dynamically and  deal with them accordingly.
>
> For CATALOG,  issue console command   'F CATALOG,ALLOCATED(vvv)'
> where vv= volser,  to see what catalog(s) are on the volume that will
> need to be moved.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

-- 






*Disclaimer: *Under Florida law, e-mail addresses are public records. 
If you do not want your e-mail address released in response to a public 
records request, do not send electronic mail to this entity. Instead, 
contact this office by phone or in writing.








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

Re: Zosmf-revisit

2018-09-17 Thread scott Ford

Kurt,

Thank you kind sir, i appreciate it. I am going to try solution hopefully
In a day or so.

Scott
Idmworks

On Mon, Sep 17, 2018 at 9:14 AM Kurt Quackenbush  wrote:

> On 9/14/2018 3:51 PM, scott Ford wrote:
>
> > We have z/OS 2.3 RSU1709 installed and have ZOSMF up.
> > Using Postman i built a request and sent it to zosmf l..see below:
> >
> > https://10.1.1.2:10443/zosmf/restjobs/jobs/TCPIP/STC00062?step-data=Y
> >
> > I received this back:
> >
> > { "errorID": "IZUG846W", "errorMsg": "IZUG846W: An HTTP request for a
> > z/OSMF REST service was received from a remote site. The request was
> > rejected, however, because the remote site \"\" is not permitted to
> z/OSMF
> > server \"IZUSVR\" on target system \"10.1.1.2:10443\" ." }
>
> Check this out:
>
> https://superuser.com/questions/1355676/izug846w-an-http-request-for-a-z-osmf-rest-service-was-received-from-a-remote-s
>
> Kurt Quackenbush -- IBM, SMP/E Development
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
-- 
Scott Ford
IDMWORKS
z/OS Development

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

Re: Ken Tomiak's recent work

2018-09-17 Thread scott Ford

I knew of Ken through a mutual friend when I consulted in NYC.
His code was wonderful , he will be missed for sure.

Scott

On Mon, Sep 17, 2018 at 12:12 PM Ed Jaffe 
wrote:

> On 9/17/2018 8:07 AM, Sam Golob wrote:
> > It is with great sadness that I must inform you of the passing of our
> > dear friend, Ken Tomiak.
>
> Ken taught me A LOT about managing a Project at SHARE. He was a tireless
> volunteer and I'll always remember him walking down the conference halls
> with yellow ribbons from *FOUR DIFFERENT PROJECTS* hanging from a
> home-made ribbon holder.
>
> He has been and will continue to be missed...
>
> --
> Phoenix Software International
> Edward E. Jaffe
> 831 Parkview Drive North
> El Segundo, CA 90245
> https://www.phoenixsoftware.com/
>
>
> 
> This e-mail message, including any attachments, appended messages and the
> information contained therein, is for the sole use of the intended
> recipient(s). If you are not an intended recipient or have otherwise
> received this email message in error, any use, dissemination, distribution,
> review, storage or copying of this e-mail message and the information
> contained therein is strictly prohibited. If you are not an intended
> recipient, please contact the sender by reply e-mail and destroy all copies
> of this email message and do not otherwise utilize or retain this email
> message or any or all of the information contained therein. Although this
> email message and any attachments or appended messages are believed to be
> free of any virus or other defect that might affect any computer system
> into
> which it is received and opened, it is the responsibility of the recipient
> to ensure that it is virus free and no responsibility is accepted by the
> sender for any loss or damage arising in any way from its opening or use.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
-- 
Scott Ford
IDMWORKS
z/OS Development

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

Re: Spam alert: Model9

2018-09-17 Thread CM Poncelet

Yes, I had mentioned that: "(Yes, it can be spoofed - but the
headers/metadata show the spammer's real email ID.)" CP
 

On 16/09/2018 21:18, Seymour J Metz wrote:
> Be careful; spammers often forge headers, so it's safest to learn how to read 
> headers and to check the Received header fields to determine the actual 
> provenance of the spam.
>
> See also 
> http://www.medwayhosting.com/spam-l/deobfuscation-by-Shmuel/index.html
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
> 
> From: IBM Mainframe Discussion List  on behalf of 
> CM Poncelet 
> Sent: Saturday, September 15, 2018 11:18 AM
> To: IBM-MAIN@listserv.ua.edu
> Subject: Re: Spam alert: Model9
>
> FWIW SPAM mail can be sent to https://www.spamcop.net/ with a copy sent
> also to the spammer's email domain administrator (provided the
> abuse@ email ID is keyed into spamcop's spare 'copy-to' box
> that is).
>
> The spammer's email domain is the one following the '@' sign. The
> 'report abuse to administrator' email address for the spammer can then
> be found at 
> https://secure-web.cisco.com/11Rj0URRt6sLw_P2VizI4v2gdo26_pqiMBOP4zRkAM9-nlimjAnJlp6-HqEGNDK45XOhG_VTyx16nYKlAIefZOQmBra9MEF93HPIeLS5vbiAsFVzznEzHo2lSbXQvBnH38UQdlaGjh0FoMPuvBFVkKfKlCBLKlaZzbWslfmFqD5dTroH3mLYhTWW2-BpKFanB2QBw-KOxk-9bJxdS_VxcTS_e-V3LBt78MwqkwkTaFC9Pe27XGZ9RjDmjEydMCf-aKrgri83XGA-v0_4zruL8Mc6FiY11LtePMKgwlFflae5fq-bApl2L6OmK2rJ6fxWx5yGC5ZbmUNS-i4Sjt0Q_TbD7MEKvN8bydxHMmMYxno5rcBNluTJhs4-hLvVz4UFvMN6OhsxAGmGSLQBMR0y9oxuj5CYMaEklwXglSxfkWhROAtRqX2gQABZrZR7Zr0pd/https%3A%2F%2Fwww.whois.com%2F.
>  (Yes, it can be spoofed - but the
> headers/metadata show the spammer's real email ID.)
>
> This practically always stops any further junk mail being sent out.
>
> (BTW My filters store any emails from unrecognised senders - e.g. from
> Model9 - in my 'trash' folder, from where they are then deleted. So,
> NOPWAD.)
>
> HTH, CP
>
>
>
> On 14/09/2018 22:30, Arthur wrote:
>> On 14 Sep 2018 03:50:14 -0700, in bit.listserv.ibm-main
>> (Message-ID:<7316854461517568.wa.giliadwyahoo@listserv.ua.edu>)
>> 00d50942efa9-dmarc-requ...@listserv.ua.edu (Giliad Wilf) wrote:
>>
>>> Got this e-mail too, inspected it with some concerns, but finally
>>> opened it.
>>> It could prove useful, as the CEO advised my previous employer on
>>> performance issues we had, to our satisfaction.
>>> This CEO co-authored many IBM publications, both white and red, and
>>> was a visiting developer at IBM of some z/OS components.
>> If you know the CEO, tell him not to spam. Don't let spammers prosper.
>> It wouldn't be the first time a CEO didn't know what his marketing
>> people are doing.
>>
>> Also, I forwarded it to the edress in the anti-spam header:
>>> X-Report-Abuse-To: ab...@hubspot.com (see
>>> https://secure-web.cisco.com/1GujClvauL3cZ7Io1yNJWzrQB65DX2GHqmo7k9mSuX0Sw_X-mm6dI9Qi6EVPBrTOH1bNZmdgoKeqCGlQVoAkQHBsBRwEWzEUtgLBKc_OXDTtg9FYlTWokRgcLE2A0PMyKEUGrDJqOSv9MvA54e82tOnlC_8nzHszc-QYR18WjcIYd4GWOkx_PSaEwIPgkQ4CDw5dRThVxbmgCcfrz0gG9jfIQ7z-g6IHBxk8q8FI8aSUOB57tojOhkVtETICUfHE-_TVZtECjebk4N1dfijeEwuG435GtFJ-lnOcztvHRf5igqrrQB-wI6ferMNfOl-OOWPOr79Neji7M63YpKo-ChGzKU0NDnE3ASgupXuqc76ZV1P8vivc0Lvszw7JvqA80oVB7lEZlYS30wqvL6D4xxgz3jBHszeWYT9PF2Du5N3I5J5eA9hpKFn1dAYEArQ9cX17mBzGWPSUqFVmq4ieGAA/https%3A%2F%2Fwww.hubspot.com%2Fabuse-complaints%29
>> I'm not sure how much good it'll do, but I did get a response from
>> that. If the rest of you also report it, it might make a difference.
>> He did say they "will be investigating to ensure compliance with our
>> acceptable use policy."
>>
>> And, in reference to another post: I did not go to Share; I did not
>> subscribe; it was sent to this edress which I use *only* for 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: Help With PENDING OFFLINE Devices

2018-09-17 Thread Dana Mitchell

For datasets allocated by your TSO session,  if you issue 'ddlist' command, you 
can look for datasets that you currently have allocated that are on the volumes 
in question.  Once found, you will have to discern if they are allocated in the 
actual logon proc,  or logon clist or rexx, or dynamically and  deal with them 
accordingly.

For CATALOG,  issue console command   'F CATALOG,ALLOCATED(vvv)'  where 
vv= volser,  to see what catalog(s) are on the volume that will need to be 
moved.

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

Fwd: Why banks didn’t ‘rip and replace’ their mainframes | Network World

2018-09-17 Thread Mark Regan

https://www.networkworld.com/article/3305745/hardware/why-banks-didnt-rip-and-replace-their-mainframes.html
-- 

Regards,

Mark T. Regan

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

Re: Help With PENDING OFFLINE Devices

2018-09-17 Thread Lizette Koehler

There are probably vendor tools (shareware, freeway, $$$) that can help.  You 
need to identify what datasets are on the DASD that are OPEN.

However, you will need to do this manually

What files are on the DASD?

Who do they belong to?  Is there something like a DUMP dataset used by an STC

Is there something writing output to SYSPRINT that is a dataset on the DASD

JES2 could be a PROCLIB, but could also be something else

Could the JES2 INIT DECK be in a dataset on a volume?


You can use

D GRS,RES=(*,dataset-name-here)


You might need to do each and every dataset until you find the culprit(s)


Lizette



> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf Of
> George Rodriguez
> Sent: Monday, September 17, 2018 10:00 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Help With PENDING OFFLINE Devices
> 
> Mark,
> 
> How do I determine the resources used? If you're talking about dynamic
> allocation for TSO, yes I've implement that.
> 
> *George Rodriguez*
> 
> *Specialist II - IT Security*
> *PX - 47652*
> *(561) 357-7652 (office)*
> *(954) 415-7586 (mobile)*
> *School District of Palm Beach County*
> *3348 Forest Hill Blvd.*
> *Room B-332*
> *West Palm Beach, FL. 33406-5869*
> *Florida's Only A-Rated Urban District*
> 
> 
> On Mon, Sep 17, 2018 at 12:04 PM Mark Jacobs - Listserv <
> mark.jac...@custserv.com> wrote:
> 
> > Depends what the resources are. If proclibs, and you've implemented
> > dynamic proclibs you can work around it.
> >
> > Mark Jacobs
> >
> > George Rodriguez wrote on 9/17/18 11:58 AM:
> > Mike,
> >
> > You're a lifesaver... Most say they are owned by CATALOG, th2
> > remainder says either me (GRODRIG) or JES2. I can probably shutdown
> > CATALOG and LOGOFF, but what do I do about JES2?
> >
> > Thanks!
> >
> > *George Rodriguez*
> >
> > *Specialist II - IT Security*
> > *PX - 47652*
> > *(561) 357-7652 (office)*
> > *(954) 415-7586 (mobile)*
> > *School District of Palm Beach County*
> > *3348 Forest Hill Blvd.*
> > *Room B-332*
> > *West Palm Beach, FL. 33406-5869*
> > *Florida's Only A-Rated Urban District*
> >
> >
> > On Mon, Sep 17, 2018 at 11:42 AM Mike Shorkend
> >  > >
> > wrote:
> >
> > > The F-NRD means offline, not ready
> > > The A-PND means allocated, pending offline
> > >
> > > To find out who is allocated to the device you are trying to get
> > > offline, issue this command:
> > >
> > > D U,,ALLOC,xxx,1
> > >
> > > Where  is the device number
> > >
> > > HTH
> > >
> > > Mike
> > >
> > >
> > >
> > > On Mon, 17 Sep 2018 at 18:13, George Rodriguez <
> > > 016eebd7289b-dmarc-requ...@listserv.ua.edu > 016eebd7289b-dmarc-requ...@listserv.ua.edu>> wrote:
> > >
> > > > The STATUS the 7 disk are in is either A-PND or F-NRD.
> > > >
> > > > Can anyone help?
> > > >
> > > > Thanks in advance!
> > > >
> > > > *George Rodriguez*
> > > >
> > > > *Specialist II - IT Security*
> > > > *PX - 47652*
> > > > *(561) 357-7652 (office)*
> > > > *(954) 415-7586 (mobile)*
> > > > *School District of Palm Beach County*
> > > > *3348 Forest Hill Blvd.*
> > > > *Room B-332*
> > > > *West Palm Beach, FL. 33406-5869*
> > > > *Florida's Only A-Rated Urban District*
> > > >
> > > > --
> >
> > Mark Jacobs
> > Time Customer Service
> > Global Technology Services

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

Re: Help With PENDING OFFLINE Devices

2018-09-17 Thread Carmen Vitullo

very strange, that should show 

PROCLIB(PROC00) 
PROCLIB(PROC00) STATIC PROCLIB, 




STATIC PROCLIB's and dynamic proclib's allocated. 
using $DPROCLIB ? did you try that? 


vary the device address back online and look at the dataset entries on the 
volume via 3.4 or ISMF, that may give you a clue as to what had the volume 
allocated. 



Carmen Vitullo 

- Original Message -

From: "George Rodriguez" <016eebd7289b-dmarc-requ...@listserv.ua.edu> 
To: IBM-MAIN@LISTSERV.UA.EDU 
Sent: Monday, September 17, 2018 12:11:45 PM 
Subject: Re: Help With PENDING OFFLINE Devices 

This is what I got: 

$HASP003 RC=(52),D PROCLIB(*) - NO SELECTABLE ENTRIES FOUND 
$HASP003 MATCHING SPECIFICATION 

*George Rodriguez* 

*Specialist II - IT Security* 
*PX - 47652* 
*(561) 357-7652 (office)* 
*(954) 415-7586 (mobile)* 
*School District of Palm Beach County* 
*3348 Forest Hill Blvd.* 
*Room B-332* 
*West Palm Beach, FL. 33406-5869* 
*Florida's Only A-Rated Urban District* 


On Mon, Sep 17, 2018 at 1:03 PM Mark Jacobs - Listserv < 
mark.jac...@custserv.com> wrote: 

> Issue a $DPROCLIB(*) command and see if anything's returned. 
> 
> Mark Jacobs 
> 
> George Rodriguez wrote on 9/17/18 1:00 PM: 
> Mark, 
> 
> How do I determine the resources used? If you're talking about dynamic 
> allocation for TSO, yes I've implement that. 
> 
> *George Rodriguez* 
> 
> *Specialist II - IT Security* 
> *PX - 47652* 
> *(561) 357-7652 (office)* 
> *(954) 415-7586 (mobile)* 
> *School District of Palm Beach County* 
> *3348 Forest Hill Blvd.* 
> *Room B-332* 
> *West Palm Beach, FL. 33406-5869* 
> *Florida's Only A-Rated Urban District* 
> 
> 
> On Mon, Sep 17, 2018 at 12:04 PM Mark Jacobs - Listserv < 
> mark.jac...@custserv.com> wrote: 
> 
> > Depends what the resources are. If proclibs, and you've implemented 
> > dynamic proclibs you can work around it. 
> > 
> > Mark Jacobs 
> > 
> > George Rodriguez wrote on 9/17/18 11:58 AM: 
> > Mike, 
> > 
> > You're a lifesaver... Most say they are owned by CATALOG, th2 remainder 
> > says either me (GRODRIG) or JES2. I can probably shutdown CATALOG and 
> > LOGOFF, but what do I do about JES2? 
> > 
> > Thanks! 
> > 
> > *George Rodriguez* 
> > 
> > *Specialist II - IT Security* 
> > *PX - 47652* 
> > *(561) 357-7652 (office)* 
> > *(954) 415-7586 (mobile)* 
> > *School District of Palm Beach County* 
> > *3348 Forest Hill Blvd.* 
> > *Room B-332* 
> > *West Palm Beach, FL. 33406-5869* 
> > *Florida's Only A-Rated Urban District* 
> > 
> > 
> > On Mon, Sep 17, 2018 at 11:42 AM Mike Shorkend   
> > > 
> > wrote: 
> > 
> > > The F-NRD means offline, not ready 
> > > The A-PND means allocated, pending offline 
> > > 
> > > To find out who is allocated to the device you are trying to get 
> offline, 
> > > issue this command: 
> > > 
> > > D U,,ALLOC,xxx,1 
> > > 
> > > Where  is the device number 
> > > 
> > > HTH 
> > > 
> > > Mike 
> > > 
> > > 
> > > 
> > > On Mon, 17 Sep 2018 at 18:13, George Rodriguez < 
> > > 016eebd7289b-dmarc-requ...@listserv.ua.edu 016eebd7289b-dmarc-requ...@listserv.ua.edu> > 016eebd7289b-dmarc-requ...@listserv.ua.edu 016eebd7289b-dmarc-requ...@listserv.ua.edu>>> wrote: 
> > > 
> > > > The STATUS the 7 disk are in is either A-PND or F-NRD. 
> > > > 
> > > > Can anyone help? 
> > > > 
> > > > Thanks in advance! 
> > > > 
> > > > *George Rodriguez* 
> > > > 
> > > > *Specialist II - IT Security* 
> > > > *PX - 47652* 
> > > > *(561) 357-7652 (office)* 
> > > > *(954) 415-7586 (mobile)* 
> > > > *School District of Palm Beach County* 
> > > > *3348 Forest Hill Blvd.* 
> > > > *Room B-332* 
> > > > *West Palm Beach, FL. 33406-5869* 
> > > > *Florida's Only A-Rated Urban District* 
> > > > 
> > > > -- 
> > > > 
> > > > 
> > > > 
> > > > 
> > > > 
> > > > 
> > > > *Disclaimer: *Under Florida law, e-mail addresses are public records. 
> > > > If you do not want your e-mail address released in response to a 
> public 
> > > > records request, do not send electronic mail to this entity. Instead, 
> > > > contact this office by phone or in writing. 
> > > > 
> > > > 
> > > > 
> > > > 
> > > > 
> > > > 
> > > > 
> > > > 
> > > > 
> -- 
> > > > For IBM-MAIN subscribe / signoff / archive access instructions, 
> > > > send email to lists...@listserv.ua.edu lists...@listserv.ua.edu> lists...@listserv.ua.edu> 
> > with the message: INFO IBM-MAIN 
> > > > 
> > > 
> > > 
> > > -- 
> > > Mike Shorkend 
> > > m...@shorkend.com > 
> > > www.shorkend.com http://www.shorkend.com>> 
> > > Tel: +972524208743 
> > > Fax: +97239772196 
> > > 
> > >

Re: Help With PENDING OFFLINE Devices

2018-09-17 Thread Mark Jacobs - Listserv


Ok. Then you don't have dynamic proclib enabled.

You'll have to look in your JES2 procedure and see if any of the allocated 
proclib datasets are on those volumes. If so, you'll have to do some ugly work 
to get JES2 to unallocate those volumes.

Mark Jacobs

George Rodriguez wrote on 9/17/18 1:11 PM:
This is what I got:

$HASP003 RC=(52),D PROCLIB(*) - NO SELECTABLE ENTRIES FOUND
$HASP003 MATCHING SPECIFICATION

*George Rodriguez*

*Specialist II - IT Security*
*PX - 47652*
*(561) 357-7652 (office)*
*(954) 415-7586 (mobile)*
*School District of Palm Beach County*
*3348 Forest Hill Blvd.*
*Room B-332*
*West Palm Beach, FL. 33406-5869*
*Florida's Only A-Rated Urban District*


On Mon, Sep 17, 2018 at 1:03 PM Mark Jacobs - Listserv <
mark.jac...@custserv.com> wrote:


Issue a $DPROCLIB(*) command and see if anything's returned.

Mark Jacobs

George Rodriguez wrote on 9/17/18 1:00 PM:
Mark,

How do I determine the resources used? If you're talking about dynamic
allocation for TSO, yes I've implement that.

*George Rodriguez*

*Specialist II - IT Security*
*PX - 47652*
*(561) 357-7652 (office)*
*(954) 415-7586 (mobile)*
*School District of Palm Beach County*
*3348 Forest Hill Blvd.*
*Room B-332*
*West Palm Beach, FL. 33406-5869*
*Florida's Only A-Rated Urban District*


On Mon, Sep 17, 2018 at 12:04 PM Mark Jacobs - Listserv <
mark.jac...@custserv.com>
 wrote:

> Depends what the resources are. If proclibs, and you've implemented
> dynamic proclibs you can work around it.
>
> Mark Jacobs
>
> George Rodriguez wrote on 9/17/18 11:58 AM:
> Mike,
>
> You're a lifesaver... Most say they are owned by CATALOG, th2 remainder
> says either me (GRODRIG) or JES2. I can probably shutdown CATALOG and
> LOGOFF, but what do I do about JES2?
>
> Thanks!
>
> *George Rodriguez*
>
> *Specialist II - IT Security*
> *PX - 47652*
> *(561) 357-7652 (office)*
> *(954) 415-7586 (mobile)*
> *School District of Palm Beach County*
> *3348 Forest Hill Blvd.*
> *Room B-332*
> *West Palm Beach, FL. 33406-5869*
> *Florida's Only A-Rated Urban District*
>
>
> On Mon, Sep 17, 2018 at 11:42 AM Mike Shorkend 
mailto:mike.shork...@gmail.com>

> 
>
> wrote:
>
> > The F-NRD means offline, not ready
> > The A-PND means allocated, pending offline
> >
> > To find out who is allocated to the device you are trying to get
offline,
> > issue this command:
> >
> > D U,,ALLOC,xxx,1
> >
> > Where  is the device number
> >
> > HTH
> >
> > Mike
> >
> >
> >
> > On Mon, 17 Sep 2018 at 18:13, George Rodriguez <
> > 
016eebd7289b-dmarc-requ...@listserv.ua.edumailto:016eebd7289b-dmarc-requ...@listserv.ua.edu>> 
016eebd7289b-dmarc-requ...@listserv.ua.edumailto:016eebd7289b-dmarc-requ...@listserv.ua.edu
 wrote:
> >
> > > The STATUS the 7 disk are in is either A-PND or F-NRD.
> > >
> > > Can anyone help?
> > >
> > > Thanks in advance!
> > >
> > > *George Rodriguez*
> > >
> > > *Specialist II - IT Security*
> > > *PX - 47652*
> > > *(561) 357-7652 (office)*
> > > *(954) 415-7586 (mobile)*
> > > *School District of Palm Beach County*
> > > *3348 Forest Hill Blvd.*
> > > *Room B-332*
> > > *West Palm Beach, FL. 33406-5869*
> > > *Florida's Only A-Rated Urban District*
> > >
> > > --
> > >
> > >
> > >
> > >
> > >
> > >
> > > *Disclaimer: *Under Florida law, e-mail addresses are public records.
> > > If you do not want your e-mail address released in response to a
public
> > > records request, do not send electronic mail to this entity. Instead,
> > > contact this office by phone or in writing.
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
--
> > > For IBM-MAIN subscribe / signoff / archive access instructions,
> > > send email to 
lists...@listserv.ua.edumailto:lists...@listserv.ua.edu>>mailto:lists...@listserv.ua.edu>>
> with the message: INFO IBM-MAIN
> > >
> >
> >
> > --
> > Mike Shorkend
> > 
m...@shorkend.com
> > 
www.shorkend.com><
http://www.shorkend.com>>
> > Tel: +972524208743
> > Fax: +97239772196
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access

Re: Help With PENDING OFFLINE Devices

2018-09-17 Thread George Rodriguez

This is what I got:

$HASP003 RC=(52),D PROCLIB(*)  - NO SELECTABLE ENTRIES FOUND
$HASP003   MATCHING SPECIFICATION

*George Rodriguez*

*Specialist II - IT Security*
*PX - 47652*
*(561) 357-7652 (office)*
*(954) 415-7586 (mobile)*
*School District of Palm Beach County*
*3348 Forest Hill Blvd.*
*Room B-332*
*West Palm Beach, FL. 33406-5869*
*Florida's Only A-Rated Urban District*


On Mon, Sep 17, 2018 at 1:03 PM Mark Jacobs - Listserv <
mark.jac...@custserv.com> wrote:

> Issue a $DPROCLIB(*) command and see if anything's returned.
>
> Mark Jacobs
>
> George Rodriguez wrote on 9/17/18 1:00 PM:
> Mark,
>
> How do I determine the resources used? If you're talking about dynamic
> allocation for TSO, yes I've implement that.
>
> *George Rodriguez*
>
> *Specialist II - IT Security*
> *PX - 47652*
> *(561) 357-7652 (office)*
> *(954) 415-7586 (mobile)*
> *School District of Palm Beach County*
> *3348 Forest Hill Blvd.*
> *Room B-332*
> *West Palm Beach, FL. 33406-5869*
> *Florida's Only A-Rated Urban District*
>
>
> On Mon, Sep 17, 2018 at 12:04 PM Mark Jacobs - Listserv <
> mark.jac...@custserv.com> wrote:
>
> > Depends what the resources are. If proclibs, and you've implemented
> > dynamic proclibs you can work around it.
> >
> > Mark Jacobs
> >
> > George Rodriguez wrote on 9/17/18 11:58 AM:
> > Mike,
> >
> > You're a lifesaver... Most say they are owned by CATALOG, th2 remainder
> > says either me (GRODRIG) or JES2. I can probably shutdown CATALOG and
> > LOGOFF, but what do I do about JES2?
> >
> > Thanks!
> >
> > *George Rodriguez*
> >
> > *Specialist II - IT Security*
> > *PX - 47652*
> > *(561) 357-7652 (office)*
> > *(954) 415-7586 (mobile)*
> > *School District of Palm Beach County*
> > *3348 Forest Hill Blvd.*
> > *Room B-332*
> > *West Palm Beach, FL. 33406-5869*
> > *Florida's Only A-Rated Urban District*
> >
> >
> > On Mon, Sep 17, 2018 at 11:42 AM Mike Shorkend  
> > >
> > wrote:
> >
> > > The F-NRD means offline, not ready
> > > The A-PND means allocated, pending offline
> > >
> > > To find out who is allocated to the device you are trying to get
> offline,
> > > issue this command:
> > >
> > > D U,,ALLOC,xxx,1
> > >
> > > Where  is the device number
> > >
> > > HTH
> > >
> > > Mike
> > >
> > >
> > >
> > > On Mon, 17 Sep 2018 at 18:13, George Rodriguez <
> > > 016eebd7289b-dmarc-requ...@listserv.ua.edu 016eebd7289b-dmarc-requ...@listserv.ua.edu> > 016eebd7289b-dmarc-requ...@listserv.ua.edu 016eebd7289b-dmarc-requ...@listserv.ua.edu>>> wrote:
> > >
> > > > The STATUS the 7 disk are in is either A-PND or F-NRD.
> > > >
> > > > Can anyone help?
> > > >
> > > > Thanks in advance!
> > > >
> > > > *George Rodriguez*
> > > >
> > > > *Specialist II - IT Security*
> > > > *PX - 47652*
> > > > *(561) 357-7652 (office)*
> > > > *(954) 415-7586 (mobile)*
> > > > *School District of Palm Beach County*
> > > > *3348 Forest Hill Blvd.*
> > > > *Room B-332*
> > > > *West Palm Beach, FL. 33406-5869*
> > > > *Florida's Only A-Rated Urban District*
> > > >
> > > > --
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > > *Disclaimer: *Under Florida law, e-mail addresses are public records.
> > > > If you do not want your e-mail address released in response to a
> public
> > > > records request, do not send electronic mail to this entity. Instead,
> > > > contact this office by phone or in writing.
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> --
> > > > For IBM-MAIN subscribe / signoff / archive access instructions,
> > > > send email to lists...@listserv.ua.edu lists...@listserv.ua.edu> lists...@listserv.ua.edu>
> > with the message: INFO IBM-MAIN
> > > >
> > >
> > >
> > > --
> > > Mike Shorkend
> > > m...@shorkend.com >
> > > www.shorkend.com http://www.shorkend.com>>
> > > Tel: +972524208743
> > > Fax: +97239772196
> > >
> > > --
> > > For IBM-MAIN subscribe / signoff / archive access instructions,
> > > send email to lists...@listserv.ua.edu >
> > with the message: INFO IBM-MAIN
> > >
> >
> > --
> >
> >
> >
> >
> >
> >
> > *Disclaimer: *Under Florida law, e-mail addresses are public records.
> > If you do not want your e-mail address released in response to a public
> > records request, do not send electronic mail to this entity. Instead,
> > contact this office by phone or in writing.
> >
> >
> >
> >
> >
> >
> >
> >
> > --
> > For IBM-MAIN subscribe / signoff /

Re: Help With PENDING OFFLINE Devices

2018-09-17 Thread Mark Jacobs - Listserv

Issue a $DPROCLIB(*) command and see if anything's returned.

Mark Jacobs

George Rodriguez wrote on 9/17/18 1:00 PM:
Mark,

How do I determine the resources used? If you're talking about dynamic
allocation for TSO, yes I've implement that.

*George Rodriguez*

*Specialist II - IT Security*
*PX - 47652*
*(561) 357-7652 (office)*
*(954) 415-7586 (mobile)*
*School District of Palm Beach County*
*3348 Forest Hill Blvd.*
*Room B-332*
*West Palm Beach, FL. 33406-5869*
*Florida's Only A-Rated Urban District*

On Mon, Sep 17, 2018 at 12:04 PM Mark Jacobs - Listserv <
mark.jac...@custserv.com> wrote:

Depends what the resources are. If proclibs, and you've implemented
dynamic proclibs you can work around it.

Mark Jacobs

George Rodriguez wrote on 9/17/18 11:58 AM:
Mike,

You're a lifesaver... Most say they are owned by CATALOG, th2 remainder
says either me (GRODRIG) or JES2. I can probably shutdown CATALOG and
LOGOFF, but what do I do about JES2?

Thanks!

*George Rodriguez*

*Specialist II - IT Security*
*PX - 47652*
*(561) 357-7652 (office)*
*(954) 415-7586 (mobile)*
*School District of Palm Beach County*
*3348 Forest Hill Blvd.*
*Room B-332*
*West Palm Beach, FL. 33406-5869*
*Florida's Only A-Rated Urban District*

On Mon, Sep 17, 2018 at 11:42 AM Mike Shorkend 
mailto:mike.shork...@gmail.com>
>
wrote:

> The F-NRD means offline, not ready
> The A-PND means allocated, pending offline
>
> To find out who is allocated to the device you are trying to get offline,
> issue this command:
>
> D U,,ALLOC,xxx,1
>
> Where  is the device number
>
> HTH
>
> Mike
>
>
>
> On Mon, 17 Sep 2018 at 18:13, George Rodriguez <
> 
016eebd7289b-dmarc-requ...@listserv.ua.edumailto:016eebd7289b-dmarc-requ...@listserv.ua.edu>>>
 wrote:
>
> > The STATUS the 7 disk are in is either A-PND or F-NRD.
> >
> > Can anyone help?
> >
> > Thanks in advance!
> >
> > *George Rodriguez*
> >
> > *Specialist II - IT Security*
> > *PX - 47652*
> > *(561) 357-7652 (office)*
> > *(954) 415-7586 (mobile)*
> > *School District of Palm Beach County*
> > *3348 Forest Hill Blvd.*
> > *Room B-332*
> > *West Palm Beach, FL. 33406-5869*
> > *Florida's Only A-Rated Urban District*
> >
> > --
> >
> >
> >
> >
> >
> >
> > *Disclaimer: *Under Florida law, e-mail addresses are public records.
> > If you do not want your e-mail address released in response to a public
> > records request, do not send electronic mail to this entity. Instead,
> > contact this office by phone or in writing.
> >
> >
> >
> >
> >
> >
> >
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to 
lists...@listserv.ua.edu
with the message: INFO IBM-MAIN
> >
>
>
> --
> Mike Shorkend
> 
m...@shorkend.com
> 
www.shorkend.com>
> Tel: +972524208743
> Fax: +97239772196
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to 
lists...@listserv.ua.edu
with the message: INFO IBM-MAIN
>

--

*Disclaimer: *Under Florida law, e-mail addresses are public records.
If you do not want your e-mail address released in response to a public
records request, do not send electronic mail to this entity. Instead,
contact this office by phone or in writing.

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

Please be alert for any emails that may ask you for login information or
directs you to login via a link. If you believe this message is a phish or
aren't sure whether this message is trustworthy, please send the original
message as an attachment to 
'phish...@meredith.commailto:phish...@meredith.com>>'.

--

Mark Jacobs
Time Customer Service
Global Technology Services

The standard you walk past is the standard you accept.
Lt. Gen. David Morrison

This electronic message, including any attachments, may contain
proprietary, confidential or privileged information for the sole use of the
intended recipient(s). You are hereby notified that any unauthorized
disclosure, copying, distribution, or use of this message is prohibited. If
you have received this message in error, please immediately notify the
sender

Re: Yet Another Mainframe z10 Bites the Dust!

2018-09-17 Thread Chris Hoelscher

>>> Thanks for the warning on degaussing Timothy! *George Rodriguez*

Does Timothy *need* degaussing???

Chris Hoelscher
Technology Architect, Database Infrastructure Services
Technology Solution Services
Humana Inc.
123 East Main Street
Louisville, KY 40202
Humana.com
(502) 476-2538 or 407-7266

The information transmitted is intended only for the person or entity to which
it is addressed
and may contain CONFIDENTIAL material. If you receive this
material/information in error,
please contact the sender and delete or destroy the material/information.

Humana Inc. and its subsidiaries comply with applicable Federal civil rights
laws and
do not discriminate on the basis of race, color, national origin, age,
disability, sex,
sexual orientation, gender identity, or religion. Humana Inc. and its
subsidiaries do not
exclude people or treat them differently because of race, color, national
origin, age,
disability, sex, sexual orientation, gender identity, or religion.

English: ATTENTION: If you do not speak English, language assistance services,
free
of charge, are available to you. Call 1‐877‐320‐1235 (TTY: 711).

Español (Spanish): ATENCIÓN: Si habla español, tiene a su disposición servicios
gratuitos de asistencia lingüística. Llame al 1‐877‐320‐1235 (TTY: 711).

繁體中文(Chinese)：注意：如果您使用繁體中文，您可以免費獲得語言援助
服務。請致電 1‐877‐320‐1235 (TTY: 711)。

Kreyòl Ayisyen (Haitian Creole): ATANSION: Si w pale Kreyòl Ayisyen, gen sèvis
èd
pou lang ki disponib gratis pou ou. Rele 1‐877‐320‐1235 (TTY: 711).

Polski (Polish): UWAGA: Jeżeli mówisz po polsku, możesz skorzystać z bezpłatnej
pomocy językowej. Zadzwoń pod numer 1‐877‐320‐1235 (TTY: 711).

한국어 (Korean): 주의: 한국어를 사용하시는 경우, 언어 지원 서비스를 무료로
이용하실 수 있습니다. 1‐877‐320‐1235 (TTY: 711)번으로 전화해 주십시오.

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

Re: Help With PENDING OFFLINE Devices

2018-09-17 Thread George Rodriguez

Mark,

How do I determine the resources used? If you're talking about dynamic
allocation for TSO, yes I've implement that.

*George Rodriguez*

*Specialist II - IT Security*
*PX - 47652*
*(561) 357-7652 (office)*
*(954) 415-7586 (mobile)*
*School District of Palm Beach County*
*3348 Forest Hill Blvd.*
*Room B-332*
*West Palm Beach, FL. 33406-5869*
*Florida's Only A-Rated Urban District*


On Mon, Sep 17, 2018 at 12:04 PM Mark Jacobs - Listserv <
mark.jac...@custserv.com> wrote:

> Depends what the resources are. If proclibs, and you've implemented
> dynamic proclibs you can work around it.
>
> Mark Jacobs
>
> George Rodriguez wrote on 9/17/18 11:58 AM:
> Mike,
>
> You're a lifesaver... Most say they are owned by CATALOG, th2 remainder
> says either me (GRODRIG) or JES2. I can probably shutdown CATALOG and
> LOGOFF, but what do I do about JES2?
>
> Thanks!
>
> *George Rodriguez*
>
> *Specialist II - IT Security*
> *PX - 47652*
> *(561) 357-7652 (office)*
> *(954) 415-7586 (mobile)*
> *School District of Palm Beach County*
> *3348 Forest Hill Blvd.*
> *Room B-332*
> *West Palm Beach, FL. 33406-5869*
> *Florida's Only A-Rated Urban District*
>
>
> On Mon, Sep 17, 2018 at 11:42 AM Mike Shorkend  >
> wrote:
>
> > The F-NRD means offline, not ready
> > The A-PND means allocated, pending offline
> >
> > To find out who is allocated to the device you are trying to get offline,
> > issue this command:
> >
> > D U,,ALLOC,xxx,1
> >
> > Where  is the device number
> >
> > HTH
> >
> > Mike
> >
> >
> >
> > On Mon, 17 Sep 2018 at 18:13, George Rodriguez <
> > 016eebd7289b-dmarc-requ...@listserv.ua.edu 016eebd7289b-dmarc-requ...@listserv.ua.edu>> wrote:
> >
> > > The STATUS the 7 disk are in is either A-PND or F-NRD.
> > >
> > > Can anyone help?
> > >
> > > Thanks in advance!
> > >
> > > *George Rodriguez*
> > >
> > > *Specialist II - IT Security*
> > > *PX - 47652*
> > > *(561) 357-7652 (office)*
> > > *(954) 415-7586 (mobile)*
> > > *School District of Palm Beach County*
> > > *3348 Forest Hill Blvd.*
> > > *Room B-332*
> > > *West Palm Beach, FL. 33406-5869*
> > > *Florida's Only A-Rated Urban District*
> > >
> > > --
> > >
> > >
> > >
> > >
> > >
> > >
> > > *Disclaimer: *Under Florida law, e-mail addresses are public records.
> > > If you do not want your e-mail address released in response to a public
> > > records request, do not send electronic mail to this entity. Instead,
> > > contact this office by phone or in writing.
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > > --
> > > For IBM-MAIN subscribe / signoff / archive access instructions,
> > > send email to lists...@listserv.ua.edu
> with the message: INFO IBM-MAIN
> > >
> >
> >
> > --
> > Mike Shorkend
> > m...@shorkend.com
> > www.shorkend.com
> > Tel: +972524208743
> > Fax: +97239772196
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu
> with the message: INFO IBM-MAIN
> >
>
> --
>
>
>
>
>
>
> *Disclaimer: *Under Florida law, e-mail addresses are public records.
> If you do not want your e-mail address released in response to a public
> records request, do not send electronic mail to this entity. Instead,
> contact this office by phone or in writing.
>
>
>
>
>
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu
> with the message: INFO IBM-MAIN
>
>
> Please be alert for any emails that may ask you for login information or
> directs you to login via a link. If you believe this message is a phish or
> aren't sure whether this message is trustworthy, please send the original
> message as an attachment to 'phish...@meredith.com phish...@meredith.com>'.
>
>
> --
>
> Mark Jacobs
> Time Customer Service
> Global Technology Services
>
> The standard you walk past is the standard you accept.
> Lt. Gen. David Morrison
>
>
> This electronic message, including any attachments, may contain
> proprietary, confidential or privileged information for the sole use of the
> intended recipient(s). You are hereby notified that any unauthorized
> disclosure, copying, distribution, or use of this message is prohibited. If
> you have received this message in error, please immediately notify the
> sender by reply e-mail and delete it.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

-- 






*Disclaimer: *Under Florida law, e-mail addresses are public records. 
If you do not want

Re: Ken Tomiak's recent work

2018-09-17 Thread Ed Jaffe


On 9/17/2018 8:07 AM, Sam Golob wrote:
It is with great sadness that I must inform you of the passing of our 
dear friend, Ken Tomiak. 


Ken taught me A LOT about managing a Project at SHARE. He was a tireless 
volunteer and I'll always remember him walking down the conference halls 
with yellow ribbons from *FOUR DIFFERENT PROJECTS* hanging from a 
home-made ribbon holder.


He has been and will continue to be missed...

--
Phoenix Software International
Edward E. Jaffe
831 Parkview Drive North
El Segundo, CA 90245
https://www.phoenixsoftware.com/


This e-mail message, including any attachments, appended messages and the
information contained therein, is for the sole use of the intended
recipient(s). If you are not an intended recipient or have otherwise
received this email message in error, any use, dissemination, distribution,
review, storage or copying of this e-mail message and the information
contained therein is strictly prohibited. If you are not an intended
recipient, please contact the sender by reply e-mail and destroy all copies
of this email message and do not otherwise utilize or retain this email
message or any or all of the information contained therein. Although this
email message and any attachments or appended messages are believed to be
free of any virus or other defect that might affect any computer system into
which it is received and opened, it is the responsibility of the recipient
to ensure that it is virus free and no responsibility is accepted by the
sender for any loss or damage arising in any way from its opening or use.

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

Re: Help With PENDING OFFLINE Devices

2018-09-17 Thread Mark Jacobs - Listserv

Depends what the resources are. If proclibs, and you've implemented dynamic 
proclibs you can work around it.

Mark Jacobs

George Rodriguez wrote on 9/17/18 11:58 AM:
Mike,

You're a lifesaver... Most say they are owned by CATALOG, th2 remainder
says either me (GRODRIG) or JES2. I can probably shutdown CATALOG and
LOGOFF, but what do I do about JES2?

Thanks!

*George Rodriguez*

*Specialist II - IT Security*
*PX - 47652*
*(561) 357-7652 (office)*
*(954) 415-7586 (mobile)*
*School District of Palm Beach County*
*3348 Forest Hill Blvd.*
*Room B-332*
*West Palm Beach, FL. 33406-5869*
*Florida's Only A-Rated Urban District*

On Mon, Sep 17, 2018 at 11:42 AM Mike Shorkend 

wrote:

The F-NRD means offline, not ready
The A-PND means allocated, pending offline

To find out who is allocated to the device you are trying to get offline,
issue this command:

D U,,ALLOC,xxx,1

Where  is the device number

HTH

Mike

On Mon, 17 Sep 2018 at 18:13, George Rodriguez <
016eebd7289b-dmarc-requ...@listserv.ua.edu>
 wrote:

> The STATUS the 7 disk are in is either A-PND or F-NRD.
>
> Can anyone help?
>
> Thanks in advance!
>
> *George Rodriguez*
>
> *Specialist II - IT Security*
> *PX - 47652*
> *(561) 357-7652 (office)*
> *(954) 415-7586 (mobile)*
> *School District of Palm Beach County*
> *3348 Forest Hill Blvd.*
> *Room B-332*
> *West Palm Beach, FL. 33406-5869*
> *Florida's Only A-Rated Urban District*
>
> --
>
>
>
>
>
>
> *Disclaimer: *Under Florida law, e-mail addresses are public records.
> If you do not want your e-mail address released in response to a public
> records request, do not send electronic mail to this entity. Instead,
> contact this office by phone or in writing.
>
>
>
>
>
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with 
the message: INFO IBM-MAIN
>

--
Mike Shorkend
m...@shorkend.com
www.shorkend.com
Tel: +972524208743
Fax: +97239772196

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

--

*Disclaimer: *Under Florida law, e-mail addresses are public records.
If you do not want your e-mail address released in response to a public
records request, do not send electronic mail to this entity. Instead,
contact this office by phone or in writing.

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

Please be alert for any emails that may ask you for login information or directs you 
to login via a link. If you believe this message is a phish or aren't sure whether 
this message is trustworthy, please send the original message as an attachment to 
'phish...@meredith.com'.

--

Mark Jacobs
Time Customer Service
Global Technology Services

The standard you walk past is the standard you accept.
Lt. Gen. David Morrison

This electronic message, including any attachments, may contain proprietary, 
confidential or privileged information for the sole use of the intended 
recipient(s). You are hereby notified that any unauthorized disclosure, 
copying, distribution, or use of this message is prohibited. If you have 
received this message in error, please immediately notify the sender by reply 
e-mail and delete it.

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

Re: Help With PENDING OFFLINE Devices

2018-09-17 Thread George Rodriguez

Mike,

You're a lifesaver... Most say they are owned by CATALOG, th2 remainder
says either me (GRODRIG) or JES2. I can probably shutdown CATALOG and
LOGOFF, but what do I do about JES2?

Thanks!

*George Rodriguez*

*Specialist II - IT Security*
*PX - 47652*
*(561) 357-7652 (office)*
*(954) 415-7586 (mobile)*
*School District of Palm Beach County*
*3348 Forest Hill Blvd.*
*Room B-332*
*West Palm Beach, FL. 33406-5869*
*Florida's Only A-Rated Urban District*

On Mon, Sep 17, 2018 at 11:42 AM Mike Shorkend 
wrote:

> The F-NRD means offline, not ready
> The A-PND means allocated, pending offline
>
> To find out who is allocated to the device you are trying to get offline,
> issue this command:
>
> D U,,ALLOC,xxx,1
>
> Where  is the device number
>
> HTH
>
> Mike
>
>
>
> On Mon, 17 Sep 2018 at 18:13, George Rodriguez <
> 016eebd7289b-dmarc-requ...@listserv.ua.edu> wrote:
>
> > The STATUS the 7 disk are in is either A-PND or F-NRD.
> >
> > Can anyone help?
> >
> > Thanks in advance!
> >
> > *George Rodriguez*
> >
> > *Specialist II - IT Security*
> > *PX - 47652*
> > *(561) 357-7652 (office)*
> > *(954) 415-7586 (mobile)*
> > *School District of Palm Beach County*
> > *3348 Forest Hill Blvd.*
> > *Room B-332*
> > *West Palm Beach, FL. 33406-5869*
> > *Florida's Only A-Rated Urban District*
> >
> > --
> >
> >
> >
> >
> >
> >
> > *Disclaimer: *Under Florida law, e-mail addresses are public records.
> > If you do not want your e-mail address released in response to a public
> > records request, do not send electronic mail to this entity. Instead,
> > contact this office by phone or in writing.
> >
> >
> >
> >
> >
> >
> >
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
>
> --
> Mike Shorkend
> m...@shorkend.com
> www.shorkend.com
> Tel: +972524208743
> Fax: +97239772196
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

-- 

*Disclaimer: *Under Florida law, e-mail addresses are public records. 
If you do not want your e-mail address released in response to a public 
records request, do not send electronic mail to this entity. Instead, 
contact this office by phone or in writing.

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

Re: how to catalog page dataset to new MCAT

2018-09-17 Thread Allan Staller

REPRO  MERGECAT  is not applicable for the issue in the OP.
DEF RECATALOG is the way to go.

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
johnnydeep san
Sent: Saturday, September 15, 2018 6:19 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: how to catalog page dataset to new MCAT

I used  todd's jcl  and it ran fine but still getting same issue .

   REPRO INDATASET(CATALOG.Z110S.MASTER) -
00210004
 OUTDATASET(CATALOG.Z210M.MASTER) -
 00220004
 LEVEL(SYS1.PLPA.PAGE)-
 00221004
 MERGECAT
 00222004
IDC01460I THE NUMBER OF ENTRIES MERGED WAS 0

IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0



Should pagedatast locate in new master catalog(CATALOG.Z210M.MASTER)
volume ? .
I haven't  any page datasets in  new master catalog volume, it's located in
old  master catalog  volume . how to make understand this page datasets to
new master catalog ? .guide me.



On Fri, Sep 14, 2018 at 1:37 PM Carmen Vitullo  wrote:

> when creating a new master catalog I've always used the repro mergecat
> process to get my system datasets cataloged in the new mater catalog, and
> some catalog utilities will perform the mergecat without removing the
> entries from the original maaster catalog.
>
>
>
> Carmen Vitullo
>
> - Original Message -
>
> From: "retired mainframer" 
> To: IBM-MAIN@LISTSERV.UA.EDU
> Sent: Friday, September 14, 2018 11:37:55 AM
> Subject: Re: how to catalog page dataset to new MCAT
>
> > -Original Message-
> > From: IBM Mainframe Discussion List  On
> > Behalf Of johnnydeep san
> > Sent: Friday, September 14, 2018 4:05 AM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: how to catalog page dataset to new MCAT
> >
> > Hi All,
> >
> > I have created new master- catalog and load my system from it .While
> IPL'g
> > sys throw below
> >
> > IEA920I PAGE DATA SET SYS1.PLPA.PAGE
> > NOT LOCATED
> > IEA922D REPLY 'DSN=DSNAME' OR 'IGNORE'
>
> If the dataset already exists on your page volume, the advice from Paul
> and Todd should work. If it does not exist, you need to define it with
> IDCAMS. One of the parameters will let you specify the catalog.
>
> --
> 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
::DISCLAIMER::
--
The contents of this e-mail and any attachment(s) are confidential and intended 
for the named recipient(s) only. E-mail transmission is not guaranteed to be 
secure or error-free as information could be intercepted, corrupted, lost, 
destroyed, arrive late or incomplete, or may contain viruses in transmission. 
The e mail and its contents (with or without referred errors) shall therefore 
not attach any liability on the originator or HCL or its affiliates. Views or 
opinions, if any, presented in this email are solely those of the author and 
may not necessarily reflect the views or opinions of HCL or its affiliates. Any 
form of reproduction, dissemination, copying, disclosure, modification, 
distribution and / or publication of this message without the prior written 
consent of authorized representative of HCL is strictly prohibited. If you have 
received this email in error please delete it and notify the sender 
immediately. Before opening any email and/or attachments, please check them for 
viruses and other defects.
--

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

Re: Ken Tomiak's recent work

2018-09-17 Thread Tom Conley


On 9/17/2018 11:07 AM, Sam Golob wrote:

Dear Folks,

     It is with great sadness that I must inform you of the passing of 
our dear friend, Ken Tomiak.  As a tribute to him, and I think this is 
the best tribute we can offer him, I am making available his very 
considerable amount of work, which he did in his last couple of years. 
The reason I'm making his raw files available, is because there is too 
much valuable material there for me to sort through and post on the CBT 
Tape, and I want all the people out there to have a good look at his 
results, methods, and organizational precision in general.


     Therefore, please look at:

ftp://cbttape.org/pub/collections

where you will see three files:  ktomiak.intro, ktomiak.restore, and 
ktomiak.zip (which contains all his materials)


I'm sure you'll be glad you looked there.  Ken produced beautiful 
stuff.  It was meant to be used.


     All the best of everything to all of you.

Sincerely, Sam



FYI,

This is a tremendous loss for all of us.  Ken Tomiak was a prolific 
developer, and shared his knowledge freely.  When I was the Rexx Project 
Manager at SHARE in the mid-2000's, Ken became a fixture with his Rexx 
coding sessions.  The room was always packed, and Ken would create 
inch-thick handouts of Rexx code.  He was the Rexx TCP/IP socket 
interface guru, and his code shows that.  The fact that he left his code 
to the CBTTAPE shows the kind of guy he is.


As a friend, I'd lost touch with Ken over the last decade, chatting with 
him briefly on the phone or in Email about once a year.  I regret that 
in light of his passing.  Please take every opportunity to interact with 
the people that are important to you, for you never know when they will 
be gone.


RIP, my friend.

Regards,
Tom Conley

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

Re: Help With PENDING OFFLINE Devices

2018-09-17 Thread Neubert, Kevin

Not clear what you are trying to do.

D U,,ALLOC,devnum,n might help with the pending aspect.

Regards,

Kevin

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of George Rodriguez
Sent: Monday, September 17, 2018 8:13 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Help With PENDING OFFLINE Devices

The STATUS the 7 disk are in is either A-PND or F-NRD.

Can anyone help?

Thanks in advance!

*George Rodriguez*

*Specialist II - IT Security*
*PX - 47652*
*(561) 357-7652 (office)*
*(954) 415-7586 (mobile)*
*School District of Palm Beach County*
*3348 Forest Hill Blvd.*
*Room B-332*
*West Palm Beach, FL. 33406-5869*
*Florida's Only A-Rated Urban District*

-- 






*Disclaimer: *Under Florida law, e-mail addresses are public records. 
If you do not want your e-mail address released in response to a public records 
request, do not send electronic mail to this entity. Instead, contact this 
office by phone or in writing.








--
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: Help With PENDING OFFLINE Devices

2018-09-17 Thread Mike Shorkend

The F-NRD means offline, not ready
The A-PND means allocated, pending offline

To find out who is allocated to the device you are trying to get offline,
issue this command:

D U,,ALLOC,xxx,1

Where  is the device number

HTH

Mike



On Mon, 17 Sep 2018 at 18:13, George Rodriguez <
016eebd7289b-dmarc-requ...@listserv.ua.edu> wrote:

> The STATUS the 7 disk are in is either A-PND or F-NRD.
>
> Can anyone help?
>
> Thanks in advance!
>
> *George Rodriguez*
>
> *Specialist II - IT Security*
> *PX - 47652*
> *(561) 357-7652 (office)*
> *(954) 415-7586 (mobile)*
> *School District of Palm Beach County*
> *3348 Forest Hill Blvd.*
> *Room B-332*
> *West Palm Beach, FL. 33406-5869*
> *Florida's Only A-Rated Urban District*
>
> --
>
>
>
>
>
>
> *Disclaimer: *Under Florida law, e-mail addresses are public records.
> If you do not want your e-mail address released in response to a public
> records request, do not send electronic mail to this entity. Instead,
> contact this office by phone or in writing.
>
>
>
>
>
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


-- 
Mike Shorkend
m...@shorkend.com
www.shorkend.com
Tel: +972524208743
Fax: +97239772196

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

Help With PENDING OFFLINE Devices

2018-09-17 Thread George Rodriguez

The STATUS the 7 disk are in is either A-PND or F-NRD.

Can anyone help?

Thanks in advance!

*George Rodriguez*

*Specialist II - IT Security*
*PX - 47652*
*(561) 357-7652 (office)*
*(954) 415-7586 (mobile)*
*School District of Palm Beach County*
*3348 Forest Hill Blvd.*
*Room B-332*
*West Palm Beach, FL. 33406-5869*
*Florida's Only A-Rated Urban District*

-- 






*Disclaimer: *Under Florida law, e-mail addresses are public records. 
If you do not want your e-mail address released in response to a public 
records request, do not send electronic mail to this entity. Instead, 
contact this office by phone or in writing.








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

Re: Ken Tomiak's recent work

2018-09-17 Thread Blake, Daniel J [CTR]

No real timeframe and things can always be added.  I'll add those two.

Thanks

Dan


Dan Blake
Mainframe Engineering – Steady State
CSRA, a GDIT Company
dbl...@fdic.gov
Office: (703) 516-5497
Mobile: (703) 314-0501

OOO: Remote work – 09/17/2018 to 09/21/2018

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Sam Golob
Sent: Monday, September 17, 2018 11:08 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Ken Tomiak's recent work

Dear Folks,

     It is with great sadness that I must inform you of the passing of 
our dear friend, Ken Tomiak.  As a tribute to him, and I think this is 
the best tribute we can offer him, I am making available his very 
considerable amount of work, which he did in his last couple of years.  
The reason I'm making his raw files available, is because there is too 
much valuable material there for me to sort through and post on the CBT 
Tape, and I want all the people out there to have a good look at his 
results, methods, and organizational precision in general.

     Therefore, please look at:

ftp://cbttape.org/pub/collections

where you will see three files:  ktomiak.intro, ktomiak.restore, and 
ktomiak.zip (which contains all his materials)

I'm sure you'll be glad you looked there.  Ken produced beautiful 
stuff.  It was meant to be used.

     All the best of everything to all of you.

Sincerely, Sam

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

Ken Tomiak's recent work

2018-09-17 Thread Sam Golob


Dear Folks,

    It is with great sadness that I must inform you of the passing of 
our dear friend, Ken Tomiak.  As a tribute to him, and I think this is 
the best tribute we can offer him, I am making available his very 
considerable amount of work, which he did in his last couple of years.  
The reason I'm making his raw files available, is because there is too 
much valuable material there for me to sort through and post on the CBT 
Tape, and I want all the people out there to have a good look at his 
results, methods, and organizational precision in general.


    Therefore, please look at:

ftp://cbttape.org/pub/collections

where you will see three files:  ktomiak.intro, ktomiak.restore, and 
ktomiak.zip (which contains all his materials)


I'm sure you'll be glad you looked there.  Ken produced beautiful 
stuff.  It was meant to be used.


    All the best of everything to all of you.

Sincerely, Sam

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

Re: how to catalog page dataset to new MCAT

2018-09-17 Thread Vernooij, Kees (ITOPT1) - KLM

See message manual: you must receive either IEA930I or IEA922D. Did you?

Kees.


> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of johnnydeep san
> Sent: 17 September, 2018 16:59
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: how to catalog page dataset to new MCAT
> 
> i followed below jcl ,
> **Define a Page Space in another Catalog:
> 
>  //STEP1 EXEC PGM=IDCAMS
>  //VOLUME DD VOL=SER=VSER05,UNIT=DISK,DISP=OLD
> //SYSPRINT DD SYSOUT=A
>  //SYSIN DD * DEFINE ALIAS (NAME(SYS2) RELATE(MASTCAT.SYSTEM2))
> DEFINE PAGESPACE -
>(NAME(SYS2.PAGE2) -
> CYLINDERS(10) -
> VOLUMES(VSER05)
> ALTER SYS2.PAGE2 NEWNAME(SYS1.PAGE2) CATALOG(MASTCAT.SYSTEM2)
>  ALTER SYS2.PAGE2.DATA NEWNAME(SYS1.PAGE2.DATA) -
>  CATALOG(MASTCAT.SYSTEM2)
>  /*
> 
> this time i'm getting
> 
> "IEA247I USING IEASYS21 FOR z/OS 02.01.00 HBB7790
> 
> ISG313I SYSTEM IS INITIALIZING IN GRS NONE MODE.  RING OR STAR
> CONFIGURATION
>  KEYWORDS IN GRSCNF00 ARE IGNORED.
> 
> IEA836I PAGE DATA SET  SYS1.PAGE2
> 
>* NOT ALLOCATED - ERROR CODE 0264 INFORMATION CODE   *
> "
> 
> Guess, its understand page dataset but throws some error code.
> 
> Note : i have tried it in on  my RDZ .
> 
> 
> 
> 
> On Sun, Sep 16, 2018 at 4:11 PM Seymour J Metz  wrote:
> 
> > That depends. Best practice is to use unique names for the page
> datasets
> > in IEASYSxx PAGE=, in which case they don't present a conflicts.  You
> can
> > even have identical IEASYSxx members if you use static system symbols
> to
> > generate names specific to the LPAR.
> >
> >
> > --
> > Shmuel (Seymour J.) Metz
> > http://mason.gmu.edu/~smetz3
> >
> > 
> > From: IBM Mainframe Discussion List  on
> behalf
> > of retired mainframer 
> > Sent: Saturday, September 15, 2018 12:53 PM
> > To: IBM-MAIN@listserv.ua.edu
> > Subject: Re: how to catalog page dataset to new MCAT
> >
> > Will your Z110S and Z210M systems run simultaneously in different
> LPARs?
> > If so, then you do not want to copy the catalog entry.  This will
> cause
> > both systems to try to use the same page dataset on the same volume.
> In
> > this case you need to define new page datasets for Z210M.  See the
> "DEFINE
> > PAGESPACE" command in your "Access Method Services for Catalogs"
> manual.
> >
> > If the two systems will run in the same LPAR (obviously not
> > simultaneously) and you really want to use the same page datasets for
> both,
> > then you need to determine the names of the datasets in the current
> > system.  Look up the "D ASM" command in your "MVS System Commands"
> manual.
> > Then you can copy the catalog entries to your new master catalog
> **and**
> > update the PAGE parameter in your new IEASYSxx.
> >
> > > -Original Message-
> > > From: IBM Mainframe Discussion List  On
> > > Behalf Of johnnydeep san
> > > Sent: Saturday, September 15, 2018 4:19 AM
> > > To: IBM-MAIN@LISTSERV.UA.EDU
> > > Subject: Re: how to catalog page dataset to new MCAT
> > >
> > > I used  todd's jcl  and it ran fine but still getting same issue .
> > >
> > >REPRO INDATASET(CATALOG.Z110S.MASTER) -
> > > 00210004
> > >  OUTDATASET(CATALOG.Z210M.MASTER) -
> > >  00220004
> > >  LEVEL(SYS1.PLPA.PAGE)-
> > >  00221004
> > >  MERGECAT
> > >  00222004
> > > IDC01460I THE NUMBER OF ENTRIES MERGED WAS 0
> > >
> > > IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0
> > >
> > >
> > >
> > > Should pagedatast locate in new master catalog(CATALOG.Z210M.MASTER)
> > > volume ? .
> > > I haven't  any page datasets in  new master catalog volume, it's
> located
> > in
> > > old  master catalog  volume . how to make understand this page
> datasets
> > to
> > > new master catalog ? .guide me.
> >
> > --
> > 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 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

Re: how to catalog page dataset to new MCAT

2018-09-17 Thread johnnydeep san

i followed below jcl ,
**Define a Page Space in another Catalog:

 //STEP1 EXEC PGM=IDCAMS
 //VOLUME DD VOL=SER=VSER05,UNIT=DISK,DISP=OLD
//SYSPRINT DD SYSOUT=A
 //SYSIN DD * DEFINE ALIAS (NAME(SYS2) RELATE(MASTCAT.SYSTEM2))
DEFINE PAGESPACE -
   (NAME(SYS2.PAGE2) -
CYLINDERS(10) -
VOLUMES(VSER05)
ALTER SYS2.PAGE2 NEWNAME(SYS1.PAGE2) CATALOG(MASTCAT.SYSTEM2)
 ALTER SYS2.PAGE2.DATA NEWNAME(SYS1.PAGE2.DATA) -
 CATALOG(MASTCAT.SYSTEM2)
 /*

this time i'm getting

"IEA247I USING IEASYS21 FOR z/OS 02.01.00 HBB7790

ISG313I SYSTEM IS INITIALIZING IN GRS NONE MODE.  RING OR STAR
CONFIGURATION
 KEYWORDS IN GRSCNF00 ARE IGNORED.

IEA836I PAGE DATA SET  SYS1.PAGE2

   * NOT ALLOCATED - ERROR CODE 0264 INFORMATION CODE   *
"

Guess, its understand page dataset but throws some error code.

Note : i have tried it in on  my RDZ .




On Sun, Sep 16, 2018 at 4:11 PM Seymour J Metz  wrote:

> That depends. Best practice is to use unique names for the page datasets
> in IEASYSxx PAGE=, in which case they don't present a conflicts.  You can
> even have identical IEASYSxx members if you use static system symbols to
> generate names specific to the LPAR.
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
> 
> From: IBM Mainframe Discussion List  on behalf
> of retired mainframer 
> Sent: Saturday, September 15, 2018 12:53 PM
> To: IBM-MAIN@listserv.ua.edu
> Subject: Re: how to catalog page dataset to new MCAT
>
> Will your Z110S and Z210M systems run simultaneously in different LPARs?
> If so, then you do not want to copy the catalog entry.  This will cause
> both systems to try to use the same page dataset on the same volume.  In
> this case you need to define new page datasets for Z210M.  See the "DEFINE
> PAGESPACE" command in your "Access Method Services for Catalogs" manual.
>
> If the two systems will run in the same LPAR (obviously not
> simultaneously) and you really want to use the same page datasets for both,
> then you need to determine the names of the datasets in the current
> system.  Look up the "D ASM" command in your "MVS System Commands" manual.
> Then you can copy the catalog entries to your new master catalog **and**
> update the PAGE parameter in your new IEASYSxx.
>
> > -Original Message-
> > From: IBM Mainframe Discussion List  On
> > Behalf Of johnnydeep san
> > Sent: Saturday, September 15, 2018 4:19 AM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Re: how to catalog page dataset to new MCAT
> >
> > I used  todd's jcl  and it ran fine but still getting same issue .
> >
> >REPRO INDATASET(CATALOG.Z110S.MASTER) -
> > 00210004
> >  OUTDATASET(CATALOG.Z210M.MASTER) -
> >  00220004
> >  LEVEL(SYS1.PLPA.PAGE)-
> >  00221004
> >  MERGECAT
> >  00222004
> > IDC01460I THE NUMBER OF ENTRIES MERGED WAS 0
> >
> > IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0
> >
> >
> >
> > Should pagedatast locate in new master catalog(CATALOG.Z210M.MASTER)
> > volume ? .
> > I haven't  any page datasets in  new master catalog volume, it's located
> in
> > old  master catalog  volume . how to make understand this page datasets
> to
> > new master catalog ? .guide me.
>
> --
> 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: Connect to AWS from z/OS.

2018-09-17 Thread Pew, Curtis G

On Sep 17, 2018, at 7:10 AM, Nazih Noujaim  wrote:
> 
> Starting to do some research into calling AWS from z/OS. Success stories?
> 

I would also be interesting in hearing any success stories. One of my 
colleagues is currently investigating a “failure story”. It looks like the 
failure is due to AWS requiring  some of the newer encryption protocols which 
our current level of z/OS (2.2) doesn’t support. My colleague is trying to see 
if there’s some maintenance that would add support, but so far hasn’t found 
anything.

-- 
Pew, Curtis G
curtis@austin.utexas.edu
ITS Systems/Core/Administrative Services

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

Re: Running ISPF's 3.5 utility from a clist

2018-09-17 Thread ste...@copper.net

I'm using this post to try to answer another related post that I just can't 
find right now (my desktop Linux system crashed, so I am forced to use a 
webmail interface... It is a pain, but it kinda works).

There was a question about why one is doing this external to ISPF so that one 
doesn't have the stats.

Well, if you are using Panvalet and want to get the stats to ISPF, you will 
have to make them up. Panvalet does have an off load, but if you use it, you 
get NO stats. If you want stats you have to use a PAN#2 execution and tell it 
that you want the directory info with the "extdir" option. Now you get to take 
that output and massage it into ISPF stats info. You can do that for each 
member (as it comes out in member order). And there is some info that matches 
what ISPF does and some info that just does not. Then I used LMMSTATS to make 
it all happen. 

I've just been down this road (pan to PDSE).

And I think the same problem holds true with Librarian and if one is migrating 
from DOS to z/OS with ICCF (been years since I've touched that one).

Now let us assume that you have been doing development off mainframe and you 
want the stats from the file system where you are importing from

These are just a few reasons why one would need to "make up" stats. 

Regards,
Steve Thompson

--- steve.hor...@gmail.com wrote:

From: Steve Horein 
To:   IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [IBM-MAIN] Running ISPF's 3.5 utility from a clist
Date: Sat, 15 Sep 2018 20:03:04 -0500

+1 for LMMSTATS

On Fri, Sep 14, 2018 at 12:24 PM Jim Ruddy  wrote:

> Dave,
>
> Do you have the stats already from the generation of the members? Maybe I
> am missing something but is there a re reason you cannot use LMMSTATS to
> set the statistics for each member?
>
> Jim Ruddy
> Retired

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

Re: how to catalog page dataset to new MCAT

2018-09-17 Thread Carmen Vitullo

If you final requirement is to move only the catalog entries from one MCAT to 
another, and I emphasize MOVE, then you can use wildcards 
THIS IS JUST AND EXAMPLE 





//UCATDVR DD DSN=CATALOG.MASTER.ZOSV1R13,DISP=SHR 
//UCATNEW DD DSN=CATALOG.USERCAT.ZOSV2R1,DISP=SHR 
//DD1 DD VOL=SER=MVSSMP,UNIT=3390,DISP=OLD 
//SYSPRINT DD SYSOUT=* 
//SYSIN DD * 
REPRO ENTRIES(SMPE.JAVA71.**) - 
INFILE(UCATDVR) OUTFILE(UCATNEW) MERGECAT FILE(DD1) 

you can specify ENTRIES(SYS1.PLPA.**) also for example 


Carmen Vitullo 

- Original Message -

From: "Juan Escamilla"  
To: IBM-MAIN@LISTSERV.UA.EDU 
Sent: Monday, September 17, 2018 8:10:51 AM 
Subject: Re: how to catalog page dataset to new MCAT 

Use the same REPRO MERGCAT JCL that you used before, except change: 

LEVEL(SYS1.PLPA.PAGE) - 

to: 

ENT(SYS1.PLPA.PAGE) - 

Give that a try. 

-- 
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: Zosmf-revisit

2018-09-17 Thread Kurt Quackenbush


On 9/14/2018 3:51 PM, scott Ford wrote:


We have z/OS 2.3 RSU1709 installed and have ZOSMF up.
Using Postman i built a request and sent it to zosmf l..see below:

https://10.1.1.2:10443/zosmf/restjobs/jobs/TCPIP/STC00062?step-data=Y

I received this back:

{ "errorID": "IZUG846W", "errorMsg": "IZUG846W: An HTTP request for a
z/OSMF REST service was received from a remote site. The request was
rejected, however, because the remote site \"\" is not permitted to z/OSMF
server \"IZUSVR\" on target system \"10.1.1.2:10443\" ." }


Check this out:
https://superuser.com/questions/1355676/izug846w-an-http-request-for-a-z-osmf-rest-service-was-received-from-a-remote-s

Kurt Quackenbush -- IBM, SMP/E Development

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

Re: [EXTERNAL] IBM copy services Split and replicate option

2018-09-17 Thread Wheeler, Simon

Peter,

My command example contains mkpprc and rmpprc but it didn't get separated in 
the previous email!

E.g. something like;

mkpprc -dev IBM.2107-serial1 -remotedev IBM.2107-serial2 -type mmir -mode full 
-critmode A001-A06F:3001-306F 

rmpprc -dev IBM.2107-serial1 -remotedev IBM.2107-serial2 -at src -quiet 
A001-A06F:3001-306F

thanks,
Simon

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Wheeler, Simon
Sent: 17 September 2018 14:09
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [EXTERNAL] IBM copy services Split and replicate option

Hi Peter,

Once you have completed the configuration and have all volumes and paths 
defined, use the mkpprc and rmpprc commands to 'make' or 'remove' copy pairs.

E.g. something like;
mkpprc -dev IBM.2107-serial1 -remotedev IBM.2107-serial2 -type mmir -mode full 
-critmode A001-A06F:3001-306F rmpprc -dev IBM.2107-serial1 -remotedev 
IBM.2107-serial2 -at src -quiet A001-A06F:3001-306F

Note: serial1 and serial2 will be the serial numbers for the local and remote 
arrays - make sure this is the correct way around! These examples set up pairs 
for a range of CKD volumes, i.e. A001>3001, A002>3002, A003>3003 etc up to 
'6F'. You can do one at a time.

You'll get lots of messages like;
CMUC00153I mkpprc: Remote Mirror and Copy volume pair relationship 3001:A001 
successfully created. 

There's also the failoverpprc and failbackpprc commands for disaster recovery 
situations but I've not really played with these much so can't advise on these 
but they may be worth further reading.

thanks,
Simon

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Peter
Sent: 17 September 2018 04:51
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] IBM copy services Split and replicate option

WARNING: this email has originated from outside of the SSE Group. Please treat 
any links or attachments with caution.

**
Hi

Apology for the dummy query.

After TPCR, this is is the first I am looking at IBM Copy services .

Now we are in metro mirroring . Under IBM Copy services which option is that on 
which performs the breaking of replication and re-establishes the replication.

I am going through each options session , storage , paths , console but I am 
not getting clue

Is there anyone who is using IBM Copy services and can guide me a bit ?

Peter

--
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
**
SSE and associated brands: Southern Electric, Scottish Hydro, SWALEC and 
Atlantic are all trading names of SSE Electricity Limited registered in England 
and Wales number 04094263 (supply of electricity and Feed-In Tariffs); Southern 
Electric Gas Limited registered in England and Wales number 02716495 (supply of 
gas); SSE Retail Telecoms Limited registered in England and Wales number 
10086511 (supply of home phone and broadband); SSE Home Services Limited 
registered in Scotland number SC292102 (boiler and heating repair, servicing, 
cover, boiler Installations and electrical wiring cover); SSE Energy Solutions 
Limited registered in Scotland number SC386054 (energy efficiency installations 
and insulation products). All members of the SSE Group. The registered office 
of SSE Electricity Limited, Southern Electric Gas Limited and SSE Retail 
Telecoms Limited is No. 1 Forbury Place, 43 Forbury Road, Reading, RG1 3JH. The 
registered office of SSE Home Services Limited and SSE Energy Solutions Limited 
is Inveralmond House, 200 Dunkeld Road, Perth, PH1 3AQ. SSE Electricity Limited 
is an appointed representative of SSE Home Services Limited. SSE Home Services 
Limited is authorised and regulated by the Financial Conduct Authority (FCA) 
under reference number 695476. You can check this on the Financial Services 
Register by visiting the FCA website.
**


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

Re: how to catalog page dataset to new MCAT

2018-09-17 Thread Juan Escamilla

Use the same REPRO MERGCAT JCL that you used before, except change:

LEVEL(SYS1.PLPA.PAGE)-

to:

ENT(SYS1.PLPA.PAGE)-

Give that a try.

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

Re: [EXTERNAL] IBM copy services Split and replicate option

2018-09-17 Thread Wheeler, Simon

Hi Peter,

Once you have completed the configuration and have all volumes and paths 
defined, use the mkpprc and rmpprc commands to 'make' or 'remove' copy pairs.

E.g. something like;
mkpprc -dev IBM.2107-serial1 -remotedev IBM.2107-serial2 -type mmir -mode full 
-critmode A001-A06F:3001-306F
rmpprc -dev IBM.2107-serial1 -remotedev IBM.2107-serial2 -at src -quiet 
A001-A06F:3001-306F

Note: serial1 and serial2 will be the serial numbers for the local and remote 
arrays - make sure this is the correct way around! These examples set up pairs 
for a range of CKD volumes, i.e. A001>3001, A002>3002, A003>3003 etc up to 
'6F'. You can do one at a time.

You'll get lots of messages like;
CMUC00153I mkpprc: Remote Mirror and Copy volume pair relationship 3001:A001 
successfully created. 

There's also the failoverpprc and failbackpprc commands for disaster recovery 
situations but I've not really played with these much so can't advise on these 
but they may be worth further reading.

thanks,
Simon

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Peter
Sent: 17 September 2018 04:51
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] IBM copy services Split and replicate option

WARNING: this email has originated from outside of the SSE Group. Please treat 
any links or attachments with caution.

**
Hi

Apology for the dummy query.

After TPCR, this is is the first I am looking at IBM Copy services .

Now we are in metro mirroring . Under IBM Copy services which option is that on 
which performs the breaking of replication and re-establishes the replication.

I am going through each options session , storage , paths , console but I am 
not getting clue

Is there anyone who is using IBM Copy services and can guide me a bit ?

Peter

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

**
SSE and associated brands: Southern Electric, Scottish Hydro, SWALEC and 
Atlantic are all trading names of SSE Electricity Limited registered in England 
and Wales number 04094263 (supply of electricity and Feed-In Tariffs); Southern 
Electric Gas Limited registered in England and Wales number 02716495 (supply of 
gas); SSE Retail Telecoms Limited registered in England and Wales number 
10086511 (supply of home phone and broadband); SSE Home Services Limited 
registered in Scotland number SC292102 (boiler and heating repair, servicing, 
cover, boiler Installations and electrical wiring cover); SSE Energy Solutions 
Limited registered in Scotland number SC386054 (energy efficiency installations 
and insulation products). All members of the SSE Group. The registered office 
of SSE Electricity Limited, Southern Electric Gas Limited and SSE Retail 
Telecoms Limited is No. 1 Forbury Place, 43 Forbury Road, Reading, RG1 3JH. The 
registered office of SSE Home Services Limited and SSE Energy Solutions Limited 
is Inveralmond House, 200 Dunkeld Road, Perth, PH1 3AQ. SSE Electricity Limited 
is an appointed representative of SSE Home Services Limited. SSE Home Services 
Limited is authorised and regulated by the Financial Conduct Authority (FCA) 
under reference number 695476. You can check this on the Financial Services 
Register by visiting the FCA website.
**


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

Re: Installing zOS from scratch experience

2018-09-17 Thread John Eells


Peter wrote:

Thanks Tom and Parwez,

So the COD are built in IBM labs specifically for a scratch built ?



The COD is built as a more-or-less normal z/OS ServerPac, with 
operational data sets added to provide a functional system you can use 
for z/OS installationm then stripped down and put on DVD with standalone 
DSF and DSS.  ("There is no magic.")


As Parwez said, get the Redbook.  There are a number of other steps 
involved, such as creating or editing an IOCDS, configuring the disk 
arrays, and so on, and all of them should be covered in the book.


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

Re: how to catalog page dataset to new MCAT

2018-09-17 Thread Tom Marchant

On Sat, 15 Sep 2018 07:19:22 -0400, johnnydeep san wrote:

>I used  todd's jcl  and it ran fine but still getting same issue .
>
>IDC01460I THE NUMBER OF ENTRIES MERGED WAS 0
>
>IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0

It didn't do what you wanted it to do.
Probably because of the way you specified what to select.

-- 
Tom Marchant

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

Re: ASCRE and ACEE inheritance

2018-09-17 Thread Robin Atwood

The hook produced an 0C4 but that served the purpose. The TCB chain is 
IEEVAR00->IEAVTSDT->IEEPRWI2. The last module is, unsurprisingly, involved in 
STC initialisation and links to the exit. 

Robin

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

Re: Co-posted: Rexx performance measures

2018-09-17 Thread Tom Marchant

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 Model    2965   CPU Type Code    00
>Physical CPUs    4  Processor Name   Z10#T03
>Total MIPS   375.52 SU/Second    4553.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/lsprITRzOSv2r2?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

Re: Report volumes with IPLText

2018-09-17 Thread John Eells


Jesse 1 Robinson wrote:

IIRC, every volume initialized by ICKDSF--is there any other way?--will contain 
code in the IPLTEXT area that loads a wait state 00F, which says that no IPL 
text exists, unless that area has been rewritten with true IPL text. So you 
might write a program that looks for the 00F wait state code and infer that 
otherwise it has actual IPL text. You work for the guvment, right?



I believe that's right.  That IPL text loads the "no IPL text" wait 
state, about which we have, um, perhaps not been entirely honest with 
you about for all these years.


It's not that there's *no* IPL text, in other words, but that there's no 
IPL text that will actually do anything useful.


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

Connect to AWS from z/OS.

2018-09-17 Thread Nazih Noujaim

HI everyone

I saw the previous posts about z and the cloud. 

Starting to do some research into calling AWS from z/OS. Success stories?

Thank You in advance.

Nazih





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

Re: "Library Server" Access Now "Forbidden"?

2018-09-17 Thread John Eells


John Eells wrote:

I cannot speak for anyone else, but I have been on vacation the past two 
weeks and do not know the current state of affairs.  I can try to find 
out what's happening with this later today if time allows and the people 
I'd need to ask about it are available.


I'd missed Sue's response in the clutter of unread posts (sorry). 
Please ignore the one above!


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

Re: "Library Server" Access Now "Forbidden"?

2018-09-17 Thread John Eells

David Staudacher wrote:

The link you included has nothing to do with your post.

I should have realized the link might resolve differently for anyone either not connected
to Claus Mikkelsen, and/or not a member of his "Mainframe Support Tips"
LinkedIn group. My fault.

But Claus' post is quite germane, so I'll copy it here [emphasis mine]:

"If you haven't noticed I can inform you IBM has CLOSED DOWN their good old and well
functioning BookManager Site on the internet. This means that a lot of the links in my
tips does not work anymore. I apologise for any inconvenience. Maybe I will fix this
problem some day, but I will not make any promises".

I posted a reply to him, requesting the source of information for his assertion that IBM had CLOSED DOWN Bookmanger
internet access, and with a link to assurances given here that the outage is "unplanned",
"unintentional", to "stay tuned" and that "work is under way to restore access to it as
quickly as possible".

I have yet to hear a reply, but am nonetheless unconvinced he doesn't have some
kind of insider knowledge we lack. And that the lack of any further assurances
from John, Scott or Susan on the matter also has me very concerned. Claus
isn't the only one with hundreds of published links to pages on the Bookmanager
site which no longer work and will never work again unless access is restored.

I cannot speak for anyone else, but I have been on vacation the past two
weeks and do not know the current state of affairs. I can try to find
out what's happening with this later today if time allows and the people
I'd need to ask about it are available.

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

Re: Yet Another Mainframe z10 Bites the Dust!

2018-09-17 Thread George Rodriguez

Thanks for the warning on degaussing Timothy! I appreciate it! We chose not
to use encryption, why I'm not sure. If there's a next time, that'll happen!

*George Rodriguez*

*Specialist II - IT Security*
*PX - 47652*
*(561) 357-7652 (office)*
*(954) 415-7586 (mobile)*
*School District of Palm Beach County*
*3348 Forest Hill Blvd.*
*Room B-332*
*West Palm Beach, FL. 33406-5869*
*Florida's Only A-Rated Urban District*


On Sat, Sep 15, 2018 at 8:51 PM Timothy Sipples  wrote:

> Kees Vernooij wrote:
> >Some VTL's (a.o. TS77xx) have a backend tapelibrary
> >with physical tapes. They need to be erased too.
> >When we dismissed our STK tapelibrary, we hired a
> >degausser to erase the data on the tapes.
>
> FYI, modern tape media, including all IBM 3592 series, have prerecorded
> servo tracks. Degaussing such tape media will not only erase the data but
> will also render the tapes unable to store any future data.
>
> Tape cartridges are designed for mobility, and in my view (I'm not alone)
> they are the highest priority for implementation of storage-level
> encryption. All IBM 3592 family tape drives beginning with the IBM TS1120
> support tape device-level encryption. You just have to configure it and
> follow the implementation steps to use it. Then, when it comes time to
> dispose media, you either destroy or retain the keys, and you're done --
> and the tape media can be sold or donated, and reused.
>
> If you haven't encrypted your tapes and need to protect data then please
> consider overwriting the tapes so that they can be sold or donated. There
> is often some value in the tape media. Degaussing, however, means the tape
> cartridges are trashed, hopefully recycled for their materials in an
> environmentally responsible way.
>
> Hard drives are much the same and have been for many years. Degaussing
> utterly destroys them.
>
>
> 
> Timothy Sipples
> IT Architect Executive, Industry Solutions, IBM Z & LinuxONE,
> Multi-Geography
> E-Mail: sipp...@sg.ibm.com
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

-- 






*Disclaimer: *Under Florida law, e-mail addresses are public records. 
If you do not want your e-mail address released in response to a public 
records request, do not send electronic mail to this entity. Instead, 
contact this office by phone or in writing.








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

Re: ASCRE and ACEE inheritance

2018-09-17 Thread Robin Atwood

I will have to put an XDC hook in the initialisation exit and poke around.
It looks like the temporary data sets at least have been allocated. We don't
get this problem with systems where 
TEMPDSN is not active in RACF.

An RCF will perhaps clarify the situation but I don't think it will solve my
problem!

Thanks
Robin

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of Peter Hunkeler
Sent: 17 September 2018 15:56
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: ASCRE and ACEE inheritance

 
>Apologies for the delay in replying but your response got flagged as spam
somewhere and I did not see it. I finally found it in the archives! 
 

My bad. The flag had been set by GMX, and I badly missed to remove it from
the subject when replying. I recognized after sending, and for a quick
moment thought to correct and resend, but then decided otherwise. Ag...
I'm sorry.



>I am not sure where the original ACEE of the child STC is coming from since
both it and the parent STC have similar JCL procedure names that match to
the same RACF rule. So the ACEE could be coming from the RACF rule or it
could be inherited (like with forked address spaces or jobs submitted via
internal reader). My problem is that there seem to be two sets of rules in
play: the data sets allocated by JCL get the original STC's ACEE and the
dynamically allocated ones get the new ACEE I set in the address space
initialisation exit (in ASXBSENV). The doc states that the initialisation
exit runs before the JCL procedure but perhaps some JCL processing happens
at the same time. 




I'm surely not authoritative to write "this is how it works", but the
statement "It executes in the new address space before the procedure
identified by SYS1.PROCLIB." Is foggy. A procedure is not executed, programs
are. Your problem makes clear that this part of the documentation should be
enhanced:


- Is the INIT routine run under the region control task, or under the stated
task control task (I suspect the latter)?
- Have any allocations asked for via DD statement in the procedure already
been done? Your observation seems to indicate: yes, they have.


Would an RCF be sufficient?


--
Peter Hunkeler






-- 
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: ASCRE and ACEE inheritance

2018-09-17 Thread Peter Hunkeler


>Apologies for the delay in replying but your response got flagged as spam 
>somewhere and I did not see it. I finally found it in the archives!


My bad. The flag had been set by GMX, and I badly missed to remove it from the 
subject when replying. I recognized after sending, and for a quick moment 
thought to correct and resend, but then decided otherwise. Ag... I'm sorry.



>I am not sure where the original ACEE of the child STC is coming from since 
>both it and the parent STC have similar JCL procedure names that match to the 
>same RACF rule. So the ACEE could be coming from the RACF rule or it could be 
>inherited (like with forked address spaces or jobs submitted via internal 
>reader). My problem is that there seem to be two sets of rules in play: the 
>data sets allocated by JCL get the original STC's ACEE and the dynamically 
>allocated ones get the new ACEE I set in the address space initialisation exit 
>(in ASXBSENV). The doc states that the initialisation exit runs before the JCL 
>procedure but perhaps some JCL processing happens at the same time.




I'm surely not authoritative to write "this is how it works", but the statement 
"It executes in the new address space before the procedure identified by 
SYS1.PROCLIB." Is foggy. A procedure is not executed, programs are. Your 
problem makes clear that this part of the documentation should be enhanced:


- Is the INIT routine run under the region control task, or under the stated 
task control task (I suspect the latter)?
- Have any allocations asked for via DD statement in the procedure already been 
done? Your observation seems to indicate: yes, they have.


Would an RCF be sufficient?


--
Peter Hunkeler






--
Peter Hunkeler

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

Re: ASCRE and ACEE inheritance

2018-09-17 Thread Robin Atwood

Peter-
Apologies for the delay in replying but your response got flagged as spam 
somewhere and I did not see it. I finally found it in the archives!

I am not sure where the original ACEE of the child STC is coming from since 
both it and the parent STC have similar JCL procedure names that match to the 
same RACF rule. So the ACEE could be coming from the RACF rule or it could be 
inherited (like with forked address spaces or jobs submitted via internal 
reader). My problem is that there seem to be two sets of rules in play: the 
data sets allocated by JCL get the original STC's ACEE and the dynamically 
allocated ones get the new ACEE I set in the address space initialisation exit 
(in ASXBSENV). The doc states that the initialisation exit runs before the JCL 
procedure but perhaps some JCL processing happens at the same time.

Thanks
Robin

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

63 matches

Mail list logo