Re: z/OS Container Extensions

[Jousma, David]

I've seen bits and piecesI believe It's a blackbox secure setup.   No 
on-site Linux administration aside from application admin or maintenance 
required, no ROOT access.  All handled by IBM AFAIK.   

_
Dave Jousma
AVP | Manager, Systems Engineering  

Fifth Third Bank  |  1830 East Paris Ave, SE  |  MD RSCB2H  |  Grand Rapids, MI 
49546
616.653.8429  |  fax: 616.653.2717



-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Frank Swarbrick
Sent: Thursday, May 16, 2019 3:02 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: z/OS Container Extensions

**CAUTION EXTERNAL EMAIL**

**DO NOT open attachments or click on links from unknown senders or unexpected 
emails**

Don't really know anything about this, but does anyone know what advantage 
there is to running a Docker container on z/OS over just running it Linux for 
Z?  Is it just for those who don't have Linux for Z but want to run Linux 
applications on the mainframe?  Does it allow "direct access" to z/OS resources 
(databases, CICS, etc.)?

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

**DO NOT open attachments or click on links from unknown senders or unexpected 
emails**


This e-mail transmission contains information that is confidential and may be 
privileged.   It is intended only for the addressee(s) named above. If you 
receive this e-mail in error, please do not read, copy or disseminate it in any 
manner. If you are not the intended recipient, any disclosure, copying, 
distribution or use of the contents of this information is prohibited. Please 
reply to the message immediately by informing the sender that the message was 
misdirected. After replying, please erase it from your computer system. Your 
assistance in correcting this error is appreciated.

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

Re: TSO Reconnect ABEND=S622

[Mark Jacobs]

DMZ shouldn't matter. What's the logic in the IEFUTL exit? Is it doing 
different things based on system?

Mark Jacobs


Sent from ProtonMail, Swiss-based encrypted email.

GPG Public Key - 
https://api.protonmail.ch/pks/lookup?op=get=markjac...@protonmail.com

‐‐‐ Original Message ‐‐‐
On Thursday, May 16, 2019 4:39 PM, Roland Kinsman  wrote:

> IEFUTL is exactly the same on both systems.
>
> Not sure if this is helpful, but the system with the short timeout is "in the 
> DMZ"
>
> 
>
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

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

Re: z/OS Container Extensions

[Mike Schwab]

Kind of like a z/OS address space.  Includes application and user
software and database software.  Allows the hypervisor on a server to
switch quickly to other applications instead of waiting for more
transactions.

On Thu, May 16, 2019 at 6:12 PM Farley, Peter x23353
 wrote:
>
> Dumb question for the day: What exactly is a "Docker Container"?  Is there a 
> very simple overview tutorial anywhere of what it does and how it does it 
> that a mainframe programmer (with a small smattering of *ix knowledge) could 
> use to understand what they are and how they could be used in z/OS?
>
> Peter
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
> Behalf Of Tina M Tarquinio
> Sent: Thursday, May 16, 2019 3:26 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: z/OS Container Extensions
>
> You can check out the details here -->
> https://www.ibm.com/support/z-content-solutions/container-extensions/
>
> There are some FAQs that cover what you ask below, and more!
>
> And if that doesnt cover it, we can get the team to meet with you
> directly!
>
>
> Tina M. Tarquinio
> Director, IBM z/OS  | @tinatarq | tina...@us.ibm.com
>
> From:   Frank Swarbrick 
> To: IBM-MAIN@LISTSERV.UA.EDU
> Date:   05/16/2019 03:03 PM
> Subject:[EXTERNAL] z/OS Container Extensions
> Sent by:IBM Mainframe Discussion List 
>
> Don't really know anything about this, but does anyone know what advantage
> there is to running a Docker container on z/OS over just running it Linux
> for Z?  Is it just for those who don't have Linux for Z but want to run
> Linux applications on the mainframe?  Does it allow "direct access" to
> z/OS resources (databases, CICS, etc.)?
>
> --
>
> 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



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

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

Re: z/OS Container Extensions

[Farley, Peter x23353]

Dumb question for the day: What exactly is a "Docker Container"?  Is there a 
very simple overview tutorial anywhere of what it does and how it does it that 
a mainframe programmer (with a small smattering of *ix knowledge) could use to 
understand what they are and how they could be used in z/OS?

Peter

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Tina M Tarquinio
Sent: Thursday, May 16, 2019 3:26 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: z/OS Container Extensions

You can check out the details here --> 
https://www.ibm.com/support/z-content-solutions/container-extensions/

There are some FAQs that cover what you ask below, and more!

And if that doesnt cover it, we can get the team to meet with you 
directly!


Tina M. Tarquinio
Director, IBM z/OS  | @tinatarq | tina...@us.ibm.com

From:   Frank Swarbrick 
To: IBM-MAIN@LISTSERV.UA.EDU
Date:   05/16/2019 03:03 PM
Subject:[EXTERNAL] z/OS Container Extensions
Sent by:IBM Mainframe Discussion List 

Don't really know anything about this, but does anyone know what advantage 
there is to running a Docker container on z/OS over just running it Linux 
for Z?  Is it just for those who don't have Linux for Z but want to run 
Linux applications on the mainframe?  Does it allow "direct access" to 
z/OS resources (databases, CICS, etc.)?

--

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: z/OS Container Extensions

[David Purdy]

We learned at Share Phoenix that the Linux kernel is Ubuntu.

David


On Thursday, May 16, 2019 Jousma, David  wrote:
I've seen bits and piecesI believe It's a blackbox secure setup.  No 
on-site Linux administration aside from application admin or maintenance 
required, no ROOT access.  All handled by IBM AFAIK.  

_
Dave Jousma
AVP | Manager, Systems Engineering  

Fifth Third Bank  |  1830 East Paris Ave, SE  |  MD RSCB2H  |  Grand Rapids, MI 
49546
616.653.8429  |  fax: 616.653.2717



-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Frank Swarbrick
Sent: Thursday, May 16, 2019 3:02 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: z/OS Container Extensions

**CAUTION EXTERNAL EMAIL**

**DO NOT open attachments or click on links from unknown senders or unexpected 
emails**

Don't really know anything about this, but does anyone know what advantage 
there is to running a Docker container on z/OS over just running it Linux for 
Z?  Is it just for those who don't have Linux for Z but want to run Linux 
applications on the mainframe?  Does it allow "direct access" to z/OS resources 
(databases, CICS, etc.)?

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

**DO NOT open attachments or click on links from unknown senders or unexpected 
emails**


This e-mail transmission contains information that is confidential and may be 
privileged.  It is intended only for the addressee(s) named above. If you 
receive this e-mail in error, please do not read, copy or disseminate it in any 
manner. If you are not the intended recipient, any disclosure, copying, 
distribution or use of the contents of this information is prohibited. Please 
reply to the message immediately by informing the sender that the message was 
misdirected. After replying, please erase it from your computer system. Your 
assistance in correcting this error is appreciated.

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

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

Re: z/OS Container Extensions

[Farley, Peter x23353]

Tina,

Thanks for the link, but when viewed in IE11 none of the FAQ answers wraps at 
the screen boundary, and there is no slide bar at the bottom to slide the image 
to be able to see the rest of the text.

It seems to work just fine in Firefox 60.6.3ESR, just not in IE11.

Peter

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Tina M Tarquinio
Sent: Thursday, May 16, 2019 3:26 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: z/OS Container Extensions

You can check out the details here --> 
https://www.ibm.com/support/z-content-solutions/container-extensions/

There are some FAQs that cover what you ask below, and more!

And if that doesnt cover it, we can get the team to meet with you 
directly!

Tina M. Tarquinio
Director, IBM z/OS  | @tinatarq | tina...@us.ibm.com

From:   Frank Swarbrick 
To: IBM-MAIN@LISTSERV.UA.EDU
Date:   05/16/2019 03:03 PM
Subject:[EXTERNAL] z/OS Container Extensions
Sent by:IBM Mainframe Discussion List 

Don't really know anything about this, but does anyone know what advantage 
there is to running a Docker container on z/OS over just running it Linux 
for Z?  Is it just for those who don't have Linux for Z but want to run 
Linux applications on the mainframe?  Does it allow "direct access" to 
z/OS resources (databases, CICS, etc.)?

--

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: [External] Re: Ancient DASD connectivity

[Tony Harminc]

On Thu, 16 May 2019 at 12:50, Alan Altmark  wrote:


> Disk, tape, and unit record devices of the same era had discrete
> controllers.   Unit record CU (2821) was interesting in that it talked to
> devices that did different things: 1403/1404 printer and 2540 card
> reader-punch.  Clever of them.
>

Another way to think of the 2821 is as a bridge between "modern" (S/360)
channel protocols, and "legacy" (1401-style) devices like the 1403 printer.

Tony H.

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

Re: [External] Re: Ancient DASD connectivity

[Seymour J Metz]

Some legacy devices, e.g., 1301, had external controllers, e.g., 7631.


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


From: IBM Mainframe Discussion List  on behalf of 
Tony Harminc 
Sent: Thursday, May 16, 2019 3:34 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [External] Re: Ancient DASD connectivity

On Thu, 16 May 2019 at 12:50, Alan Altmark  wrote:


> Disk, tape, and unit record devices of the same era had discrete
> controllers.   Unit record CU (2821) was interesting in that it talked to
> devices that did different things: 1403/1404 printer and 2540 card
> reader-punch.  Clever of them.
>

Another way to think of the 2821 is as a bridge between "modern" (S/360)
channel protocols, and "legacy" (1401-style) devices like the 1403 printer.

Tony H.

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

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

Re: DFDSS copy to pre-allocated dsn

[Jackson, Rob]

Please post the full message.  That 001 is not the reason code; that should be 
right after 'NOT PROCESSED'.  If the reason code were actually 1, for an 
un-moveable dataset, I'd say add FORCE.

You could also just delete the target.

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Elaine Beal
Sent: Thursday, May 16, 2019 5:51 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: DFDSS copy to pre-allocated dsn

[External Email]

I've found a lot of " it's " confusing comments on this topic and I am 
beleaguered- I am trying to copy a file to an existing, pre-allocated new name.
Seems that should be pretty straight forward... but having to specify rename to 
make a copy is anything but straight forward

I'm getting ADR380E (001)-FDSCO(08) indicating REPLACEUNCONDITIONAL is not 
specified but I get this whether I specify it or not-


  COPY DATASET(INCLUDE(SYS7.R30.V22.ROOT.HFS))  -
  LOGINDDNAME(DASD1)  -
  OUTDDNAME(DASD2,DASD3,DASD4)  -
  RENAMEU((SYS7.R30.V22.ROOT.HFS,   -
  SYS7.R30.V22.RSU.ROOT.HFS)) -
  REPLACEUNCONDITIONAL   -
  NULLSTORCLAS BYPASSACS(**) -
  ALLDATA(*) ALLEXCP CANCELERROR -
  SHARE -
  WRITECHECK

Thanks for any help-
Elaine

--
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: z/OS Container Extensions

[Farley, Peter x23353]

And I should have added before sending: Not a PHB airline magazine overview, a 
COBOL-and-assembler-programmer-level explanation.

Peter

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Farley, Peter x23353
Sent: Thursday, May 16, 2019 7:12 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: z/OS Container Extensions

Dumb question for the day: What exactly is a "Docker Container"?  Is there a 
very simple overview tutorial anywhere of what it does and how it does it that 
a mainframe programmer (with a small smattering of *ix knowledge) could use to 
understand what they are and how they could be used in z/OS?

Peter

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Tina M Tarquinio
Sent: Thursday, May 16, 2019 3:26 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: z/OS Container Extensions

You can check out the details here -->
https://www.ibm.com/support/z-content-solutions/container-extensions/

There are some FAQs that cover what you ask below, and more!

And if that doesnt cover it, we can get the team to meet with you directly!


Tina M. Tarquinio
Director, IBM z/OS  | @tinatarq | tina...@us.ibm.com

From:   Frank Swarbrick 
To: IBM-MAIN@LISTSERV.UA.EDU
Date:   05/16/2019 03:03 PM
Subject:[EXTERNAL] z/OS Container Extensions
Sent by:IBM Mainframe Discussion List 

Don't really know anything about this, but does anyone know what advantage 
there is to running a Docker container on z/OS over just running it Linux 
for Z?  Is it just for those who don't have Linux for Z but want to run 
Linux applications on the mainframe?  Does it allow "direct access" to 
z/OS resources (databases, CICS, etc.)?

--

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: z/OS Container Extensions

[Tina M Tarquinio]

You can check out the details here --> 
https://www.ibm.com/support/z-content-solutions/container-extensions/

There are some FAQs that cover what you ask below, and more!

And if that doesnt cover it, we can get the team to meet with you 
directly!


Tina M. Tarquinio
Director, IBM z/OS  | @tinatarq | tina...@us.ibm.com








From:   Frank Swarbrick 
To: IBM-MAIN@LISTSERV.UA.EDU
Date:   05/16/2019 03:03 PM
Subject:[EXTERNAL] z/OS Container Extensions
Sent by:IBM Mainframe Discussion List 



Don't really know anything about this, but does anyone know what advantage 
there is to running a Docker container on z/OS over just running it Linux 
for Z?  Is it just for those who don't have Linux for Z but want to run 
Linux applications on the mainframe?  Does it allow "direct access" to 
z/OS resources (databases, CICS, etc.)?

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

DFDSS copy to pre-allocated dsn

[Elaine Beal]

I've found a lot of " it's " confusing comments on this topic and I am 
beleaguered-
I am trying to copy a file to an existing, pre-allocated new name.
Seems that should be pretty straight forward... but having to specify rename to 
make a copy is anything but straight forward

I'm getting ADR380E (001)-FDSCO(08) indicating REPLACEUNCONDITIONAL is not 
specified 
but I get this whether I specify it or not-


  COPY DATASET(INCLUDE(SYS7.R30.V22.ROOT.HFS))  -
  LOGINDDNAME(DASD1)  -
  OUTDDNAME(DASD2,DASD3,DASD4)  -
  RENAMEU((SYS7.R30.V22.ROOT.HFS,   -
  SYS7.R30.V22.RSU.ROOT.HFS)) -
  REPLACEUNCONDITIONAL   -
  NULLSTORCLAS BYPASSACS(**) -
  ALLDATA(*) ALLEXCP CANCELERROR -
  SHARE -
  WRITECHECK

Thanks for any help-
Elaine

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

Re: [External] Re: Ancient DASD connectivity

[Seymour J Metz]

> Disk, tape, and unit record devices of the same era had discrete controllers.

Some did, but not all.


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


From: IBM Mainframe Discussion List  on behalf of 
Alan Altmark 
Sent: Thursday, May 16, 2019 12:50 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [External] Re: Ancient DASD connectivity

On Wed, 15 May 2019 18:12:19 -0500, Tom Marchant  
wrote:
>The s/360 POO (available on bitsavers), says,
>"A control unit may be housed separately or it may be physically
>and logically integral with the I/O device."

The classic example of early CU integration was the 2701 communications 
controller and the integrated CTC adapters.

Disk, tape, and unit record devices of the same era had discrete controllers.   
Unit record CU (2821) was interesting in that it talked to devices that did 
different things: 1403/1404 printer and 2540 card reader-punch.  Clever of them.

But the up-and-coming display devices (3275) and printers (3211) were a visible 
hybrid with an "attached" CU.  3211 still named it separately (3811).  Kinda 
weird.

3430 tape had integrated CU in the A units, and after that I think integrated 
CU was de rigueur for all device types, with 3990 being the last one on the 
floor.  (BTW, once someone explains CU integration, the whole A/B model 
numbering thing makes more sense.)  I had always assumed that latency was 
driving engineers to shorten the distance between CU and device.

Alan Altmark
IBM

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

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

Re: z/OS Container Extensions

[Ed Jaffe]

On 5/16/2019 12:01 PM, Frank Swarbrick wrote:

Don't really know anything about this, but does anyone know what advantage there is to 
running a Docker container on z/OS over just running it Linux for Z?  Is it just for 
those who don't have Linux for Z but want to run Linux applications on the mainframe?  
Does it allow "direct access" to z/OS resources (databases, CICS, etc.)?


Suppose your z/OS-resident application wants to access a microservice 
that runs on Linux? Do you want the request to go off platform, across 
interfaces you don't necessarily trust, into systems whose performance 
characteristics you don't necessarily understand, and whose maintenance 
schedules and downtime philosophies might not align with yours? Or would 
you prefer bullet-proof, secure, z/OS performance and infrastructure 
behind that microservice so you know it will be there when you need it 
-- guaranteed? I know what my answer is...



--
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: TSO Reconnect ABEND=S622

[Roland Kinsman]

IEFUTL is exactly the same on both systems.

Not sure if this is helpful, but the system with the short timeout is "in the 
DMZ"

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

Re: DFDSS copy to pre-allocated dsn

[scott Ford]

Same names on a rename

On Thu, May 16, 2019 at 5:51 PM Elaine Beal  wrote:

> I've found a lot of " it's " confusing comments on this topic and I am
> beleaguered-
> I am trying to copy a file to an existing, pre-allocated new name.
> Seems that should be pretty straight forward... but having to specify
> rename to make a copy is anything but straight forward
>
> I'm getting ADR380E (001)-FDSCO(08) indicating REPLACEUNCONDITIONAL is not
> specified
> but I get this whether I specify it or not-
>
>
>   COPY DATASET(INCLUDE(SYS7.R30.V22.ROOT.HFS))  -
>   LOGINDDNAME(DASD1)  -
>   OUTDDNAME(DASD2,DASD3,DASD4)  -
>   RENAMEU((SYS7.R30.V22.ROOT.HFS,   -
>   SYS7.R30.V22.RSU.ROOT.HFS)) -
>   REPLACEUNCONDITIONAL   -
>   NULLSTORCLAS BYPASSACS(**) -
>   ALLDATA(*) ALLEXCP CANCELERROR -
>   SHARE -
>   WRITECHECK
>
> Thanks for any help-
> Elaine
>
> --
> 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: DFDSS copy to pre-allocated dsn

[Mike Schwab]

So you are making 3 copies on 3 different OUTDDNAMES?
If it is one dataset on 3 volumes it would be one OUTDDNAME, right?

On Thu, May 16, 2019 at 4:51 PM Elaine Beal  wrote:
>
> I've found a lot of " it's " confusing comments on this topic and I am 
> beleaguered-
> I am trying to copy a file to an existing, pre-allocated new name.
> Seems that should be pretty straight forward... but having to specify rename 
> to make a copy is anything but straight forward
>
> I'm getting ADR380E (001)-FDSCO(08) indicating REPLACEUNCONDITIONAL is not 
> specified
> but I get this whether I specify it or not-
>
>
>   COPY DATASET(INCLUDE(SYS7.R30.V22.ROOT.HFS))  -
>   LOGINDDNAME(DASD1)  -
>   OUTDDNAME(DASD2,DASD3,DASD4)  -
>   RENAMEU((SYS7.R30.V22.ROOT.HFS,   -
>   SYS7.R30.V22.RSU.ROOT.HFS)) -
>   REPLACEUNCONDITIONAL   -
>   NULLSTORCLAS BYPASSACS(**) -
>   ALLDATA(*) ALLEXCP CANCELERROR -
>   SHARE -
>   WRITECHECK
>
> Thanks for any help-
> Elaine
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: [External] Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

[Pommier, Rex]

John,

I'm running 2.2 as well.  I was able to run it successfully copying 2 datasets 
to a tape.  And just for kicks and giggles, I removed the TYPRUN parm and it 
dumped the 2 datasets to a single tape. 

Here's my JCL/parms:

//STEP005 EXEC  PGM=ADRDSSU,REGION=0M,PARM='TYPRUN=NORUN'  
//SYSPRINT DD  SYSOUT=*
//DASD1DD  UNIT=3390,VOL=SER=S10057,DISP=SHR   
//OUTVOL1  DD  UNIT=VTS,DISP=(,CATLG), 
//DSN=RRP.PHYS.DUMP
//SYSIN   DD  *
   DUMP DATASET( - 
  INCLUDE(   - 
  RRP.ROCKET.SJHNCLIB- 
  RRP.ROCKET.SJHNLOAD- 
  )) - 
CANCELERROR  - 
OPT(4) ALLDATA(*) ALLEXCP- 
INDDNAME(DASD1)  - 
OUTDDNAME(   - 
  OUTVOL1- 
 )   - 
TOL(ENQF)- 
WAIT(1,1)  
/* 

And my output:

ADR101I (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'DUMP '
   
ADR109I (R/I)-RI01 (01), 2019.136 14:32:16 INITIAL SCAN OF USER CONTROL 
STATEMENTS COMPLETED   
ADR146I (R/I)-RI03 (15), OBSOLETE KEYWORD INDDNAME SPECIFIED. PHYSINDDNAME WILL 
BE USED
ADR016I (001)-PRIME(01), RACF LOGGING OPTION IN EFFECT FOR THIS TASK
   
ADR006I (001)-STEND(01), 2019.136 14:32:16 EXECUTION BEGINS 
   
ADR329I (001)-DTDS (01), DATA SET DUMP OF VOLUME S10057 BEGINS ON TAPE A04491 
SEQUENCE 0001
ADR329I (001)-DTDS (02), DATA SET DUMP OF VOLUME S10057 ENDS ON TAPE A04491 
SEQUENCE 0001  
ADR378I (001)-DTDS (01), THE FOLLOWING DATA SETS WERE SUCCESSFULLY PROCESSED 
FROM VOLUME S10057
  RRP.ROCKET.SJHNCLIB   
   
  RRP.ROCKET.SJHNLOAD   
   
ADR006I (001)-STEND(02), 2019.136 14:32:17 EXECUTION ENDS   
   
ADR013I (001)-CLTSK(01), 2019.136 14:32:17 TASK COMPLETED WITH RETURN CODE  
   
ADR012I (SCH)-DSSU (01), 2019.136 14:32:17 DFSMSDSS PROCESSING COMPLETE. 
HIGHEST RETURN CODE IS    

So, yes, DFDSS is OK dumping more than one physical dataset to a tape.

Rex

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
John Dawes
Sent: Thursday, May 16, 2019 11:55 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [External] Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

 Rex,I tried both INDDNAME & PHYSINDD as well.  I can confirm that both dsns 
are on the same volume.Maybe you can try a test to see if you can do a 
successful Physical backup of 2 dsns.I am curious if it works for you.  I am 
running V2R02.0 
On Thursday, 16 May 2019, 4:47:56 pm UTC, Pommier, Rex 
 wrote:  
 
 John,

Do you need to change your INDDNAME to PHYSINDD?  The 2.2 manual indicates that 
INDDNAME is used for full or track copying and PHYSINDD is used for datasets.  
Are both the datasets you're going after on the same volume?

Rex

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
John Dawes
Sent: Thursday, May 16, 2019 10:21 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [External] Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

 I tried your suggestion but it didn't work:
ADR129E (001)-RI01 (01), KEYWORD '      ' IS IMPROPER 

    On Thursday, 16 May 2019, 3:13:43 pm UTC, Mike Schwab 
 wrote:  
 
 
https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.adru000/r2298.htm

INCLUDE(data.set.one, -
                data.set.two)

Commas are REQUIRED.

On Thu, May 16, 2019 at 9:51 AM John Dawes 
<00ff0e22811f-dmarc-requ...@listserv.ua.edu> wrote:
>
> G'Day,
> I am encountering a problem performing a Physical dataset backup of 
> several dsn which are on a specific volume.  For some reason it doesn't work. 
> I receive the error message ADR129E (001)-RI01 (01), KEYWORD '      ' IS 
> IMPROPER Below is the job output and the JCL.  Can you spot my error?  Does 
> DFDSS support a phyisical backup of multiple dsns?
> ADR031I (SCH)-PRIME(01), TYPRUN=NORUN REQUESTED. TASKS WILL EXECUTE 
> INNORUN MODE DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)        -                    
>               DATASET(INCLUDE(HESP.IMS.PROD.MATRIX              -             
>                                  HESP.NETVIEW.PRF))     

Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

[Pommier, Rex]

I just changed my SYSIN to look as close to identical to yours as I can see, 
given the formatting problems you're having, and it still worked.  Regarding 
the "column 1" question David had, I just tried it, and all DFDSS did was 
ignore the first character of the dataset name and tell me it couldn't find 
"RP.ROCKET.SJHNLOAD" and continue on its merry way.

  DUMP  INDDNAME(DASD1) OUTDDNAME(OUTVOL1) -   
DATASET(INCLUDE(RRP.ROCKET.SJHNCLIB -  
RRP.ROCKET.SJHNLOAD))   -  
TOL(ENQF)- 
OPT(4) ALLDATA(*) ALLEXCP  

Rex

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Jousma, David
Sent: Thursday, May 16, 2019 1:13 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [External] Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

This would be correct syntax.  Comma's are optional, dash is not.   By your 
other post where you said it worked with one dataset, it almost looks like your 
HESP. Dataset name starts in column 1? 

//SYSINDD  *
  DUMP INDDNAME(DASD1) OUTDDNAME(TAPE1)-
DATASET(INCLUDE(HESP.IMS.PROD.MATRIX-
HESP.NETVIEW.PRF))-  
TOL(ENQF)  -
OPT(4) ALLDATA(*) ALLEXCP
/*

_
Dave Jousma
AVP | Manager, Systems Engineering  

Fifth Third Bank  |  1830 East Paris Ave, SE  |  MD RSCB2H  |  Grand Rapids, MI 
49546
616.653.8429  |  fax: 616.653.2717



-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
John Dawes
Sent: Thursday, May 16, 2019 11:10 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

**CAUTION EXTERNAL EMAIL**

**DO NOT open attachments or click on links from unknown senders or unexpected 
emails**

 John,The - or , are both acceptable.  I use the - all the time and never had a 
problem.
On Thursday, 16 May 2019, 2:59:16 pm UTC, John McKown 
 wrote:  
 
 It's hard for me to read the reformatted text. But you need a comma between 
the two DSNs in the INCLUDE list. I don't see any comma.

On Thu, May 16, 2019 at 9:51 AM John Dawes < 
00ff0e22811f-dmarc-requ...@listserv.ua.edu> wrote:

> G'Day,
> I am encountering a problem performing a Physical dataset backup of 
>several dsn which are on a specific volume.  For some reason it doesn't 
>work. I receive the error message ADR129E (001)-RI01 (01), KEYWORD '      '
> IS IMPROPER
> Below is the job output and the JCL.  Can you spot my error?  Does 
>DFDSS  support a phyisical backup of multiple dsns?
> ADR031I (SCH)-PRIME(01), TYPRUN=NORUN REQUESTED. TASKS WILL EXECUTE 
>INNORUN MODE DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)        -
>                DATASET(INCLUDE(HESP.IMS.PROD.MATRIX              -
>                                      HESP.NETVIEW.PRF))          -
>                      TOL(ENQF)            -        OPT(4)ALLDATA(*) 
>ALLEXCP  ADR101I (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO 
>COMMAND  'DUMP'
>
> ADR109I (R/I)-RI01 (01), 2019.136 10:21:19 INITIAL SCAN OF USER 
> CONTROLSTATEMENT
>
> ADR129E (001)-RI01 (01), KEYWORD '    ' IS IMPROPER
>
> ADR131E (001)-RI03 (01), ABOVE TEXT BYPASSED UNTIL NEXT COMMAND
>
> ADR017E (001)-CLTSK(01), 2019.136 10:21:19 TASK NOT SCHEDULED DUE TOERROR.
> TASK
>
> /*
>
> //NORUN  EXECPGM=ADRDSSU,REGION=4096K,PARM='TYPRUN=NORUN'
>
> //*STEP1  EXECPGM=ADRDSSU,REGION=4M,TIME=1440,PARM='UTILMSG=YES'
>
> //DASD1    DD  UNIT=SYSDA,VOL=SER=PROD03,DISP=SHR
>
> //TAPE1    DD  DSN=MVS.PHYSICAL.BKUP.PROD03,
>
> //            DISP=(,CATLG,DELETE),UNIT=3490,VOL=(,,,99)
>
> //SYSPRINT DD  SYSOUT=*
>
> //SYSMAP  DD SYSOUT=*
>
> //SYSIN    DD  *
>  DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)        -
>  DATASET(INCLUDE(HESP.IMS.PROD.MATRIX        -
> HESP.NETVIEW.PRF))            -  TOL(ENQF)                          -
>    OPT(4) ALLDATA(*) ALLEXCP
> /*
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


--
This is clearly another case of too many mad scientists, and not enough 
hunchbacks.


Maranatha! <><
John McKown

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

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

**DO NOT open attachments or click on links from unknown senders or unexpected 
emails**

This e-mail transmission contains information that is confidential and may be 
privileged.   It is intended only for the 

Re: DFDSS copy to pre-allocated dsn

[Jackson, Rob]

I don't know for sure if OUTDD works exactly like OUTDY; I was wondering.  I 
used (no longer a DSS shop) OUTDY to list candidate volumes; COPY makes only 
one copy, whether it exists on one volume or is spread across multiple ones.  
Anyway, since this is non-SMS managed, it can be on only one volume--assuming 
it's really HFS.  I guess the same restriction would apply to ZFS.

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Mike Schwab
Sent: Thursday, May 16, 2019 7:13 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: DFDSS copy to pre-allocated dsn

[External Email]

So you are making 3 copies on 3 different OUTDDNAMES?
If it is one dataset on 3 volumes it would be one OUTDDNAME, right?

On Thu, May 16, 2019 at 4:51 PM Elaine Beal  wrote:
>
> I've found a lot of " it's " confusing comments on this topic and I am 
> beleaguered- I am trying to copy a file to an existing, pre-allocated new 
> name.
> Seems that should be pretty straight forward... but having to specify 
> rename to make a copy is anything but straight forward
>
> I'm getting ADR380E (001)-FDSCO(08) indicating REPLACEUNCONDITIONAL is 
> not specified but I get this whether I specify it or not-
>
>
>   COPY DATASET(INCLUDE(SYS7.R30.V22.ROOT.HFS))  -
>   LOGINDDNAME(DASD1)  -
>   OUTDDNAME(DASD2,DASD3,DASD4)  -
>   RENAMEU((SYS7.R30.V22.ROOT.HFS,   -
>   SYS7.R30.V22.RSU.ROOT.HFS)) -
>   REPLACEUNCONDITIONAL   -
>   NULLSTORCLAS BYPASSACS(**) -
>   ALLDATA(*) ALLEXCP CANCELERROR -
>   SHARE -
>   WRITECHECK
>
> Thanks for any help-
> Elaine
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN
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

File 228 CBT tape - HSM panel recovery

[Peter]

Hi

I am trying to use this file for a panel based recovery of HSM managed
backup .
When I do HLIST DSN('XXX.YY.ZZ') BCDS I get the details of backup but when
I use the CBTTAPE 228 it doesn't show up anything ?

Is anyone using it and getting as expected ?

Peter

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

Re: ISPF and newer COBOL keywords

[Timothy Sipples]

It's certainly possible to create your own custom browsers and editor
behaviors (with custom highlighting) in ISPF, and that's pretty well
documented in the ISPF sections of the z/OS Knowledge Center.

Past IBM practice was to roll up additional COBOL reserved word
highlighting into ISPF in some later (post-compiler) z/OS release.
Presumably that'll continue, and of course you're free to ask and to file a
RFE. It's technically possible for IBM to ship updates to ISPF separately,
outside of particular z/OS release schedules. A recent example of that is
the ISPF English all caps feature discussed on this list, a feature that's
somewhat popular in Japan. Anyway, no promises from me (since I don't speak
for IBM, as a reminder), but it doesn't hurt to ask.

IBM Developer for Z keeps particularly close pace with the compiler since
it's on its own, high velocity update schedule. You should have current
reserved word highlighting (and more) available there. There are several
references in recent IDZ release notes to feature improvements specifically
geared to Enterprise COBOL 6.2.


Timothy Sipples
IT Architect Executive, Industry Solutions, IBM Z & LinuxONE


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

z/OS Container Extensions

[Frank Swarbrick]

Don't really know anything about this, but does anyone know what advantage 
there is to running a Docker container on z/OS over just running it Linux for 
Z?  Is it just for those who don't have Linux for Z but want to run Linux 
applications on the mainframe?  Does it allow "direct access" to z/OS resources 
(databases, CICS, etc.)?

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

Re: File 228 CBT tape - HSM panel recovery

[Mark Jacobs]

HELP HLIST says that HSM will allocate a dataset with 
RECFM=FBA,LRECL=121,BLKSIZE=1210 if a datatset doesn't exist, so those 
attributes should work fine for a pre-allocated dataset.

Mark Jacobs


Sent from ProtonMail, Swiss-based encrypted email.

GPG Public Key - 
https://api.protonmail.ch/pks/lookup?op=get=markjac...@protonmail.com

‐‐‐ Original Message ‐‐‐
On Thursday, May 16, 2019 8:14 AM, Allan Staller  wrote:

> HSM is VERY PICKY about the actual DCB characteristics of the ODS.
> If the ODS does not match what HSM expects, HSM gives up and produces nothing.
>
> I don’t remember what DCB characteristics are required, but it must be 
> documented somewhere.
>
> HTH,
>
> -Original Message-
> From: IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU On Behalf Of 
> Peter
> Sent: Thursday, May 16, 2019 5:41 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: File 228 CBT tape - HSM panel recovery
>
> No the BCDS is not hard coded it's basically doing a HLIST and writing to 
> ODS. unfortunately the output file is not read properly to display the HSM 
> backup
>
> On Thu, 16 May, 2019, 2:29 PM Peter Glanzmann, peter.glanzm...@bedag.ch
> wrote:
>
> > Hi Peter
> > I assume that the source code of the program in CBT file 228 has the
> > name of the BCDS hard coded. Please search for the BCDS name in the
> > CLIST and replace it using the one of your installation.
> > Best regards
> > 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
> ::DISCLAIMER::
>
> --
>
> The contents of this e-mail and any attachment(s) are confidential and 
> intended for the named recipient(s) only. E-mail transmission is not 
> guaranteed to be secure or error-free as information could be intercepted, 
> corrupted, lost, destroyed, arrive late or incomplete, or may contain viruses 
> in transmission. The e mail and its contents (with or without referred 
> errors) shall therefore not attach any liability on the originator or HCL or 
> its affiliates. Views or opinions, if any, presented in this email are solely 
> those of the author and may not necessarily reflect the views or opinions of 
> HCL or its affiliates. Any form of reproduction, dissemination, copying, 
> disclosure, modification, distribution and / or publication of this message 
> without the prior written consent of authorized representative of HCL is 
> strictly prohibited. If you have received this email in error please delete 
> it and notify the sender immediately. Before opening any email and/or 
> attachments, please check them for viruses and other defects.
>
> --
>
> --
>
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

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

Re: File 228 CBT tape - HSM panel recovery

[Mike Schwab]

https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.arcf000/s4334.htm
RECFM=FBA, LRECL=121.

On Thu, May 16, 2019 at 7:15 AM Allan Staller  wrote:
>
> HSM is *VERY PICKY* about the actual DCB characteristics of the ODS.
> If the ODS does not match what HSM expects, HSM gives up and produces nothing.
>
> I don’t remember what DCB characteristics are required, but it must be 
> documented somewhere.
>
> HTH,
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf Of 
> Peter
> Sent: Thursday, May 16, 2019 5:41 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: File 228 CBT tape - HSM panel recovery
>
> No the BCDS is not hard coded it's basically doing a HLIST and writing to 
> ODS. unfortunately the output file is not read properly to display the HSM 
> backup
>
> On Thu, 16 May, 2019, 2:29 PM Peter Glanzmann, 
> wrote:
>
> > Hi Peter
> >
> > I assume that the source code of the program in CBT file 228 has the
> > name of the BCDS hard coded. Please search for the BCDS name in the
> > CLIST and replace it using the one of your installation.
> >
> > Best regards
> > 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
> ::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



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

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

Re: File 228 CBT tape - HSM panel recovery

[Peter Glanzmann]

Hi again 

Take a look to the following code section in File 228 and change the SUBSTR and 
the "BACKUP" to the HLQ matching your names. 


   /* LOOK FOR BEGINNING OF BCDS SECTION */
   
   IF (31:36,) = BACKUP + 
   THEN SET READ_MORE = YES   

Best regards
Peter

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

Re: File 228 CBT tape - HSM panel recovery

[Allan Staller]

HSM is *VERY PICKY* about the actual DCB characteristics of the ODS.
If the ODS does not match what HSM expects, HSM gives up and produces nothing.

I don’t remember what DCB characteristics are required, but it must be 
documented somewhere.

HTH,

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Peter
Sent: Thursday, May 16, 2019 5:41 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: File 228 CBT tape - HSM panel recovery

No the BCDS is not hard coded it's basically doing a HLIST and writing to ODS. 
unfortunately the output file is not read properly to display the HSM backup

On Thu, 16 May, 2019, 2:29 PM Peter Glanzmann, 
wrote:

> Hi Peter
>
> I assume that the source code of the program in CBT file 228 has the
> name of the BCDS hard coded. Please search for the BCDS name in the
> CLIST and replace it using the one of your installation.
>
> Best regards
> 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
::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: [External] Re: Ancient DASD connectivity

[Pommier, Rex]

Tom,

No problem.  I wasn't very clear in my comments.  Kind of like wanting the 
computer to have a "DWIW" command - do what I want.  :-)

Rex

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of Tom 
Marchant
Sent: Wednesday, May 15, 2019 6:12 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [External] Re: Ancient DASD connectivity

On Wed, 15 May 2019 20:31:55 +, Pommier, Rex wrote:

>The point I was making was that IBM had some DASD subsystems for 
>large(r) customers with integrated controllers

Oh. Sorry I misunderstood. Thanks for the clarification.

The s/360 POO (available on bitsavers), says, "A control unit may be housed 
separately or it may be physically and logically integral with the I/O device."

--
Tom Marchant

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


The information contained in this message is confidential, protected from 
disclosure and may be legally privileged.  If the reader of this message is not 
the intended recipient or an employee or agent responsible for delivering this 
message to the intended recipient, you are hereby notified that any disclosure, 
distribution, copying, or any action taken or action omitted in reliance on it, 
is strictly prohibited and may be unlawful.  If you have received this 
communication in error, please notify us immediately by replying to this 
message and destroy the material in its entirety, whether in electronic or hard 
copy format.  Thank you.


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

Re: Address space dump for Exit usage

[Vernooij, Kees (ITOP NM) - KLM]

Using certain exits can also be defined outside control of the Address Space. 
E.g. SMFPRMxx defines whether certain exits are used or not for the address 
space.
Or, PROGxx defines whether certain exit routines are used or not.

Both situations will probably be invisible in a dump of the address space..

Kees.


> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Jake Anderson
> Sent: 16 May, 2019 7:07
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Address space dump for Exit usage
> 
> Hi
> 
> Cross posted
> 
> When we take a SVCDUMP for an active address space . Does the dump shows
> if
> that particular address space uses particular EXIT ? I am just trying to
> understand if a dump of an address space can help me to determine if a
> particular exit is being used or not .
> 
> Any pointers would be appreciated.
> 
> Jake
> 
> --
> 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 this e-mail by error, please notify the sender immediately by return 
e-mail, and delete this message.

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



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

Fwd: IBM 'cloudifies' mainframe software pricing, adds hybrid, private cloud services | Network World

[Mark Regan]

News article, see link below, in regards to IBM's software announcement of
yesterday: IBM United States Software Announcement 219-014
  or https://tinyurl.com/yykuaslr
https://www.networkworld.com/article/3395776/ibm-cloudifies-mainframe-software-p
ricing-adds-hybrid-private-cloud-services.html or https://tinyurl.com/yy2r2xds 
Regards,
 
Mark T. Regan, K8MTR
CTO1 USNR-Retired, 1969-1991
Nationwide Insurance, Retired, 1986-2017
 
 
 

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

Re: Metal-C exits

[Clark Morris]

[Default] On 16 May 2019 04:55:33 -0700, in bit.listserv.ibm-main
rel...@us.ibm.com (Peter Relson) wrote:

>
>...where IBM provides some guidelines for doing exit work in Metal-C 
> 
>
>I'd say that the guideline is to get Metal C to do what you would have 
>done if you were coding in assembler. 
>
>What you typically need are mappings in (Metal) C for the data structures 
>that the exit routine needs to access. Most ISVs have likely rolled their 
>own over time, but z/OS is (finally) beginning to provide some (and is 
>looking for help in prioritizing which to provide first -- the goal is to 
>do most of the mappings in maclib and modgen, but that goal would be 
>accomplished incrementally). If you have such a prioritized list (it can 
>be for your own needs, or a group's or any scale you choose) please send 
>it to me so that we can try to make the best plan. Of course exit routines 
>are not the only things that can benefit from the availability of such 
>mappings.
While being retired I am in no position to submit an RFE, what I have
alway wanted was a tool that would convert Assembler DSECTs to COBOL
record descriptions, PL1 mappings etc..  It would have saved me much
time in writing COBOL programs to deal with SMF records and would
allow easier usage of IBM callable routines.  This would be a better
approach for providing C mappings because it then allows relatively
easy update and doesn't require manual effort for each update.

Clark Morris
>
>Peter Relson
>z/OS Core Technology Design
>
>
>--
>For IBM-MAIN subscribe / signoff / archive access instructions,
>send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

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

Re: File 228 CBT tape - HSM panel recovery

[Allan Staller]

Thanks Mark. I never could find that info in the FM's

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Mark Jacobs
Sent: Thursday, May 16, 2019 7:27 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: File 228 CBT tape - HSM panel recovery

HELP HLIST says that HSM will allocate a dataset with 
RECFM=FBA,LRECL=121,BLKSIZE=1210 if a datatset doesn't exist, so those 
attributes should work fine for a pre-allocated dataset.

Mark Jacobs


Sent from ProtonMail, Swiss-based encrypted email.

GPG Public Key - 
https://apc01.safelinks.protection.outlook.com/?url=https%3A%2F%2Fapi.protonmail.ch%2Fpks%2Flookup%3Fop%3Dget%26search%3Dmarkjacobs%40protonmail.comdata=02%7C01%7Callan.staller%40HCL.COM%7C4c3f2d847f6d4de00ef308d6d9f9e5f9%7C189de737c93a4f5a8b686f4ca9941912%7C0%7C0%7C636936064700727629sdata=gtnMp3E%2F8rnztkoo3kbAjvtzSK9vRtah%2FlTtUYYNq%2B4%3Dreserved=0

‐‐‐ Original Message ‐‐‐
On Thursday, May 16, 2019 8:14 AM, Allan Staller  wrote:

> HSM is VERY PICKY about the actual DCB characteristics of the ODS.
> If the ODS does not match what HSM expects, HSM gives up and produces nothing.
>
> I don’t remember what DCB characteristics are required, but it must be 
> documented somewhere.
>
> HTH,
>
> -Original Message-
> From: IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU On Behalf 
> Of Peter
> Sent: Thursday, May 16, 2019 5:41 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: File 228 CBT tape - HSM panel recovery
>
> No the BCDS is not hard coded it's basically doing a HLIST and writing 
> to ODS. unfortunately the output file is not read properly to display 
> the HSM backup
>
> On Thu, 16 May, 2019, 2:29 PM Peter Glanzmann, 
> peter.glanzm...@bedag.ch
> wrote:
>
> > Hi Peter
> > I assume that the source code of the program in CBT file 228 has the 
> > name of the BCDS hard coded. Please search for the BCDS name in the 
> > CLIST and replace it using the one of your installation.
> > Best regards
> > 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
> ::DISCLAIMER::
>
> --
> --
> --
>
> The contents of this e-mail and any attachment(s) are confidential and 
> intended for the named recipient(s) only. E-mail transmission is not 
> guaranteed to be secure or error-free as information could be intercepted, 
> corrupted, lost, destroyed, arrive late or incomplete, or may contain viruses 
> in transmission. The e mail and its contents (with or without referred 
> errors) shall therefore not attach any liability on the originator or HCL or 
> its affiliates. Views or opinions, if any, presented in this email are solely 
> those of the author and may not necessarily reflect the views or opinions of 
> HCL or its affiliates. Any form of reproduction, dissemination, copying, 
> disclosure, modification, distribution and / or publication of this message 
> without the prior written consent of authorized representative of HCL is 
> strictly prohibited. If you have received this email in error please delete 
> it and notify the sender immediately. Before opening any email and/or 
> attachments, please check them for viruses and other defects.
>
> --
> --
> --
> --
> --
> --
> --
> --
> --
> --
> --
> --
> --
> --
> --
>
> --
>
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

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

Re: Metal-C exits

[Peter Relson]

...where IBM provides some guidelines for doing exit work in Metal-C 
 

I'd say that the guideline is to get Metal C to do what you would have 
done if you were coding in assembler. 

What you typically need are mappings in (Metal) C for the data structures 
that the exit routine needs to access. Most ISVs have likely rolled their 
own over time, but z/OS is (finally) beginning to provide some (and is 
looking for help in prioritizing which to provide first -- the goal is to 
do most of the mappings in maclib and modgen, but that goal would be 
accomplished incrementally). If you have such a prioritized list (it can 
be for your own needs, or a group's or any scale you choose) please send 
it to me so that we can try to make the best plan. Of course exit routines 
are not the only things that can benefit from the availability of such 
mappings.

Peter Relson
z/OS Core Technology Design


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

Re: File 228 CBT tape - HSM panel recovery

[Mike Schwab]

 I wrote a program to anaylize a IDCAMS output.  Every few years the
size of some fields would increase and the report literals would be
moved to allow the larger fields.  I would check these positions in
the analysis program.  Better would be to look at an IDCAMS DCOLLECT
filed because those positions never change.


On Thu, May 16, 2019 at 5:41 AM Peter  wrote:
>
> No the BCDS is not hard coded it's basically doing a HLIST and writing to
> ODS. unfortunately the output file is not read properly to display the HSM
> backup
>
> On Thu, 16 May, 2019, 2:29 PM Peter Glanzmann, 
> wrote:
>
> > Hi Peter
> >
> > I assume that the source code of the program in CBT file 228 has the name
> > of the BCDS hard coded. Please search for the BCDS name in the CLIST and
> > replace it using the one of your installation.
> >
> > Best regards
> > 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



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

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

Re: File 228 CBT tape - HSM panel recovery

[Peter]

No the BCDS is not hard coded it's basically doing a HLIST and writing to
ODS. unfortunately the output file is not read properly to display the HSM
backup

On Thu, 16 May, 2019, 2:29 PM Peter Glanzmann, 
wrote:

> Hi Peter
>
> I assume that the source code of the program in CBT file 228 has the name
> of the BCDS hard coded. Please search for the BCDS name in the CLIST and
> replace it using the one of your installation.
>
> Best regards
> 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

Re: [External] Re: Ancient DASD connectivity

[R.S.]

W dniu 2019-05-15 o 21:53, Pommier, Rex pisze:


It was sheer size of the componentry that drove this design.   I think the 3990 
was the last stand-alone disk controller.  With the arrival of 2105s, the CU 
was inside the same cabinet as the drives and Logical CUs (LCUs) were born.  
One big black box (literally).  Adding additional cabinets no longer affected 
the I/O configuration - just capacity.


We don't hear much about them, but where did the 9340 subsystem fit in the 
timeline between 3990 and 2105? or the RAMAC2?  Both those devices had the 
controller built in the same frame as the disk spindles.  How about the RVA?


I can answer for RVA and RAMAC2. Both are single box, that means all the 
controllers, control units, etc. are integrated within the box 
containing disks.
Of course RVA is really virtual, volumes are emulated, there is no 1:1 
relationship between byte (block) on MVS device and physical HDA.


BTW: RVA was probably the last machine with multiple CU per device. The 
CUs physically were separate PCB's large ones. (PCB - Printed Circuit 
Board - electronics board). Nowadays we have CPC-severalchannels-CU-dev.

For the RVA it was:
CPCa-2channels-CUcard1-DEV1-n
CPCa-2channels-CUcard2-DEV1-n   - same device, different CU.

Of course RVA did not provide new CU or device type. It was 3990 and 
3390 from HCD point of view.


--
Radoslaw Skorupka
Lodz, Poland




==

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

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

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

If you are not the addressee of this message:

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

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

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

Re: Saving in memory data in case of operator cancel was Re: LE question

[Peter Relson]

The choices are between saving the data yourself as you go, such as by 
some sort of checkpoint or other method, or saving the data yourself after 
the cancel (for which some sort of TERM=YES ESTAE-type recovery is 
necessary) or not allowing the CANCEL (whether by intercepting CANCEL or 
making the job non-cancelable).

There are PPT attributes pertaining to whether or not a job can be 
canceled. I think that applies both to a job and to a started task.

Peter Relson
z/OS Core Technology Design


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

Re: File 228 CBT tape - HSM panel recovery

[Peter Glanzmann]

Hi Peter

I assume that the source code of the program in CBT file 228 has the name of 
the BCDS hard coded. Please search for the BCDS name in the CLIST and replace 
it using the one of your installation. 

Best regards
Peter

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

Re: Address space dump for Exit usage

[Binyamin Dissen]

On Thu, 16 May 2019 09:06:46 +0400 Jake Anderson 
wrote:

:>When we take a SVCDUMP for an active address space . Does the dump shows if
:>that particular address space uses particular EXIT ? I am just trying to
:>understand if a dump of an address space can help me to determine if a
:>particular exit is being used or not .

Lets break down the questions into two parts:

1. Was the exit invoked in that address space? If it leave footprints, you
should be able to find them.

2. Will it be executed?

In all cases, it would be best to read documentation on the exit to understand
when it is documented to receive control. Note that some exits can have their
attributes altered, in that at time X it will, but after certain operator
commands (or API calls) it will not. And vice versa.

The SVCDUMP will only work if you do an IF trap qualified by the job.

Curious minds ask - which exit? What unexpected result is seen?

--
Binyamin Dissen 
http://www.dissensoftware.com

Director, Dissen Software, Bar & Grill - Israel


Should you use the mailblocks package and expect a response from me,
you should preauthorize the dissensoftware.com domain.

I very rarely bother responding to challenge/response systems,
especially those from irresponsible companies.

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

Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

[Jousma, David]

Could it be that you are missing a dash after the word DUMP?  Or a space 
between these two keywords: INDDNAME(DASD1)OUTDDNAME(TAPE1)

_
Dave Jousma
AVP | Manager, Systems Engineering  

Fifth Third Bank  |  1830 East Paris Ave, SE  |  MD RSCB2H  |  Grand Rapids, MI 
49546
616.653.8429  |  fax: 616.653.2717


-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
John Dawes
Sent: Thursday, May 16, 2019 10:56 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

**CAUTION EXTERNAL EMAIL**

**DO NOT open attachments or click on links from unknown senders or unexpected 
emails**

 Please excuse my post for being misaligned.  I do not know how to correct it.  
Any ideas?
On Thursday, 16 May 2019, 2:51:22 pm UTC, John Dawes 
<00ff0e22811f-dmarc-requ...@listserv.ua.edu> wrote:  
 
 G'Day,
I am encountering a problem performing a Physical dataset backup of several dsn 
which are on a specific volume.  For some reason it doesn't work. I receive the 
error message ADR129E (001)-RI01 (01), KEYWORD '      ' IS IMPROPER Below is 
the job output and the JCL.  Can you spot my error?  Does DFDSS support a 
phyisical backup of multiple dsns?
ADR031I (SCH)-PRIME(01), TYPRUN=NORUN REQUESTED. TASKS WILL EXECUTE INNORUN 
MODE DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)    -                              
    DATASET(INCLUDE(HESP.IMS.PROD.MATRIX      -                         
                     HESP.NETVIEW.PRF))  -                             
TOL(ENQF)             -     OPT(4)ALLDATA(*) ALLEXCP ADR101I (R/I)-RI01 
(01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'DUMP'    

ADR109I (R/I)-RI01 (01), 2019.136 10:21:19 INITIAL SCAN OF USER CONTROLSTATEMENT

ADR129E (001)-RI01 (01), KEYWORD ' ' IS IMPROPER  

ADR131E (001)-RI03 (01), ABOVE TEXT BYPASSED UNTIL NEXT COMMAND 

ADR017E (001)-CLTSK(01), 2019.136 10:21:19 TASK NOT SCHEDULED DUE TOERROR. TASK

/*   

//NORUN   EXECPGM=ADRDSSU,REGION=4096K,PARM='TYPRUN=NORUN'    

//*STEP1   EXECPGM=ADRDSSU,REGION=4M,TIME=1440,PARM='UTILMSG=YES'

//DASD1    DD  UNIT=SYSDA,VOL=SER=PROD03,DISP=SHR 

//TAPE1    DD  DSN=MVS.PHYSICAL.BKUP.PROD03,  

//DISP=(,CATLG,DELETE),UNIT=3490,VOL=(,,,99) 

//SYSPRINT DD  SYSOUT=*   

//SYSMAP   DD SYSOUT=*    

//SYSIN    DD  *
 DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)    -     
DATASET(INCLUDE(HESP.IMS.PROD.MATRIX    -                    
HESP.NETVIEW.PRF))    -   TOL(ENQF)  -        
OPT(4) ALLDATA(*) ALLEXCP
/*                    



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

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

**DO NOT open attachments or click on links from unknown senders or unexpected 
emails**

This e-mail transmission contains information that is confidential and may be 
privileged.   It is intended only for the addressee(s) named above. If you 
receive this e-mail in error, please do not read, copy or disseminate it in any 
manner. If you are not the intended recipient, any disclosure, copying, 
distribution or use of the contents of this information is prohibited. Please 
reply to the message immediately by informing the sender that the message was 
misdirected. After replying, please erase it from your computer system. Your 
assistance in correcting this error is appreciated.


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

Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

[John McKown]

It's hard for me to read the reformatted text. But you need a comma between
the two DSNs in the INCLUDE list. I don't see any comma.

On Thu, May 16, 2019 at 9:51 AM John Dawes <
00ff0e22811f-dmarc-requ...@listserv.ua.edu> wrote:

> G'Day,
> I am encountering a problem performing a Physical dataset backup of
> several dsn which are on a specific volume.  For some reason it doesn't
> work. I receive the error message ADR129E (001)-RI01 (01), KEYWORD '  '
> IS IMPROPER
> Below is the job output and the JCL.  Can you spot my error?  Does DFDSS
> support a phyisical backup of multiple dsns?
> ADR031I (SCH)-PRIME(01), TYPRUN=NORUN REQUESTED. TASKS WILL EXECUTE
> INNORUN MODE DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)-
> DATASET(INCLUDE(HESP.IMS.PROD.MATRIX  -
>   HESP.NETVIEW.PRF))  -
>  TOL(ENQF) - OPT(4)ALLDATA(*)
> ALLEXCP
> ADR101I (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND
> 'DUMP'
>
> ADR109I (R/I)-RI01 (01), 2019.136 10:21:19 INITIAL SCAN OF USER
> CONTROLSTATEMENT
>
> ADR129E (001)-RI01 (01), KEYWORD ' ' IS
> IMPROPER
>
> ADR131E (001)-RI03 (01), ABOVE TEXT BYPASSED UNTIL NEXT
> COMMAND
>
> ADR017E (001)-CLTSK(01), 2019.136 10:21:19 TASK NOT SCHEDULED DUE TOERROR.
> TASK
>
> /*
>
> //NORUN   EXECPGM=ADRDSSU,REGION=4096K,PARM='TYPRUN=NORUN'
>
> //*STEP1   EXECPGM=ADRDSSU,REGION=4M,TIME=1440,PARM='UTILMSG=YES'
>
> //DASD1DD  UNIT=SYSDA,VOL=SER=PROD03,DISP=SHR
>
> //TAPE1DD  DSN=MVS.PHYSICAL.BKUP.PROD03,
>
> //DISP=(,CATLG,DELETE),UNIT=3490,VOL=(,,,99)
>
> //SYSPRINT DD  SYSOUT=*
>
> //SYSMAP   DD SYSOUT=*
>
> //SYSINDD  *
>  DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)-
>  DATASET(INCLUDE(HESP.IMS.PROD.MATRIX-
> HESP.NETVIEW.PRF))-   TOL(ENQF)  -
> OPT(4) ALLDATA(*) ALLEXCP
> /*
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


-- 
This is clearly another case of too many mad scientists, and not enough
hunchbacks.


Maranatha! <><
John McKown

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

Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

[John Dawes]

 Dave,I checked.  The DUMP statement is part of the INDDNAME.  It looks that it 
is missing the - because my post came out misaligned.Here it is again:
 DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)    - 

  DATASET(INCLUDE(HESP.IMS.PROD.MATRIX      -   
 

  HESP.NETVIEW.PRF))  -    

  TOL(ENQF)  -  
 OPT(4) ALLDATA(*) ALLEXCP                                                 

On Thursday, 16 May 2019, 2:58:36 pm UTC, Jousma, David 
<01a0403c5dc1-dmarc-requ...@listserv.ua.edu> wrote:  
 
 Could it be that you are missing a dash after the word DUMP?  Or a space 
between these two keywords: INDDNAME(DASD1)OUTDDNAME(TAPE1)        

_
Dave Jousma
AVP | Manager, Systems Engineering  

Fifth Third Bank  |  1830 East Paris Ave, SE  |  MD RSCB2H  |  Grand Rapids, MI 
49546
616.653.8429  |  fax: 616.653.2717


-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
John Dawes
Sent: Thursday, May 16, 2019 10:56 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

**CAUTION EXTERNAL EMAIL**

**DO NOT open attachments or click on links from unknown senders or unexpected 
emails**

 Please excuse my post for being misaligned.  I do not know how to correct it.  
Any ideas?
    On Thursday, 16 May 2019, 2:51:22 pm UTC, John Dawes 
<00ff0e22811f-dmarc-requ...@listserv.ua.edu> wrote:  
 
 G'Day,
I am encountering a problem performing a Physical dataset backup of several dsn 
which are on a specific volume.  For some reason it doesn't work. I receive the 
error message ADR129E (001)-RI01 (01), KEYWORD '      ' IS IMPROPER Below is 
the job output and the JCL.  Can you spot my error?  Does DFDSS support a 
phyisical backup of multiple dsns?
ADR031I (SCH)-PRIME(01), TYPRUN=NORUN REQUESTED. TASKS WILL EXECUTE INNORUN 
MODE DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)    -                              
    DATASET(INCLUDE(HESP.IMS.PROD.MATRIX      -                         
                     HESP.NETVIEW.PRF))  -                             
TOL(ENQF)             -     OPT(4)ALLDATA(*) ALLEXCP ADR101I (R/I)-RI01 
(01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'DUMP'    

ADR109I (R/I)-RI01 (01), 2019.136 10:21:19 INITIAL SCAN OF USER CONTROLSTATEMENT

ADR129E (001)-RI01 (01), KEYWORD ' ' IS IMPROPER  

ADR131E (001)-RI03 (01), ABOVE TEXT BYPASSED UNTIL NEXT COMMAND 

ADR017E (001)-CLTSK(01), 2019.136 10:21:19 TASK NOT SCHEDULED DUE TOERROR. TASK

/*   

//NORUN   EXECPGM=ADRDSSU,REGION=4096K,PARM='TYPRUN=NORUN'    

//*STEP1   EXECPGM=ADRDSSU,REGION=4M,TIME=1440,PARM='UTILMSG=YES'

//DASD1    DD  UNIT=SYSDA,VOL=SER=PROD03,DISP=SHR 

//TAPE1    DD  DSN=MVS.PHYSICAL.BKUP.PROD03,  

//DISP=(,CATLG,DELETE),UNIT=3490,VOL=(,,,99) 

//SYSPRINT DD  SYSOUT=*   

//SYSMAP   DD SYSOUT=*    

//SYSIN    DD  *
 DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)    -     
DATASET(INCLUDE(HESP.IMS.PROD.MATRIX    -                    
HESP.NETVIEW.PRF))    -   TOL(ENQF)  -        
OPT(4) ALLDATA(*) ALLEXCP
/*                    



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

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

**DO NOT open attachments or click on links from unknown senders or unexpected 
emails**

This e-mail transmission contains information that is confidential and may be 
privileged.  It is intended only for the addressee(s) named above. If you 
receive this e-mail in error, please do not read, copy or disseminate it in any 
manner. If you are not the intended recipient, any disclosure, copying, 
distribution or use of the contents of this information is prohibited. Please 
reply to the message immediately by informing the sender that the message was 
misdirected. After replying, please erase it from your computer system. Your 
assistance in correcting this error is appreciated.


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

Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

[John Dawes]

 John,The - or , are both acceptable.  I use the - all the time and never had a 
problem.
On Thursday, 16 May 2019, 2:59:16 pm UTC, John McKown 
 wrote:  
 
 It's hard for me to read the reformatted text. But you need a comma between
the two DSNs in the INCLUDE list. I don't see any comma.

On Thu, May 16, 2019 at 9:51 AM John Dawes <
00ff0e22811f-dmarc-requ...@listserv.ua.edu> wrote:

> G'Day,
> I am encountering a problem performing a Physical dataset backup of
> several dsn which are on a specific volume.  For some reason it doesn't
> work. I receive the error message ADR129E (001)-RI01 (01), KEYWORD '      '
> IS IMPROPER
> Below is the job output and the JCL.  Can you spot my error?  Does DFDSS
> support a phyisical backup of multiple dsns?
> ADR031I (SCH)-PRIME(01), TYPRUN=NORUN REQUESTED. TASKS WILL EXECUTE
> INNORUN MODE DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)        -
>                DATASET(INCLUDE(HESP.IMS.PROD.MATRIX              -
>                                      HESP.NETVIEW.PRF))          -
>                      TOL(ENQF)            -        OPT(4)ALLDATA(*)
> ALLEXCP
> ADR101I (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND
> 'DUMP'
>
> ADR109I (R/I)-RI01 (01), 2019.136 10:21:19 INITIAL SCAN OF USER
> CONTROLSTATEMENT
>
> ADR129E (001)-RI01 (01), KEYWORD '    ' IS
> IMPROPER
>
> ADR131E (001)-RI03 (01), ABOVE TEXT BYPASSED UNTIL NEXT
> COMMAND
>
> ADR017E (001)-CLTSK(01), 2019.136 10:21:19 TASK NOT SCHEDULED DUE TOERROR.
> TASK
>
> /*
>
> //NORUN  EXECPGM=ADRDSSU,REGION=4096K,PARM='TYPRUN=NORUN'
>
> //*STEP1  EXECPGM=ADRDSSU,REGION=4M,TIME=1440,PARM='UTILMSG=YES'
>
> //DASD1    DD  UNIT=SYSDA,VOL=SER=PROD03,DISP=SHR
>
> //TAPE1    DD  DSN=MVS.PHYSICAL.BKUP.PROD03,
>
> //            DISP=(,CATLG,DELETE),UNIT=3490,VOL=(,,,99)
>
> //SYSPRINT DD  SYSOUT=*
>
> //SYSMAP  DD SYSOUT=*
>
> //SYSIN    DD  *
>  DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)        -
>  DATASET(INCLUDE(HESP.IMS.PROD.MATRIX        -
> HESP.NETVIEW.PRF))            -  TOL(ENQF)                          -
>    OPT(4) ALLDATA(*) ALLEXCP
> /*
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


-- 
This is clearly another case of too many mad scientists, and not enough
hunchbacks.


Maranatha! <><
John McKown

--
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: DFDSS QUESTION - PHYSICAL DATASET BACKUP

[Mike Schwab]

https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.adru000/r2298.htm

INCLUDE(data.set.one, -
 data.set.two)

Commas are REQUIRED.

On Thu, May 16, 2019 at 9:51 AM John Dawes
<00ff0e22811f-dmarc-requ...@listserv.ua.edu> wrote:
>
> G'Day,
> I am encountering a problem performing a Physical dataset backup of several 
> dsn which are on a specific volume.  For some reason it doesn't work. I 
> receive the error message ADR129E (001)-RI01 (01), KEYWORD '  ' IS 
> IMPROPER
> Below is the job output and the JCL.  Can you spot my error?  Does DFDSS 
> support a phyisical backup of multiple dsns?
> ADR031I (SCH)-PRIME(01), TYPRUN=NORUN REQUESTED. TASKS WILL EXECUTE INNORUN 
> MODE DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)-
>   DATASET(INCLUDE(HESP.IMS.PROD.MATRIX  - 
>  HESP.NETVIEW.PRF))  -
>  TOL(ENQF) - OPT(4)ALLDATA(*) ALLEXCP
> ADR101I (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'DUMP'
>
> ADR109I (R/I)-RI01 (01), 2019.136 10:21:19 INITIAL SCAN OF USER 
> CONTROLSTATEMENT
>
> ADR129E (001)-RI01 (01), KEYWORD ' ' IS IMPROPER
>
> ADR131E (001)-RI03 (01), ABOVE TEXT BYPASSED UNTIL NEXT COMMAND
>
> ADR017E (001)-CLTSK(01), 2019.136 10:21:19 TASK NOT SCHEDULED DUE TOERROR. 
> TASK
>
> /*
>
> //NORUN   EXECPGM=ADRDSSU,REGION=4096K,PARM='TYPRUN=NORUN'
>
> //*STEP1   EXECPGM=ADRDSSU,REGION=4M,TIME=1440,PARM='UTILMSG=YES'
>
> //DASD1DD  UNIT=SYSDA,VOL=SER=PROD03,DISP=SHR
>
> //TAPE1DD  DSN=MVS.PHYSICAL.BKUP.PROD03,
>
> //DISP=(,CATLG,DELETE),UNIT=3490,VOL=(,,,99)
>
> //SYSPRINT DD  SYSOUT=*
>
> //SYSMAP   DD SYSOUT=*
>
> //SYSINDD  *
>  DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)- 
> DATASET(INCLUDE(HESP.IMS.PROD.MATRIX-
> HESP.NETVIEW.PRF))-   TOL(ENQF)  -
> OPT(4) ALLDATA(*) ALLEXCP
> /*
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

[John Dawes]

 David,The reason why I am doing a Physical backup of the dsns instead of a 
Logical backup it is because these dsns have a problem - no NVR.  They reside 
on a SMS volume but for some reason some of the dsn|(s) are non-SMS.DFDSS does 
not support a Logical backup of these problem dsns
On Thursday, 16 May 2019, 3:04:15 pm UTC, David Spiegel 
 wrote:  
 
 Hi John,
Physical Backups are usually a bad idea when doing backup by dataset.
If these are non-VSAM and non-SMS-managed, you can still do it for 
specific volumes by coding LIDD instead of INDD.
The INDD/INDY is used to determine Logical vs. Physical. If coded, it's 
Physical, otherwise, it's Logiocal.

Regards,
David

On 2019-05-16 10:51, John Dawes wrote:
> G'Day,
> I am encountering a problem performing a Physical dataset backup of several 
> dsn which are on a specific volume.  For some reason it doesn't work. I 
> receive the error message ADR129E (001)-RI01 (01), KEYWORD '      ' IS 
> IMPROPER
> Below is the job output and the JCL.  Can you spot my error?  Does DFDSS 
> support a phyisical backup of multiple dsns?
> ADR031I (SCH)-PRIME(01), TYPRUN=NORUN REQUESTED. TASKS WILL EXECUTE INNORUN 
> MODE DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)    -                            
>       DATASET(INCLUDE(HESP.IMS.PROD.MATRIX      -                     
>                          HESP.NETVIEW.PRF))  -                        
>      TOL(ENQF)             -     OPT(4)ALLDATA(*) ALLEXCP
> ADR101I (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'DUMP'
>
> ADR109I (R/I)-RI01 (01), 2019.136 10:21:19 INITIAL SCAN OF USER 
> CONTROLSTATEMENT
>
> ADR129E (001)-RI01 (01), KEYWORD ' ' IS IMPROPER
>
> ADR131E (001)-RI03 (01), ABOVE TEXT BYPASSED UNTIL NEXT COMMAND
>
> ADR017E (001)-CLTSK(01), 2019.136 10:21:19 TASK NOT SCHEDULED DUE TOERROR. 
> TASK
>
> /*
>
> //NORUN   EXECPGM=ADRDSSU,REGION=4096K,PARM='TYPRUN=NORUN'
>
> //*STEP1   EXECPGM=ADRDSSU,REGION=4M,TIME=1440,PARM='UTILMSG=YES'
>
> //DASD1    DD  UNIT=SYSDA,VOL=SER=PROD03,DISP=SHR
>
> //TAPE1    DD  DSN=MVS.PHYSICAL.BKUP.PROD03,
>
> //DISP=(,CATLG,DELETE),UNIT=3490,VOL=(,,,99)
>
> //SYSPRINT DD  SYSOUT=*
>
> //SYSMAP   DD SYSOUT=*
>
> //SYSIN    DD  *
>   DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)    -     
>DATASET(INCLUDE(HESP.IMS.PROD.MATRIX    -                    
>HESP.NETVIEW.PRF))    -   TOL(ENQF)  -        
>OPT(4) ALLDATA(*) ALLEXCP
> /*
>
>
>
> --
> 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: DFDSS QUESTION - PHYSICAL DATASET BACKUP

[John Dawes]

 Please excuse my post for being misaligned.  I do not know how to correct it.  
Any ideas?
On Thursday, 16 May 2019, 2:51:22 pm UTC, John Dawes 
<00ff0e22811f-dmarc-requ...@listserv.ua.edu> wrote:  
 
 G'Day,
I am encountering a problem performing a Physical dataset backup of several dsn 
which are on a specific volume.  For some reason it doesn't work. I receive the 
error message ADR129E (001)-RI01 (01), KEYWORD '      ' IS IMPROPER
Below is the job output and the JCL.  Can you spot my error?  Does DFDSS 
support a phyisical backup of multiple dsns?
ADR031I (SCH)-PRIME(01), TYPRUN=NORUN REQUESTED. TASKS WILL EXECUTE INNORUN 
MODE DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)    -                              
    DATASET(INCLUDE(HESP.IMS.PROD.MATRIX      -                         
                     HESP.NETVIEW.PRF))  -                             
TOL(ENQF)             -     OPT(4)ALLDATA(*) ALLEXCP                        
                        
ADR101I (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'DUMP'    

ADR109I (R/I)-RI01 (01), 2019.136 10:21:19 INITIAL SCAN OF USER CONTROLSTATEMENT

ADR129E (001)-RI01 (01), KEYWORD ' ' IS IMPROPER  

ADR131E (001)-RI03 (01), ABOVE TEXT BYPASSED UNTIL NEXT COMMAND 

ADR017E (001)-CLTSK(01), 2019.136 10:21:19 TASK NOT SCHEDULED DUE TOERROR. TASK

/*   

//NORUN   EXECPGM=ADRDSSU,REGION=4096K,PARM='TYPRUN=NORUN'    

//*STEP1   EXECPGM=ADRDSSU,REGION=4M,TIME=1440,PARM='UTILMSG=YES'

//DASD1    DD  UNIT=SYSDA,VOL=SER=PROD03,DISP=SHR 

//TAPE1    DD  DSN=MVS.PHYSICAL.BKUP.PROD03,  

//DISP=(,CATLG,DELETE),UNIT=3490,VOL=(,,,99) 

//SYSPRINT DD  SYSOUT=*   

//SYSMAP   DD SYSOUT=*    

//SYSIN    DD  * 
 DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)    -     
DATASET(INCLUDE(HESP.IMS.PROD.MATRIX    -                    
HESP.NETVIEW.PRF))    -   TOL(ENQF)  -        
OPT(4) ALLDATA(*) ALLEXCP                                  
/*                    



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

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

Re: [External] Re: Ancient DASD connectivity

[John McKown]

On Thu, May 16, 2019 at 8:08 AM Pommier, Rex 
wrote:

> Tom,
>
> No problem.  I wasn't very clear in my comments.  Kind of like wanting the
> computer to have a "DWIW" command - do what I want.  :-)
>

DWIW has been deprecated by the new DWIN (Do What I Need) instruction.
Because end users don't really know what they need and their "wants" are
not always helpful.




>
> Rex
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf
> Of Tom Marchant
> Sent: Wednesday, May 15, 2019 6:12 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: [External] Re: Ancient DASD connectivity
>
> On Wed, 15 May 2019 20:31:55 +, Pommier, Rex wrote:
>
> >The point I was making was that IBM had some DASD subsystems for
> >large(r) customers with integrated controllers
>
> Oh. Sorry I misunderstood. Thanks for the clarification.
>
> The s/360 POO (available on bitsavers), says, "A control unit may be
> housed separately or it may be physically and logically integral with the
> I/O device."
>
> --
> Tom Marchant
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send email
> to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
>
> The information contained in this message is confidential, protected from
> disclosure and may be legally privileged.  If the reader of this message is
> not the intended recipient or an employee or agent responsible for
> delivering this message to the intended recipient, you are hereby notified
> that any disclosure, distribution, copying, or any action taken or action
> omitted in reliance on it, is strictly prohibited and may be unlawful.  If
> you have received this communication in error, please notify us immediately
> by replying to this message and destroy the material in its entirety,
> whether in electronic or hard copy format.  Thank you.
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


-- 
This is clearly another case of too many mad scientists, and not enough
hunchbacks.


Maranatha! <><
John McKown

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

DFDSS QUESTION - PHYSICAL DATASET BACKUP

[John Dawes]

G'Day,
I am encountering a problem performing a Physical dataset backup of several dsn 
which are on a specific volume.  For some reason it doesn't work. I receive the 
error message ADR129E (001)-RI01 (01), KEYWORD '      ' IS IMPROPER
Below is the job output and the JCL.  Can you spot my error?  Does DFDSS 
support a phyisical backup of multiple dsns?
ADR031I (SCH)-PRIME(01), TYPRUN=NORUN REQUESTED. TASKS WILL EXECUTE INNORUN 
MODE DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)    -                              
    DATASET(INCLUDE(HESP.IMS.PROD.MATRIX      -                         
                     HESP.NETVIEW.PRF))  -                             
TOL(ENQF)             -     OPT(4)ALLDATA(*) ALLEXCP                        
                        
ADR101I (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'DUMP'    

ADR109I (R/I)-RI01 (01), 2019.136 10:21:19 INITIAL SCAN OF USER CONTROLSTATEMENT

ADR129E (001)-RI01 (01), KEYWORD ' ' IS IMPROPER  

ADR131E (001)-RI03 (01), ABOVE TEXT BYPASSED UNTIL NEXT COMMAND 

ADR017E (001)-CLTSK(01), 2019.136 10:21:19 TASK NOT SCHEDULED DUE TOERROR. TASK

/*   

//NORUN   EXECPGM=ADRDSSU,REGION=4096K,PARM='TYPRUN=NORUN'    

//*STEP1   EXECPGM=ADRDSSU,REGION=4M,TIME=1440,PARM='UTILMSG=YES'

//DASD1    DD  UNIT=SYSDA,VOL=SER=PROD03,DISP=SHR 

//TAPE1    DD  DSN=MVS.PHYSICAL.BKUP.PROD03,  

//DISP=(,CATLG,DELETE),UNIT=3490,VOL=(,,,99) 

//SYSPRINT DD  SYSOUT=*   

//SYSMAP   DD SYSOUT=*    

//SYSIN    DD  * 
 DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)    -     
DATASET(INCLUDE(HESP.IMS.PROD.MATRIX    -                    
HESP.NETVIEW.PRF))    -   TOL(ENQF)  -        
OPT(4) ALLDATA(*) ALLEXCP                                  
/*                    



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

Re: [External] Re: Ancient DASD connectivity

[Allan Staller]

DWIN was superesed by DWIM - Do what I meant!

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
John McKown
Sent: Thursday, May 16, 2019 9:53 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [External] Re: Ancient DASD connectivity

On Thu, May 16, 2019 at 8:08 AM Pommier, Rex 
wrote:

> Tom,
>
> No problem.  I wasn't very clear in my comments.  Kind of like wanting
> the computer to have a "DWIW" command - do what I want.  :-)
>

DWIW has been deprecated by the new DWIN (Do What I Need) instruction.
Because end users don't really know what they need and their "wants" are not 
always helpful.




>
> Rex
>
> -Original Message-
> From: IBM Mainframe Discussion List  On
> Behalf Of Tom Marchant
> Sent: Wednesday, May 15, 2019 6:12 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: [External] Re: Ancient DASD connectivity
>
> On Wed, 15 May 2019 20:31:55 +, Pommier, Rex wrote:
>
> >The point I was making was that IBM had some DASD subsystems for
> >large(r) customers with integrated controllers
>
> Oh. Sorry I misunderstood. Thanks for the clarification.
>
> The s/360 POO (available on bitsavers), says, "A control unit may be
> housed separately or it may be physically and logically integral with
> the I/O device."
>
> --
> Tom Marchant
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
>
> The information contained in this message is confidential, protected
> from disclosure and may be legally privileged.  If the reader of this
> message is not the intended recipient or an employee or agent
> responsible for delivering this message to the intended recipient, you
> are hereby notified that any disclosure, distribution, copying, or any
> action taken or action omitted in reliance on it, is strictly
> prohibited and may be unlawful.  If you have received this
> communication in error, please notify us immediately by replying to
> this message and destroy the material in its entirety, whether in electronic 
> or hard copy format.  Thank you.
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


--
This is clearly another case of too many mad scientists, and not enough 
hunchbacks.


Maranatha! <><
John McKown

--
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: DFDSS QUESTION - PHYSICAL DATASET BACKUP

[John Dawes]

 I tried your suggestion but it didn't work:
ADR129E (001)-RI01 (01), KEYWORD '      ' IS IMPROPER 

On Thursday, 16 May 2019, 3:13:43 pm UTC, Mike Schwab 
 wrote:  
 
 
https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.adru000/r2298.htm

INCLUDE(data.set.one, -
                data.set.two)

Commas are REQUIRED.

On Thu, May 16, 2019 at 9:51 AM John Dawes
<00ff0e22811f-dmarc-requ...@listserv.ua.edu> wrote:
>
> G'Day,
> I am encountering a problem performing a Physical dataset backup of several 
> dsn which are on a specific volume.  For some reason it doesn't work. I 
> receive the error message ADR129E (001)-RI01 (01), KEYWORD '      ' IS 
> IMPROPER
> Below is the job output and the JCL.  Can you spot my error?  Does DFDSS 
> support a phyisical backup of multiple dsns?
> ADR031I (SCH)-PRIME(01), TYPRUN=NORUN REQUESTED. TASKS WILL EXECUTE INNORUN 
> MODE DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)        -                            
>       DATASET(INCLUDE(HESP.IMS.PROD.MATRIX              -                     
>                          HESP.NETVIEW.PRF))          -                        
>     TOL(ENQF)            -        OPT(4)ALLDATA(*) ALLEXCP
> ADR101I (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'DUMP'
>
> ADR109I (R/I)-RI01 (01), 2019.136 10:21:19 INITIAL SCAN OF USER 
> CONTROLSTATEMENT
>
> ADR129E (001)-RI01 (01), KEYWORD '    ' IS IMPROPER
>
> ADR131E (001)-RI03 (01), ABOVE TEXT BYPASSED UNTIL NEXT COMMAND
>
> ADR017E (001)-CLTSK(01), 2019.136 10:21:19 TASK NOT SCHEDULED DUE TOERROR. 
> TASK
>
> /*
>
> //NORUN  EXECPGM=ADRDSSU,REGION=4096K,PARM='TYPRUN=NORUN'
>
> //*STEP1  EXECPGM=ADRDSSU,REGION=4M,TIME=1440,PARM='UTILMSG=YES'
>
> //DASD1    DD  UNIT=SYSDA,VOL=SER=PROD03,DISP=SHR
>
> //TAPE1    DD  DSN=MVS.PHYSICAL.BKUP.PROD03,
>
> //            DISP=(,CATLG,DELETE),UNIT=3490,VOL=(,,,99)
>
> //SYSPRINT DD  SYSOUT=*
>
> //SYSMAP  DD SYSOUT=*
>
> //SYSIN    DD  *
>  DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)        -    
>DATASET(INCLUDE(HESP.IMS.PROD.MATRIX        -                    
>HESP.NETVIEW.PRF))            -  TOL(ENQF)                          -        
>OPT(4) ALLDATA(*) ALLEXCP
> /*
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

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

Re: Ancient DASD connectivity

[Seymour J Metz]

Well, for some devices the CU and device were in the same box, e.g., 2501.


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


From: IBM Mainframe Discussion List  on behalf of 
Alan Altmark 
Sent: Wednesday, May 15, 2019 5:45 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Ancient DASD connectivity

On Wed, 15 May 2019 21:41:20 +, Seymour J Metz  wrote:

>That may be true for 2314, but it is not true for anything later. The A unit 
>connects to the control unit, not to the channel.
>

I actually intended to say that the A units connected to the control unit.  I 
don't know why I said "channel".   (sigh)  Everyone knows an I/O device can't 
talk to a channel!  :-)

Thanks for noticing!

Alan

--
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: DFDSS QUESTION - PHYSICAL DATASET BACKUP

[Carmen Vitullo]

I use a FILTER DD 



//FILTERDS DD DSN=.ISMF.COPY.D18004.T144134, 
// DISP=OLD 
//SYSIN DD * 
COPY DATASET(FILTERDD(FILTERDS)) - 
ALLDATA(*) - 
ALLEXCP - 
SELECTMULTI(ALL) - 
BYPASSACS(**) - 
LOGINDDNAME( - 
INVOL1 - 
) - 
NULLMGMTCLAS - 
NULLSTORCLAS - 


FILTER DD CONTAINS. 



INCLUDE( - 
IGY.V6R2M0.SIGYCOMP - 
IGY.V6R2M0.SIGYMAC - 
IGY.V6R2M0.SIGYPROC - 
IGY.V6R2M0.SIGYSAMP - 
) 
and never needed any commas 

Carmen Vitullo 

- Original Message -

From: "Mike Schwab"  
To: IBM-MAIN@LISTSERV.UA.EDU 
Sent: Thursday, May 16, 2019 10:13:07 AM 
Subject: Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP 

https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.adru000/r2298.htm
 

INCLUDE(data.set.one, - 
data.set.two) 

Commas are REQUIRED. 

On Thu, May 16, 2019 at 9:51 AM John Dawes 
<00ff0e22811f-dmarc-requ...@listserv.ua.edu> wrote: 
> 
> G'Day, 
> I am encountering a problem performing a Physical dataset backup of several 
> dsn which are on a specific volume. For some reason it doesn't work. I 
> receive the error message ADR129E (001)-RI01 (01), KEYWORD ' ' IS IMPROPER 
> Below is the job output and the JCL. Can you spot my error? Does DFDSS 
> support a phyisical backup of multiple dsns? 
> ADR031I (SCH)-PRIME(01), TYPRUN=NORUN REQUESTED. TASKS WILL EXECUTE INNORUN 
> MODE DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1) - 
> DATASET(INCLUDE(HESP.IMS.PROD.MATRIX - HESP.NETVIEW.PRF)) - TOL(ENQF) - 
> OPT(4)ALLDATA(*) ALLEXCP 
> ADR101I (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'DUMP' 
> 
> ADR109I (R/I)-RI01 (01), 2019.136 10:21:19 INITIAL SCAN OF USER 
> CONTROLSTATEMENT 
> 
> ADR129E (001)-RI01 (01), KEYWORD ' ' IS IMPROPER 
> 
> ADR131E (001)-RI03 (01), ABOVE TEXT BYPASSED UNTIL NEXT COMMAND 
> 
> ADR017E (001)-CLTSK(01), 2019.136 10:21:19 TASK NOT SCHEDULED DUE TOERROR. 
> TASK 
> 
> /* 
> 
> //NORUN EXECPGM=ADRDSSU,REGION=4096K,PARM='TYPRUN=NORUN' 
> 
> //*STEP1 EXECPGM=ADRDSSU,REGION=4M,TIME=1440,PARM='UTILMSG=YES' 
> 
> //DASD1 DD UNIT=SYSDA,VOL=SER=PROD03,DISP=SHR 
> 
> //TAPE1 DD DSN=MVS.PHYSICAL.BKUP.PROD03, 
> 
> // DISP=(,CATLG,DELETE),UNIT=3490,VOL=(,,,99) 
> 
> //SYSPRINT DD SYSOUT=* 
> 
> //SYSMAP DD SYSOUT=* 
> 
> //SYSIN DD * 
> DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1) - DATASET(INCLUDE(HESP.IMS.PROD.MATRIX - 
> HESP.NETVIEW.PRF)) - TOL(ENQF) - OPT(4) ALLDATA(*) ALLEXCP 
> /* 
> 
> 
> 
> -- 
> For IBM-MAIN subscribe / signoff / archive access instructions, 
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN 



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

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


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

Re: [External] Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

[John Dawes]

 Rex,I tried that as well but I got the same ADR129E error message.I tried the 
backup for one dsn and it works.  Which makes me believe that a multiple 
physical dsn backup is  not supported by DFDSS.
On Thursday, 16 May 2019, 3:29:32 pm UTC, Pommier, Rex 
 wrote:  
 
 John,

I see that you're doing a TYPRUN=NORUN.  What happens if you strip all the 
excess/optional lines from your SYSIN.  Can you eliminate the error by 
eliminating most of the control cards and just re-add them until you hit the 
error again?

Rex

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
John Dawes
Sent: Thursday, May 16, 2019 10:08 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [External] Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

 Dave,I checked.  The DUMP statement is part of the INDDNAME.  It looks that it 
is missing the - because my post came out misaligned.Here it is again:
 DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)    - 

  DATASET(INCLUDE(HESP.IMS.PROD.MATRIX      -   
 

  HESP.NETVIEW.PRF))  -    

  TOL(ENQF)  -
 OPT(4) ALLDATA(*) ALLEXCP                                                 

    On Thursday, 16 May 2019, 2:58:36 pm UTC, Jousma, David 
<01a0403c5dc1-dmarc-requ...@listserv.ua.edu> wrote:  
 
 Could it be that you are missing a dash after the word DUMP?  Or a space 
between these two keywords: INDDNAME(DASD1)OUTDDNAME(TAPE1)        

_
Dave Jousma
AVP | Manager, Systems Engineering  

Fifth Third Bank  |  1830 East Paris Ave, SE  |  MD RSCB2H  |  Grand Rapids, MI 
49546
616.653.8429  |  fax: 616.653.2717


-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
John Dawes
Sent: Thursday, May 16, 2019 10:56 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

**CAUTION EXTERNAL EMAIL**

**DO NOT open attachments or click on links from unknown senders or unexpected 
emails**

 Please excuse my post for being misaligned.  I do not know how to correct it.  
Any ideas?
    On Thursday, 16 May 2019, 2:51:22 pm UTC, John Dawes 
<00ff0e22811f-dmarc-requ...@listserv.ua.edu> wrote:  
 
 G'Day,
I am encountering a problem performing a Physical dataset backup of several dsn 
which are on a specific volume.  For some reason it doesn't work. I receive the 
error message ADR129E (001)-RI01 (01), KEYWORD '      ' IS IMPROPER Below is 
the job output and the JCL.  Can you spot my error?  Does DFDSS support a 
phyisical backup of multiple dsns?
ADR031I (SCH)-PRIME(01), TYPRUN=NORUN REQUESTED. TASKS WILL EXECUTE INNORUN 
MODE DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)    -                              
    DATASET(INCLUDE(HESP.IMS.PROD.MATRIX      -                         
                     HESP.NETVIEW.PRF))  -                             
TOL(ENQF)             -     OPT(4)ALLDATA(*) ALLEXCP ADR101I (R/I)-RI01 
(01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'DUMP'    

ADR109I (R/I)-RI01 (01), 2019.136 10:21:19 INITIAL SCAN OF USER CONTROLSTATEMENT

ADR129E (001)-RI01 (01), KEYWORD ' ' IS IMPROPER  

ADR131E (001)-RI03 (01), ABOVE TEXT BYPASSED UNTIL NEXT COMMAND 

ADR017E (001)-CLTSK(01), 2019.136 10:21:19 TASK NOT SCHEDULED DUE TOERROR. TASK

/*   

//NORUN   EXECPGM=ADRDSSU,REGION=4096K,PARM='TYPRUN=NORUN'    

//*STEP1   EXECPGM=ADRDSSU,REGION=4M,TIME=1440,PARM='UTILMSG=YES'

//DASD1    DD  UNIT=SYSDA,VOL=SER=PROD03,DISP=SHR 

//TAPE1    DD  DSN=MVS.PHYSICAL.BKUP.PROD03,  

//DISP=(,CATLG,DELETE),UNIT=3490,VOL=(,,,99) 

//SYSPRINT DD  SYSOUT=*   

//SYSMAP   DD SYSOUT=*    

//SYSIN    DD  *
 DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)    -     
DATASET(INCLUDE(HESP.IMS.PROD.MATRIX    -                    
HESP.NETVIEW.PRF))    -   TOL(ENQF)  -        
OPT(4) ALLDATA(*) ALLEXCP
/*                    



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

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

**DO NOT open attachments or click on links from unknown senders or unexpected 
emails**

This e-mail transmission contains information that is confidential and may be 
privileged.  It is intended only for the 

Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

[David Spiegel]

Hi John,
Physical Backups are usually a bad idea when doing backup by dataset.
If these are non-VSAM and non-SMS-managed, you can still do it for 
specific volumes by coding LIDD instead of INDD.
The INDD/INDY is used to determine Logical vs. Physical. If coded, it's 
Physical, otherwise, it's Logiocal.

Regards,
David

On 2019-05-16 10:51, John Dawes wrote:
> G'Day,
> I am encountering a problem performing a Physical dataset backup of several 
> dsn which are on a specific volume.  For some reason it doesn't work. I 
> receive the error message ADR129E (001)-RI01 (01), KEYWORD '      ' IS 
> IMPROPER
> Below is the job output and the JCL.  Can you spot my error?  Does DFDSS 
> support a phyisical backup of multiple dsns?
> ADR031I (SCH)-PRIME(01), TYPRUN=NORUN REQUESTED. TASKS WILL EXECUTE INNORUN 
> MODE DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)    -                            
>       DATASET(INCLUDE(HESP.IMS.PROD.MATRIX      -                     
>                          HESP.NETVIEW.PRF))  -                        
>      TOL(ENQF)             -     OPT(4)ALLDATA(*) ALLEXCP
> ADR101I (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'DUMP'
>
> ADR109I (R/I)-RI01 (01), 2019.136 10:21:19 INITIAL SCAN OF USER 
> CONTROLSTATEMENT
>
> ADR129E (001)-RI01 (01), KEYWORD ' ' IS IMPROPER
>
> ADR131E (001)-RI03 (01), ABOVE TEXT BYPASSED UNTIL NEXT COMMAND
>
> ADR017E (001)-CLTSK(01), 2019.136 10:21:19 TASK NOT SCHEDULED DUE TOERROR. 
> TASK
>
> /*
>
> //NORUN   EXECPGM=ADRDSSU,REGION=4096K,PARM='TYPRUN=NORUN'
>
> //*STEP1   EXECPGM=ADRDSSU,REGION=4M,TIME=1440,PARM='UTILMSG=YES'
>
> //DASD1    DD  UNIT=SYSDA,VOL=SER=PROD03,DISP=SHR
>
> //TAPE1    DD  DSN=MVS.PHYSICAL.BKUP.PROD03,
>
> //DISP=(,CATLG,DELETE),UNIT=3490,VOL=(,,,99)
>
> //SYSPRINT DD  SYSOUT=*
>
> //SYSMAP   DD SYSOUT=*
>
> //SYSIN    DD  *
>   DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)    -     
> DATASET(INCLUDE(HESP.IMS.PROD.MATRIX    -                    
> HESP.NETVIEW.PRF))    -   TOL(ENQF)  -        
> OPT(4) ALLDATA(*) ALLEXCP
> /*
>
>
>
> --
> 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: DFDSS QUESTION - PHYSICAL DATASET BACKUP

[John McKown]

On Thu, May 16, 2019 at 10:10 AM John Dawes <
00ff0e22811f-dmarc-requ...@listserv.ua.edu> wrote:

>  John,The - or , are both acceptable.  I use the - all the time and never
> had a problem.
>

Thanks. I misread the "railroad track" diagram for the DUMP command.



> On Thursday, 16 May 2019, 2:59:16 pm UTC, John McKown <
> john.archie.mck...@gmail.com> wrote:
>
>  It's hard for me to read the reformatted text. But you need a comma
> between
> the two DSNs in the INCLUDE list. I don't see any comma.
>
>
-- 
This is clearly another case of too many mad scientists, and not enough
hunchbacks.


Maranatha! <><
John McKown

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

Re: [External] Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

[Pommier, Rex]

John,

I see that you're doing a TYPRUN=NORUN.  What happens if you strip all the 
excess/optional lines from your SYSIN.  Can you eliminate the error by 
eliminating most of the control cards and just re-add them until you hit the 
error again?

Rex

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
John Dawes
Sent: Thursday, May 16, 2019 10:08 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [External] Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

 Dave,I checked.  The DUMP statement is part of the INDDNAME.  It looks that it 
is missing the - because my post came out misaligned.Here it is again:
 DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)    - 

  DATASET(INCLUDE(HESP.IMS.PROD.MATRIX      -   
 

  HESP.NETVIEW.PRF))  -    

  TOL(ENQF)  -
 OPT(4) ALLDATA(*) ALLEXCP                                                 

On Thursday, 16 May 2019, 2:58:36 pm UTC, Jousma, David 
<01a0403c5dc1-dmarc-requ...@listserv.ua.edu> wrote:  
 
 Could it be that you are missing a dash after the word DUMP?  Or a space 
between these two keywords: INDDNAME(DASD1)OUTDDNAME(TAPE1)        

_
Dave Jousma
AVP | Manager, Systems Engineering  

Fifth Third Bank  |  1830 East Paris Ave, SE  |  MD RSCB2H  |  Grand Rapids, MI 
49546
616.653.8429  |  fax: 616.653.2717


-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
John Dawes
Sent: Thursday, May 16, 2019 10:56 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

**CAUTION EXTERNAL EMAIL**

**DO NOT open attachments or click on links from unknown senders or unexpected 
emails**

 Please excuse my post for being misaligned.  I do not know how to correct it.  
Any ideas?
    On Thursday, 16 May 2019, 2:51:22 pm UTC, John Dawes 
<00ff0e22811f-dmarc-requ...@listserv.ua.edu> wrote:  
 
 G'Day,
I am encountering a problem performing a Physical dataset backup of several dsn 
which are on a specific volume.  For some reason it doesn't work. I receive the 
error message ADR129E (001)-RI01 (01), KEYWORD '      ' IS IMPROPER Below is 
the job output and the JCL.  Can you spot my error?  Does DFDSS support a 
phyisical backup of multiple dsns?
ADR031I (SCH)-PRIME(01), TYPRUN=NORUN REQUESTED. TASKS WILL EXECUTE INNORUN 
MODE DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)    -                              
    DATASET(INCLUDE(HESP.IMS.PROD.MATRIX      -                         
                     HESP.NETVIEW.PRF))  -                             
TOL(ENQF)             -     OPT(4)ALLDATA(*) ALLEXCP ADR101I (R/I)-RI01 
(01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'DUMP'    

ADR109I (R/I)-RI01 (01), 2019.136 10:21:19 INITIAL SCAN OF USER CONTROLSTATEMENT

ADR129E (001)-RI01 (01), KEYWORD ' ' IS IMPROPER  

ADR131E (001)-RI03 (01), ABOVE TEXT BYPASSED UNTIL NEXT COMMAND 

ADR017E (001)-CLTSK(01), 2019.136 10:21:19 TASK NOT SCHEDULED DUE TOERROR. TASK

/*   

//NORUN   EXECPGM=ADRDSSU,REGION=4096K,PARM='TYPRUN=NORUN'    

//*STEP1   EXECPGM=ADRDSSU,REGION=4M,TIME=1440,PARM='UTILMSG=YES'

//DASD1    DD  UNIT=SYSDA,VOL=SER=PROD03,DISP=SHR 

//TAPE1    DD  DSN=MVS.PHYSICAL.BKUP.PROD03,  

//DISP=(,CATLG,DELETE),UNIT=3490,VOL=(,,,99) 

//SYSPRINT DD  SYSOUT=*   

//SYSMAP   DD SYSOUT=*    

//SYSIN    DD  *
 DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)    -     
DATASET(INCLUDE(HESP.IMS.PROD.MATRIX    -                    
HESP.NETVIEW.PRF))    -   TOL(ENQF)  -        
OPT(4) ALLDATA(*) ALLEXCP
/*                    



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

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

**DO NOT open attachments or click on links from unknown senders or unexpected 
emails**

This e-mail transmission contains information that is confidential and may be 
privileged.  It is intended only for the addressee(s) named above. If you 
receive this e-mail in error, please do not read, copy or disseminate it in any 
manner. If you are not the intended recipient, any disclosure, copying, 
distribution or use of the contents of this information is prohibited. Please 
reply to the 

Re: [External] Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

[Pommier, Rex]

Do you have some kind of hidden hex character in your input stream?

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
John Dawes
Sent: Thursday, May 16, 2019 10:21 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [External] Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

 I tried your suggestion but it didn't work:
ADR129E (001)-RI01 (01), KEYWORD '      ' IS IMPROPER 

On Thursday, 16 May 2019, 3:13:43 pm UTC, Mike Schwab 
 wrote:  
 
 
https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.adru000/r2298.htm

INCLUDE(data.set.one, -
                data.set.two)

Commas are REQUIRED.

On Thu, May 16, 2019 at 9:51 AM John Dawes 
<00ff0e22811f-dmarc-requ...@listserv.ua.edu> wrote:
>
> G'Day,
> I am encountering a problem performing a Physical dataset backup of 
> several dsn which are on a specific volume.  For some reason it doesn't work. 
> I receive the error message ADR129E (001)-RI01 (01), KEYWORD '      ' IS 
> IMPROPER Below is the job output and the JCL.  Can you spot my error?  Does 
> DFDSS support a phyisical backup of multiple dsns?
> ADR031I (SCH)-PRIME(01), TYPRUN=NORUN REQUESTED. TASKS WILL EXECUTE 
> INNORUN MODE DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)        -                    
>               DATASET(INCLUDE(HESP.IMS.PROD.MATRIX              -             
>                                  HESP.NETVIEW.PRF))          -                
>             TOL(ENQF)            -        OPT(4)ALLDATA(*) ALLEXCP ADR101I 
> (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'DUMP'
>
> ADR109I (R/I)-RI01 (01), 2019.136 10:21:19 INITIAL SCAN OF USER 
> CONTROLSTATEMENT
>
> ADR129E (001)-RI01 (01), KEYWORD '    ' IS IMPROPER
>
> ADR131E (001)-RI03 (01), ABOVE TEXT BYPASSED UNTIL NEXT COMMAND
>
> ADR017E (001)-CLTSK(01), 2019.136 10:21:19 TASK NOT SCHEDULED DUE 
> TOERROR. TASK
>
> /*
>
> //NORUN  EXECPGM=ADRDSSU,REGION=4096K,PARM='TYPRUN=NORUN'
>
> //*STEP1  EXECPGM=ADRDSSU,REGION=4M,TIME=1440,PARM='UTILMSG=YES'
>
> //DASD1    DD  UNIT=SYSDA,VOL=SER=PROD03,DISP=SHR
>
> //TAPE1    DD  DSN=MVS.PHYSICAL.BKUP.PROD03,
>
> //            DISP=(,CATLG,DELETE),UNIT=3490,VOL=(,,,99)
>
> //SYSPRINT DD  SYSOUT=*
>
> //SYSMAP  DD SYSOUT=*
>
> //SYSIN    DD  *
>  DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)        -    
>DATASET(INCLUDE(HESP.IMS.PROD.MATRIX        -                    
>HESP.NETVIEW.PRF))            -  TOL(ENQF)                          -        
>OPT(4) ALLDATA(*) ALLEXCP
> /*
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

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


The information contained in this message is confidential, protected from 
disclosure and may be legally privileged.  If the reader of this message is not 
the intended recipient or an employee or agent responsible for delivering this 
message to the intended recipient, you are hereby notified that any disclosure, 
distribution, copying, or any action taken or action omitted in reliance on it, 
is strictly prohibited and may be unlawful.  If you have received this 
communication in error, please notify us immediately by replying to this 
message and destroy the material in its entirety, whether in electronic or hard 
copy format.  Thank you.


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

Re: Metal-C exits

[scott Ford]

Peter,
A big thanks, what I would like to know are there restrictions for Metal C
exits. For example, lets say i wanted to write RACF or JES2 exit.
Is Metal C well suited for that purpose ? I dont want to assume . I would
like to write Metal C for some of our functions and we primarily are
Security business driven ..

Thanks as always.
Scott

On Thu, May 16, 2019 at 1:06 PM Steve Smith  wrote:

> Well, XLC already provides a DSECT to struct conversion tool.  I haven't
> found its output to be as awful as it once was.
>
> One thing I might suggest is to get header files out of SAMPLIB.  There are
> now two system-level header libraries (SYS1.SIEAHDR.H, and
> SYS1.SIEAHDRV.H), which could also be better advertised as being in
> existence.  Maybe I'm slow, but it took quite a while to figure out that's
> where the headers for Pause/Release are.
>
> They could also be consolidated; FB80 libraries for C source is ludicrous.
>
> sas
>
>
> On Thu, May 16, 2019 at 8:26 AM Clark Morris  wrote:
>
> > [Default] On 16 May 2019 04:55:33 -0700, in bit.listserv.ibm-main
> > rel...@us.ibm.com (Peter Relson) wrote:
> >
> > >
> > >...where IBM provides some guidelines for doing exit work in Metal-C
> > >
> > >
> > >I'd say that the guideline is to get Metal C to do what you would have
> > >done if you were coding in assembler.
> > >
> > >What you typically need are mappings in (Metal) C for the data
> structures
> > >that the exit routine needs to access. Most ISVs have likely rolled
> their
> > >own over time, but z/OS is (finally) beginning to provide some (and is
> > >looking for help in prioritizing which to provide first -- the goal is
> to
> > >do most of the mappings in maclib and modgen, but that goal would be
> > >accomplished incrementally). If you have such a prioritized list (it can
> > >be for your own needs, or a group's or any scale you choose) please send
> > >it to me so that we can try to make the best plan. Of course exit
> > routines
> > >are not the only things that can benefit from the availability of such
> > >mappings.
> > While being retired I am in no position to submit an RFE, what I have
> > alway wanted was a tool that would convert Assembler DSECTs to COBOL
> > record descriptions, PL1 mappings etc..  It would have saved me much
> > time in writing COBOL programs to deal with SMF records and would
> > allow easier usage of IBM callable routines.  This would be a better
> > approach for providing C mappings because it then allows relatively
> > easy update and doesn't require manual effort for each update.
> >
> > Clark Morris
> > >
> > >Peter Relson
> > >z/OS Core Technology Design
> > >
> > >
> > >--
> > >For IBM-MAIN subscribe / signoff / archive access instructions,
> > >send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
>
> --
> sas
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


-- 



*IDMWORKS *

Scott Ford

z/OS Dev.




“By elevating a friend or Collegue you elevate yourself, by demeaning a
friend or collegue you demean yourself”



www.idmworks.com

scott.f...@idmworks.com

Blog: www.idmworks.com/blog





*The information contained in this email message and any attachment may be
privileged, confidential, proprietary or otherwise protected from
disclosure. If the reader of this message is not the intended recipient,
you are hereby notified that any dissemination, distribution, copying or
use of this message and any attachment is strictly prohibited. If you have
received this message in error, please notify us immediately by replying to
the message and permanently delete it from your computer and destroy any
printout thereof.*

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

Re: Saving in memory data in case of operator cancel was Re: LE question

[scott Ford]

Peter/Clark,

Since we are a ISV, we try to intervene ourselves. My issue was on how to
do it. I know LE  but I am faced with
we cant just convert to pure HLASM or even threaded C or C++ . So i have to
come up with an alternative solution
that works. We have been using Subpool 231 and it works fine except when an
Operator becomes impatient and
cancels the STC. I agree we use the PPT to enforce no cancel that would
prevent one issue. But since we capture
security (RACF, ACF2 and Top-Secret) events with exits and use SP231 as a
place to store them, we have to think about
data integrity and recovery. My thoughts thanks to Allan and the rest of
you guys is maybe a DataSpace might be what we want to do.

Scott

On Thu, May 16, 2019 at 7:39 AM Peter Relson  wrote:

> The choices are between saving the data yourself as you go, such as by
> some sort of checkpoint or other method, or saving the data yourself after
> the cancel (for which some sort of TERM=YES ESTAE-type recovery is
> necessary) or not allowing the CANCEL (whether by intercepting CANCEL or
> making the job non-cancelable).
>
> There are PPT attributes pertaining to whether or not a job can be
> canceled. I think that applies both to a job and to a started task.
>
> Peter Relson
> z/OS Core Technology Design
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


-- 



*IDMWORKS *

Scott Ford

z/OS Dev.




“By elevating a friend or Collegue you elevate yourself, by demeaning a
friend or collegue you demean yourself”



www.idmworks.com

scott.f...@idmworks.com

Blog: www.idmworks.com/blog





*The information contained in this email message and any attachment may be
privileged, confidential, proprietary or otherwise protected from
disclosure. If the reader of this message is not the intended recipient,
you are hereby notified that any dissemination, distribution, copying or
use of this message and any attachment is strictly prohibited. If you have
received this message in error, please notify us immediately by replying to
the message and permanently delete it from your computer and destroy any
printout thereof.*

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

Re: LE question

[scott Ford]

Brian,

I would agree it must be a lot of overhead looking at everything and then
having the code make the decision on what to do.
Especially in a System exit.

Scott

On Thu, May 16, 2019 at 12:19 AM Brian Westerman <
brian_wester...@syzygyinc.com> wrote:

> HI,
>
> ALL commands issued at a console or from a program or JCL are processed in
> the command exit, whether they are JES or MVS commands or just random text
> typed on the console.
>
> When I developed our console message processing facility, I originally set
> it up to run as a command exit and then changed it's location when I found
> that I was getting EVERY command and not just the ones I wanted to get. :)
>
> There is a lot of overhead in looking at everything, but when looking for
> individual items it's actually very efficient.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


-- 



*IDMWORKS *

Scott Ford

z/OS Dev.




“By elevating a friend or Collegue you elevate yourself, by demeaning a
friend or collegue you demean yourself”



www.idmworks.com

scott.f...@idmworks.com

Blog: www.idmworks.com/blog





*The information contained in this email message and any attachment may be
privileged, confidential, proprietary or otherwise protected from
disclosure. If the reader of this message is not the intended recipient,
you are hereby notified that any dissemination, distribution, copying or
use of this message and any attachment is strictly prohibited. If you have
received this message in error, please notify us immediately by replying to
the message and permanently delete it from your computer and destroy any
printout thereof.*

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

ISPF and newer COBOL keywords

[Frank Swarbrick]

Since Enterprise COBOL V5.1, IBM has been adding new COBOL language features 
with each release (and sometimes within a single "release").  On our system, at 
least, the ISPF "HILITE COBOL" Color Settings feature has not been keeping up.  
The new "inline comment" indicator that was added with V5.1 is not recognized, 
but I don't think anything with V5.2 forward is 'configured' in our system (new 
intrinsic functions, new COBOL statements like ALLOCATE and FREE, etc.).

Does anyone know IBMs plans on keeping this up?  Is this something we could 
update ourselves?  If so, how?

Thanks,
Frank

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

Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

[Jousma, David]

One other tidbit.  The SYSIN data, and all of the lines must be contained 
between columns 2-72.   Not column 1.  It would be really helpful if you could 
post the job with the correct formatting.   Whatever is messing it up appears 
to be removing spaces between some of your keywords.

_
Dave Jousma
AVP | Manager, Systems Engineering  

Fifth Third Bank  |  1830 East Paris Ave, SE  |  MD RSCB2H  |  Grand Rapids, MI 
49546
616.653.8429  |  fax: 616.653.2717



-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
John Dawes
Sent: Thursday, May 16, 2019 11:10 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

**CAUTION EXTERNAL EMAIL**

**DO NOT open attachments or click on links from unknown senders or unexpected 
emails**

 John,The - or , are both acceptable.  I use the - all the time and never had a 
problem.
On Thursday, 16 May 2019, 2:59:16 pm UTC, John McKown 
 wrote:  
 
 It's hard for me to read the reformatted text. But you need a comma between 
the two DSNs in the INCLUDE list. I don't see any comma.

On Thu, May 16, 2019 at 9:51 AM John Dawes < 
00ff0e22811f-dmarc-requ...@listserv.ua.edu> wrote:

> G'Day,
> I am encountering a problem performing a Physical dataset backup of  
>several dsn which are on a specific volume.  For some reason it doesn't  
>work. I receive the error message ADR129E (001)-RI01 (01), KEYWORD '      '
> IS IMPROPER
> Below is the job output and the JCL.  Can you spot my error?  Does 
>DFDSS  support a phyisical backup of multiple dsns?
> ADR031I (SCH)-PRIME(01), TYPRUN=NORUN REQUESTED. TASKS WILL EXECUTE  
>INNORUN MODE DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)        -
>                DATASET(INCLUDE(HESP.IMS.PROD.MATRIX              -
>                                      HESP.NETVIEW.PRF))          -
>                      TOL(ENQF)            -        OPT(4)ALLDATA(*)  
>ALLEXCP  ADR101I (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO 
>COMMAND  'DUMP'
>
> ADR109I (R/I)-RI01 (01), 2019.136 10:21:19 INITIAL SCAN OF USER 
> CONTROLSTATEMENT
>
> ADR129E (001)-RI01 (01), KEYWORD '    ' IS IMPROPER
>
> ADR131E (001)-RI03 (01), ABOVE TEXT BYPASSED UNTIL NEXT COMMAND
>
> ADR017E (001)-CLTSK(01), 2019.136 10:21:19 TASK NOT SCHEDULED DUE TOERROR.
> TASK
>
> /*
>
> //NORUN  EXECPGM=ADRDSSU,REGION=4096K,PARM='TYPRUN=NORUN'
>
> //*STEP1  EXECPGM=ADRDSSU,REGION=4M,TIME=1440,PARM='UTILMSG=YES'
>
> //DASD1    DD  UNIT=SYSDA,VOL=SER=PROD03,DISP=SHR
>
> //TAPE1    DD  DSN=MVS.PHYSICAL.BKUP.PROD03,
>
> //            DISP=(,CATLG,DELETE),UNIT=3490,VOL=(,,,99)
>
> //SYSPRINT DD  SYSOUT=*
>
> //SYSMAP  DD SYSOUT=*
>
> //SYSIN    DD  *
>  DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)        -
>  DATASET(INCLUDE(HESP.IMS.PROD.MATRIX        -
> HESP.NETVIEW.PRF))            -  TOL(ENQF)                          -
>    OPT(4) ALLDATA(*) ALLEXCP
> /*
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


--
This is clearly another case of too many mad scientists, and not enough 
hunchbacks.


Maranatha! <><
John McKown

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

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

**DO NOT open attachments or click on links from unknown senders or unexpected 
emails**

This e-mail transmission contains information that is confidential and may be 
privileged.   It is intended only for the addressee(s) named above. If you 
receive this e-mail in error, please do not read, copy or disseminate it in any 
manner. If you are not the intended recipient, any disclosure, copying, 
distribution or use of the contents of this information is prohibited. Please 
reply to the message immediately by informing the sender that the message was 
misdirected. After replying, please erase it from your computer system. Your 
assistance in correcting this error is appreciated.


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

Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

[Jousma, David]

This would be correct syntax.  Comma's are optional, dash is not.   By your 
other post where you said it worked with one dataset, it almost looks like your 
HESP. Dataset name starts in column 1? 

//SYSINDD  *
  DUMP INDDNAME(DASD1) OUTDDNAME(TAPE1)-
DATASET(INCLUDE(HESP.IMS.PROD.MATRIX-
HESP.NETVIEW.PRF))-  
TOL(ENQF)  -
OPT(4) ALLDATA(*) ALLEXCP
/*

_
Dave Jousma
AVP | Manager, Systems Engineering  

Fifth Third Bank  |  1830 East Paris Ave, SE  |  MD RSCB2H  |  Grand Rapids, MI 
49546
616.653.8429  |  fax: 616.653.2717



-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
John Dawes
Sent: Thursday, May 16, 2019 11:10 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

**CAUTION EXTERNAL EMAIL**

**DO NOT open attachments or click on links from unknown senders or unexpected 
emails**

 John,The - or , are both acceptable.  I use the - all the time and never had a 
problem.
On Thursday, 16 May 2019, 2:59:16 pm UTC, John McKown 
 wrote:  
 
 It's hard for me to read the reformatted text. But you need a comma between 
the two DSNs in the INCLUDE list. I don't see any comma.

On Thu, May 16, 2019 at 9:51 AM John Dawes < 
00ff0e22811f-dmarc-requ...@listserv.ua.edu> wrote:

> G'Day,
> I am encountering a problem performing a Physical dataset backup of  
>several dsn which are on a specific volume.  For some reason it doesn't  
>work. I receive the error message ADR129E (001)-RI01 (01), KEYWORD '      '
> IS IMPROPER
> Below is the job output and the JCL.  Can you spot my error?  Does 
>DFDSS  support a phyisical backup of multiple dsns?
> ADR031I (SCH)-PRIME(01), TYPRUN=NORUN REQUESTED. TASKS WILL EXECUTE  
>INNORUN MODE DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)        -
>                DATASET(INCLUDE(HESP.IMS.PROD.MATRIX              -
>                                      HESP.NETVIEW.PRF))          -
>                      TOL(ENQF)            -        OPT(4)ALLDATA(*)  
>ALLEXCP  ADR101I (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO 
>COMMAND  'DUMP'
>
> ADR109I (R/I)-RI01 (01), 2019.136 10:21:19 INITIAL SCAN OF USER 
> CONTROLSTATEMENT
>
> ADR129E (001)-RI01 (01), KEYWORD '    ' IS IMPROPER
>
> ADR131E (001)-RI03 (01), ABOVE TEXT BYPASSED UNTIL NEXT COMMAND
>
> ADR017E (001)-CLTSK(01), 2019.136 10:21:19 TASK NOT SCHEDULED DUE TOERROR.
> TASK
>
> /*
>
> //NORUN  EXECPGM=ADRDSSU,REGION=4096K,PARM='TYPRUN=NORUN'
>
> //*STEP1  EXECPGM=ADRDSSU,REGION=4M,TIME=1440,PARM='UTILMSG=YES'
>
> //DASD1    DD  UNIT=SYSDA,VOL=SER=PROD03,DISP=SHR
>
> //TAPE1    DD  DSN=MVS.PHYSICAL.BKUP.PROD03,
>
> //            DISP=(,CATLG,DELETE),UNIT=3490,VOL=(,,,99)
>
> //SYSPRINT DD  SYSOUT=*
>
> //SYSMAP  DD SYSOUT=*
>
> //SYSIN    DD  *
>  DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)        -
>  DATASET(INCLUDE(HESP.IMS.PROD.MATRIX        -
> HESP.NETVIEW.PRF))            -  TOL(ENQF)                          -
>    OPT(4) ALLDATA(*) ALLEXCP
> /*
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


--
This is clearly another case of too many mad scientists, and not enough 
hunchbacks.


Maranatha! <><
John McKown

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

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

**DO NOT open attachments or click on links from unknown senders or unexpected 
emails**

This e-mail transmission contains information that is confidential and may be 
privileged.   It is intended only for the addressee(s) named above. If you 
receive this e-mail in error, please do not read, copy or disseminate it in any 
manner. If you are not the intended recipient, any disclosure, copying, 
distribution or use of the contents of this information is prohibited. Please 
reply to the message immediately by informing the sender that the message was 
misdirected. After replying, please erase it from your computer system. Your 
assistance in correcting this error is appreciated.


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

Re: Metal-C exits

[Steve Smith]

Well, XLC already provides a DSECT to struct conversion tool.  I haven't
found its output to be as awful as it once was.

One thing I might suggest is to get header files out of SAMPLIB.  There are
now two system-level header libraries (SYS1.SIEAHDR.H, and
SYS1.SIEAHDRV.H), which could also be better advertised as being in
existence.  Maybe I'm slow, but it took quite a while to figure out that's
where the headers for Pause/Release are.

They could also be consolidated; FB80 libraries for C source is ludicrous.

sas


On Thu, May 16, 2019 at 8:26 AM Clark Morris  wrote:

> [Default] On 16 May 2019 04:55:33 -0700, in bit.listserv.ibm-main
> rel...@us.ibm.com (Peter Relson) wrote:
>
> >
> >...where IBM provides some guidelines for doing exit work in Metal-C
> >
> >
> >I'd say that the guideline is to get Metal C to do what you would have
> >done if you were coding in assembler.
> >
> >What you typically need are mappings in (Metal) C for the data structures
> >that the exit routine needs to access. Most ISVs have likely rolled their
> >own over time, but z/OS is (finally) beginning to provide some (and is
> >looking for help in prioritizing which to provide first -- the goal is to
> >do most of the mappings in maclib and modgen, but that goal would be
> >accomplished incrementally). If you have such a prioritized list (it can
> >be for your own needs, or a group's or any scale you choose) please send
> >it to me so that we can try to make the best plan. Of course exit
> routines
> >are not the only things that can benefit from the availability of such
> >mappings.
> While being retired I am in no position to submit an RFE, what I have
> alway wanted was a tool that would convert Assembler DSECTs to COBOL
> record descriptions, PL1 mappings etc..  It would have saved me much
> time in writing COBOL programs to deal with SMF records and would
> allow easier usage of IBM callable routines.  This would be a better
> approach for providing C mappings because it then allows relatively
> easy update and doesn't require manual effort for each update.
>
> Clark Morris
> >
> >Peter Relson
> >z/OS Core Technology Design
> >
> >
> >--
> >For IBM-MAIN subscribe / signoff / archive access instructions,
> >send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


-- 
sas

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

Re: Fwd: IBM 'cloudifies' mainframe software pricing, adds hybrid, private cloud services | Network World

[Charles Mills]

Test to see if this solves my formatting problem with this list (only).Please 
pardon the interruption. CharlesSent from a mobile; please excuse the brevity.
 Original message From: Charles Mills  Date: 
5/16/19  8:53 AM  (GMT-08:00) To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Fwd: 
IBM 'cloudifies' mainframe software pricing, adds hybrid, private cloud 
services | Network World "First, IBM rolled out  z/OS Container Extensions 
(zCX), which makes it possible to run Linux on Z applications that are packaged 
as Docker Container images on z/OS. "Linux under z/OS.Charles  Original 
message From: Mark Regan  Date: 5/16/19  5:53 AM  
(GMT-08:00) To: IBM-MAIN@LISTSERV.UA.EDU Subject: Fwd: IBM 'cloudifies' 
mainframe software pricing, adds hybrid, private cloud services | Network World 
News article, see link below, in regards to IBM's software announcement 
ofyesterday: IBM United States Software Announcement 
219-014
  or 
https://tinyurl.com/yykuaslrhttps://www.networkworld.com/article/3395776/ibm-cloudifies-mainframe-software-pricing-adds-hybrid-private-cloud-services.html
 or https://tinyurl.com/yy2r2xds Regards, Mark T. Regan, K8MTRCTO1 
USNR-Retired, 1969-1991Nationwide Insurance, Retired, 1986-2017   
--For 
IBM-MAIN subscribe / signoff / archive access instructions,send email to 
lists...@listserv.ua.edu with the message: INFO 
IBM-MAIN--For
 IBM-MAIN subscribe / signoff / archive access instructions,send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN

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

Re: [External] Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

[Allan Staller]

This actually is a "truncated ellipsis". Syntatically, it is not present.

The below example is pseudo-code for the actual dfdss syntax/parameters.

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
John Dawes
Sent: Thursday, May 16, 2019 12:19 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [External] Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

 Alan,Could you confirm the following:a) after DSN=datasetname1. is it a period 
or a comma?b) in the statement Inddd=indd1outdd=outdd1 should there be a space 
between the indd1 and outdd?b) after the outdd1.. is there something else I 
should tack on?
On Thursday, 16 May 2019, 4:54:38 pm UTC, Allan Staller 
 wrote:  
 
 Try this:
//INDD1 dd 
//INDD2 dd .
//OUTDD1 dd 
//OUTDD2 dd .
//SYSIN DD *
 Parallel
 DUMP DSN=datasetname1. Inddd=indd1outdd=outdd1
 DUMP DSN=datasetname2. Inddd=indd21outdd=outdd2

HTH,


-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
John Dawes
Sent: Thursday, May 16, 2019 11:45 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [External] Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

 Rex,
No, there is none. As I had mentioned before, if I execute the job to select 1 
dsn it works, however if I try with 2 or more dsns the job fails.  I suspect 
that DFDSS doesn't support a phyiscial dataset backup for more than 1 dsn.
    On Thursday, 16 May 2019, 3:26:44 pm UTC, Pommier, Rex 
 wrote:

 Do you have some kind of hidden hex character in your input stream?

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
John Dawes
Sent: Thursday, May 16, 2019 10:21 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [External] Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

 I tried your suggestion but it didn't work:
ADR129E (001)-RI01 (01), KEYWORD '      ' IS IMPROPER

    On Thursday, 16 May 2019, 3:13:43 pm UTC, Mike Schwab 
 wrote:

 
https://apc01.safelinks.protection.outlook.com/?url=https%3A%2F%2Fwww.ibm.com%2Fsupport%2Fknowledgecenter%2Fen%2FSSLTBW_2.1.0%2Fcom.ibm.zos.v2r1.adru000%2Fr2298.htmdata=02%7C01%7Callan.staller%40HCL.COM%7Cd5224ac9c74a4873cf5b08d6da22a8ac%7C189de737c93a4f5a8b686f4ca9941912%7C0%7C0%7C636936239748093837sdata=LrM0MsBPiUCxuvMdpitMX5iOpEtkDMTGfopU0Buxnok%3Dreserved=0

INCLUDE(data.set.one, -
                data.set.two)

Commas are REQUIRED.

On Thu, May 16, 2019 at 9:51 AM John Dawes 
<00ff0e22811f-dmarc-requ...@listserv.ua.edu> wrote:
>
> G'Day,
> I am encountering a problem performing a Physical dataset backup of 
> several dsn which are on a specific volume.  For some reason it doesn't work. 
> I receive the error message ADR129E (001)-RI01 (01), KEYWORD '      ' IS 
> IMPROPER Below is the job output and the JCL.  Can you spot my error?  Does 
> DFDSS support a phyisical backup of multiple dsns?
> ADR031I (SCH)-PRIME(01), TYPRUN=NORUN REQUESTED. TASKS WILL EXECUTE 
> INNORUN MODE DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)        -                    
>               DATASET(INCLUDE(HESP.IMS.PROD.MATRIX              -             
>                                  HESP.NETVIEW.PRF))          -                
>             TOL(ENQF)            -        OPT(4)ALLDATA(*) ALLEXCP ADR101I 
> (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'DUMP'
>
> ADR109I (R/I)-RI01 (01), 2019.136 10:21:19 INITIAL SCAN OF USER 
> CONTROLSTATEMENT
>
> ADR129E (001)-RI01 (01), KEYWORD '    ' IS IMPROPER
>
> ADR131E (001)-RI03 (01), ABOVE TEXT BYPASSED UNTIL NEXT COMMAND
>
> ADR017E (001)-CLTSK(01), 2019.136 10:21:19 TASK NOT SCHEDULED DUE 
> TOERROR. TASK
>
> /*
>
> //NORUN  EXECPGM=ADRDSSU,REGION=4096K,PARM='TYPRUN=NORUN'
>
> //*STEP1  EXECPGM=ADRDSSU,REGION=4M,TIME=1440,PARM='UTILMSG=YES'
>
> //DASD1    DD  UNIT=SYSDA,VOL=SER=PROD03,DISP=SHR
>
> //TAPE1    DD  DSN=MVS.PHYSICAL.BKUP.PROD03,
>
> //            DISP=(,CATLG,DELETE),UNIT=3490,VOL=(,,,99)
>
> //SYSPRINT DD  SYSOUT=*
>
> //SYSMAP  DD SYSOUT=*
>
> //SYSIN    DD  *
>  DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)        - 
>DATASET(INCLUDE(HESP.IMS.PROD.MATRIX        -
>HESP.NETVIEW.PRF))            -  TOL(ENQF)                          -
>OPT(4) ALLDATA(*) ALLEXCP
> /*
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

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


The information contained in this message is confidential, protected from 
disclosure and may be legally 

Re: [External] Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

[John Dawes]

 Alan,Could you confirm the following:a) after DSN=datasetname1. is it a period 
or a comma?b) in the statement Inddd=indd1outdd=outdd1 should there be a space 
between the indd1 and outdd?b) after the outdd1.. is there something else I 
should tack on?
On Thursday, 16 May 2019, 4:54:38 pm UTC, Allan Staller 
 wrote:  
 
 Try this:
//INDD1 dd 
//INDD2 dd .
//OUTDD1 dd 
//OUTDD2 dd .
//SYSIN DD *
 Parallel
 DUMP DSN=datasetname1. Inddd=indd1outdd=outdd1
 DUMP DSN=datasetname2. Inddd=indd21outdd=outdd2

HTH,


-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
John Dawes
Sent: Thursday, May 16, 2019 11:45 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [External] Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

 Rex,
No, there is none. As I had mentioned before, if I execute the job to select 1 
dsn it works, however if I try with 2 or more dsns the job fails.  I suspect 
that DFDSS doesn't support a phyiscial dataset backup for more than 1 dsn.
    On Thursday, 16 May 2019, 3:26:44 pm UTC, Pommier, Rex 
 wrote:

 Do you have some kind of hidden hex character in your input stream?

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
John Dawes
Sent: Thursday, May 16, 2019 10:21 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [External] Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

 I tried your suggestion but it didn't work:
ADR129E (001)-RI01 (01), KEYWORD '      ' IS IMPROPER

    On Thursday, 16 May 2019, 3:13:43 pm UTC, Mike Schwab 
 wrote:

 
https://apc01.safelinks.protection.outlook.com/?url=https%3A%2F%2Fwww.ibm.com%2Fsupport%2Fknowledgecenter%2Fen%2FSSLTBW_2.1.0%2Fcom.ibm.zos.v2r1.adru000%2Fr2298.htm=02%7C01%7Callan.staller%40HCL.COM%7C477dbed3b5f94d1640d508d6da1ddeb7%7C189de737c93a4f5a8b686f4ca9941912%7C0%7C0%7C636936219191148634=nUnrrCmo0KNzeZJ0J1jxn6InE%2Bb1Z44CMH7Ci6QrnxQ%3D=0

INCLUDE(data.set.one, -
                data.set.two)

Commas are REQUIRED.

On Thu, May 16, 2019 at 9:51 AM John Dawes 
<00ff0e22811f-dmarc-requ...@listserv.ua.edu> wrote:
>
> G'Day,
> I am encountering a problem performing a Physical dataset backup of
> several dsn which are on a specific volume.  For some reason it doesn't work. 
> I receive the error message ADR129E (001)-RI01 (01), KEYWORD '      ' IS 
> IMPROPER Below is the job output and the JCL.  Can you spot my error?  Does 
> DFDSS support a phyisical backup of multiple dsns?
> ADR031I (SCH)-PRIME(01), TYPRUN=NORUN REQUESTED. TASKS WILL EXECUTE
> INNORUN MODE DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)        -                    
>               DATASET(INCLUDE(HESP.IMS.PROD.MATRIX              -             
>                                  HESP.NETVIEW.PRF))          -                
>             TOL(ENQF)            -        OPT(4)ALLDATA(*) ALLEXCP ADR101I 
> (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'DUMP'
>
> ADR109I (R/I)-RI01 (01), 2019.136 10:21:19 INITIAL SCAN OF USER
> CONTROLSTATEMENT
>
> ADR129E (001)-RI01 (01), KEYWORD '    ' IS IMPROPER
>
> ADR131E (001)-RI03 (01), ABOVE TEXT BYPASSED UNTIL NEXT COMMAND
>
> ADR017E (001)-CLTSK(01), 2019.136 10:21:19 TASK NOT SCHEDULED DUE
> TOERROR. TASK
>
> /*
>
> //NORUN  EXECPGM=ADRDSSU,REGION=4096K,PARM='TYPRUN=NORUN'
>
> //*STEP1  EXECPGM=ADRDSSU,REGION=4M,TIME=1440,PARM='UTILMSG=YES'
>
> //DASD1    DD  UNIT=SYSDA,VOL=SER=PROD03,DISP=SHR
>
> //TAPE1    DD  DSN=MVS.PHYSICAL.BKUP.PROD03,
>
> //            DISP=(,CATLG,DELETE),UNIT=3490,VOL=(,,,99)
>
> //SYSPRINT DD  SYSOUT=*
>
> //SYSMAP  DD SYSOUT=*
>
> //SYSIN    DD  *
>  DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)        -
>DATASET(INCLUDE(HESP.IMS.PROD.MATRIX        -
>HESP.NETVIEW.PRF))            -  TOL(ENQF)                          -
>OPT(4) ALLDATA(*) ALLEXCP
> /*
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

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


The information contained in this message is confidential, protected from 
disclosure and may be legally privileged.  If the reader of this message is not 
the intended recipient or an employee or agent responsible for delivering this 
message to the intended recipient, you are hereby notified that any disclosure, 
distribution, copying, or any action taken or action omitted in reliance on it, 
is strictly prohibited and may be unlawful.  If you have received this 
communication in error, please 

Re: Fwd: IBM 'cloudifies' mainframe software pricing, adds hybrid, private cloud services | Network World

[Charles Mills]

"First, IBM rolled out  z/OS Container Extensions (zCX), which makes it 
possible to run Linux on Z applications that are packaged as Docker Container 
images on z/OS. "Linux under z/OS.Charles 
 Original message From: Mark Regan  Date: 
5/16/19  5:53 AM  (GMT-08:00) To: IBM-MAIN@LISTSERV.UA.EDU Subject: Fwd: IBM 
'cloudifies' mainframe software pricing, adds hybrid, private cloud services | 
Network World News article, see link below, in regards to IBM's software 
announcement ofyesterday: IBM United States Software Announcement 
219-014
  or 
https://tinyurl.com/yykuaslrhttps://www.networkworld.com/article/3395776/ibm-cloudifies-mainframe-software-pricing-adds-hybrid-private-cloud-services.html
 or https://tinyurl.com/yy2r2xds Regards, Mark T. Regan, K8MTRCTO1 
USNR-Retired, 1969-1991Nationwide Insurance, Retired, 1986-2017   
--For 
IBM-MAIN subscribe / signoff / archive access instructions,send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN

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

Re: [External] Re: Ancient DASD connectivity

[Alan Altmark]

On Wed, 15 May 2019 18:12:19 -0500, Tom Marchant  
wrote:
>The s/360 POO (available on bitsavers), says, 
>"A control unit may be housed separately or it may be physically 
>and logically integral with the I/O device."

The classic example of early CU integration was the 2701 communications 
controller and the integrated CTC adapters.

Disk, tape, and unit record devices of the same era had discrete controllers.   
Unit record CU (2821) was interesting in that it talked to devices that did 
different things: 1403/1404 printer and 2540 card reader-punch.  Clever of them.

But the up-and-coming display devices (3275) and printers (3211) were a visible 
hybrid with an "attached" CU.  3211 still named it separately (3811).  Kinda 
weird.

3430 tape had integrated CU in the A units, and after that I think integrated 
CU was de rigueur for all device types, with 3990 being the last one on the 
floor.  (BTW, once someone explains CU integration, the whole A/B model 
numbering thing makes more sense.)  I had always assumed that latency was 
driving engineers to shorten the distance between CU and device.

Alan Altmark
IBM

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

Re: [External] Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

[Pommier, Rex]

I just reread the manual.   INDDNAME is OK.  My other question still arises.  
Are both datasets on the same volume?

Rex

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Pommier, Rex
Sent: Thursday, May 16, 2019 11:48 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [External] Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

John,

Do you need to change your INDDNAME to PHYSINDD?  The 2.2 manual indicates that 
INDDNAME is used for full or track copying and PHYSINDD is used for datasets.  
Are both the datasets you're going after on the same volume?

Rex

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
John Dawes
Sent: Thursday, May 16, 2019 10:21 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [External] Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

 I tried your suggestion but it didn't work:
ADR129E (001)-RI01 (01), KEYWORD '      ' IS IMPROPER 

On Thursday, 16 May 2019, 3:13:43 pm UTC, Mike Schwab 
 wrote:  
 
 
https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.adru000/r2298.htm

INCLUDE(data.set.one, -
                data.set.two)

Commas are REQUIRED.

On Thu, May 16, 2019 at 9:51 AM John Dawes 
<00ff0e22811f-dmarc-requ...@listserv.ua.edu> wrote:
>
> G'Day,
> I am encountering a problem performing a Physical dataset backup of 
> several dsn which are on a specific volume.  For some reason it doesn't work. 
> I receive the error message ADR129E (001)-RI01 (01), KEYWORD '      ' IS 
> IMPROPER Below is the job output and the JCL.  Can you spot my error?  Does 
> DFDSS support a phyisical backup of multiple dsns?
> ADR031I (SCH)-PRIME(01), TYPRUN=NORUN REQUESTED. TASKS WILL EXECUTE 
> INNORUN MODE DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)        -                    
>               DATASET(INCLUDE(HESP.IMS.PROD.MATRIX              -             
>                                  HESP.NETVIEW.PRF))          -                
>             TOL(ENQF)            -        OPT(4)ALLDATA(*) ALLEXCP ADR101I 
> (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'DUMP'
>
> ADR109I (R/I)-RI01 (01), 2019.136 10:21:19 INITIAL SCAN OF USER 
> CONTROLSTATEMENT
>
> ADR129E (001)-RI01 (01), KEYWORD '    ' IS IMPROPER
>
> ADR131E (001)-RI03 (01), ABOVE TEXT BYPASSED UNTIL NEXT COMMAND
>
> ADR017E (001)-CLTSK(01), 2019.136 10:21:19 TASK NOT SCHEDULED DUE 
> TOERROR. TASK
>
> /*
>
> //NORUN  EXECPGM=ADRDSSU,REGION=4096K,PARM='TYPRUN=NORUN'
>
> //*STEP1  EXECPGM=ADRDSSU,REGION=4M,TIME=1440,PARM='UTILMSG=YES'
>
> //DASD1    DD  UNIT=SYSDA,VOL=SER=PROD03,DISP=SHR
>
> //TAPE1    DD  DSN=MVS.PHYSICAL.BKUP.PROD03,
>
> //            DISP=(,CATLG,DELETE),UNIT=3490,VOL=(,,,99)
>
> //SYSPRINT DD  SYSOUT=*
>
> //SYSMAP  DD SYSOUT=*
>
> //SYSIN    DD  *
>  DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)        - 
>DATASET(INCLUDE(HESP.IMS.PROD.MATRIX        -
>HESP.NETVIEW.PRF))            -  TOL(ENQF)                          -
>OPT(4) ALLDATA(*) ALLEXCP
> /*
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

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


The information contained in this message is confidential, protected from 
disclosure and may be legally privileged.  If the reader of this message is not 
the intended recipient or an employee or agent responsible for delivering this 
message to the intended recipient, you are hereby notified that any disclosure, 
distribution, copying, or any action taken or action omitted in reliance on it, 
is strictly prohibited and may be unlawful.  If you have received this 
communication in error, please notify us immediately by replying to this 
message and destroy the material in its entirety, whether in electronic or hard 
copy format.  Thank you.


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

The information contained in this message is confidential, protected from 
disclosure and may be legally privileged.  If the reader of this message is not 
the intended recipient or an employee or agent responsible for delivering this 
message to the intended recipient, you are hereby notified that any disclosure, 
distribution, copying, or any action taken or action omitted in reliance on it, 
is strictly prohibited and may be unlawful.  If 

Re: [External] Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

[John Dawes]

 Rex,I tried both INDDNAME & PHYSINDD as well.  I can confirm that both dsns 
are on the same volume.Maybe you can try a test to see if you can do a 
successful Physical backup of 2 dsns.I am curious if it works for you.  I am 
running V2R02.0 
On Thursday, 16 May 2019, 4:47:56 pm UTC, Pommier, Rex 
 wrote:  
 
 John,

Do you need to change your INDDNAME to PHYSINDD?  The 2.2 manual indicates that 
INDDNAME is used for full or track copying and PHYSINDD is used for datasets.  
Are both the datasets you're going after on the same volume?

Rex

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
John Dawes
Sent: Thursday, May 16, 2019 10:21 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [External] Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

 I tried your suggestion but it didn't work:
ADR129E (001)-RI01 (01), KEYWORD '      ' IS IMPROPER 

    On Thursday, 16 May 2019, 3:13:43 pm UTC, Mike Schwab 
 wrote:  
 
 
https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.adru000/r2298.htm

INCLUDE(data.set.one, -
                data.set.two)

Commas are REQUIRED.

On Thu, May 16, 2019 at 9:51 AM John Dawes 
<00ff0e22811f-dmarc-requ...@listserv.ua.edu> wrote:
>
> G'Day,
> I am encountering a problem performing a Physical dataset backup of 
> several dsn which are on a specific volume.  For some reason it doesn't work. 
> I receive the error message ADR129E (001)-RI01 (01), KEYWORD '      ' IS 
> IMPROPER Below is the job output and the JCL.  Can you spot my error?  Does 
> DFDSS support a phyisical backup of multiple dsns?
> ADR031I (SCH)-PRIME(01), TYPRUN=NORUN REQUESTED. TASKS WILL EXECUTE 
> INNORUN MODE DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)        -                    
>               DATASET(INCLUDE(HESP.IMS.PROD.MATRIX              -             
>                                  HESP.NETVIEW.PRF))          -                
>             TOL(ENQF)            -        OPT(4)ALLDATA(*) ALLEXCP ADR101I 
> (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'DUMP'
>
> ADR109I (R/I)-RI01 (01), 2019.136 10:21:19 INITIAL SCAN OF USER 
> CONTROLSTATEMENT
>
> ADR129E (001)-RI01 (01), KEYWORD '    ' IS IMPROPER
>
> ADR131E (001)-RI03 (01), ABOVE TEXT BYPASSED UNTIL NEXT COMMAND
>
> ADR017E (001)-CLTSK(01), 2019.136 10:21:19 TASK NOT SCHEDULED DUE 
> TOERROR. TASK
>
> /*
>
> //NORUN  EXECPGM=ADRDSSU,REGION=4096K,PARM='TYPRUN=NORUN'
>
> //*STEP1  EXECPGM=ADRDSSU,REGION=4M,TIME=1440,PARM='UTILMSG=YES'
>
> //DASD1    DD  UNIT=SYSDA,VOL=SER=PROD03,DISP=SHR
>
> //TAPE1    DD  DSN=MVS.PHYSICAL.BKUP.PROD03,
>
> //            DISP=(,CATLG,DELETE),UNIT=3490,VOL=(,,,99)
>
> //SYSPRINT DD  SYSOUT=*
>
> //SYSMAP  DD SYSOUT=*
>
> //SYSIN    DD  *
>  DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)        -    
>DATASET(INCLUDE(HESP.IMS.PROD.MATRIX        -                    
>HESP.NETVIEW.PRF))            -  TOL(ENQF)                          -        
>OPT(4) ALLDATA(*) ALLEXCP
> /*
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

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


The information contained in this message is confidential, protected from 
disclosure and may be legally privileged.  If the reader of this message is not 
the intended recipient or an employee or agent responsible for delivering this 
message to the intended recipient, you are hereby notified that any disclosure, 
distribution, copying, or any action taken or action omitted in reliance on it, 
is strictly prohibited and may be unlawful.  If you have received this 
communication in error, please notify us immediately by replying to this 
message and destroy the material in its entirety, whether in electronic or hard 
copy format.  Thank you.


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

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

Re: [External] Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

[John Dawes]

 Rex,
No, there is none. As I had mentioned before, if I execute the job to select 1 
dsn it works, however if I try with 2 or more dsns the job fails.  I suspect 
that DFDSS doesn't support a phyiscial dataset backup for more than 1 dsn.  
On Thursday, 16 May 2019, 3:26:44 pm UTC, Pommier, Rex 
 wrote:  
 
 Do you have some kind of hidden hex character in your input stream?

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
John Dawes
Sent: Thursday, May 16, 2019 10:21 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [External] Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

 I tried your suggestion but it didn't work:
ADR129E (001)-RI01 (01), KEYWORD '      ' IS IMPROPER 

    On Thursday, 16 May 2019, 3:13:43 pm UTC, Mike Schwab 
 wrote:  
 
 
https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.adru000/r2298.htm

INCLUDE(data.set.one, -
                data.set.two)

Commas are REQUIRED.

On Thu, May 16, 2019 at 9:51 AM John Dawes 
<00ff0e22811f-dmarc-requ...@listserv.ua.edu> wrote:
>
> G'Day,
> I am encountering a problem performing a Physical dataset backup of 
> several dsn which are on a specific volume.  For some reason it doesn't work. 
> I receive the error message ADR129E (001)-RI01 (01), KEYWORD '      ' IS 
> IMPROPER Below is the job output and the JCL.  Can you spot my error?  Does 
> DFDSS support a phyisical backup of multiple dsns?
> ADR031I (SCH)-PRIME(01), TYPRUN=NORUN REQUESTED. TASKS WILL EXECUTE 
> INNORUN MODE DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)        -                    
>               DATASET(INCLUDE(HESP.IMS.PROD.MATRIX              -             
>                                  HESP.NETVIEW.PRF))          -                
>             TOL(ENQF)            -        OPT(4)ALLDATA(*) ALLEXCP ADR101I 
> (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'DUMP'
>
> ADR109I (R/I)-RI01 (01), 2019.136 10:21:19 INITIAL SCAN OF USER 
> CONTROLSTATEMENT
>
> ADR129E (001)-RI01 (01), KEYWORD '    ' IS IMPROPER
>
> ADR131E (001)-RI03 (01), ABOVE TEXT BYPASSED UNTIL NEXT COMMAND
>
> ADR017E (001)-CLTSK(01), 2019.136 10:21:19 TASK NOT SCHEDULED DUE 
> TOERROR. TASK
>
> /*
>
> //NORUN  EXECPGM=ADRDSSU,REGION=4096K,PARM='TYPRUN=NORUN'
>
> //*STEP1  EXECPGM=ADRDSSU,REGION=4M,TIME=1440,PARM='UTILMSG=YES'
>
> //DASD1    DD  UNIT=SYSDA,VOL=SER=PROD03,DISP=SHR
>
> //TAPE1    DD  DSN=MVS.PHYSICAL.BKUP.PROD03,
>
> //            DISP=(,CATLG,DELETE),UNIT=3490,VOL=(,,,99)
>
> //SYSPRINT DD  SYSOUT=*
>
> //SYSMAP  DD SYSOUT=*
>
> //SYSIN    DD  *
>  DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)        -    
>DATASET(INCLUDE(HESP.IMS.PROD.MATRIX        -                    
>HESP.NETVIEW.PRF))            -  TOL(ENQF)                          -        
>OPT(4) ALLDATA(*) ALLEXCP
> /*
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

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


The information contained in this message is confidential, protected from 
disclosure and may be legally privileged.  If the reader of this message is not 
the intended recipient or an employee or agent responsible for delivering this 
message to the intended recipient, you are hereby notified that any disclosure, 
distribution, copying, or any action taken or action omitted in reliance on it, 
is strictly prohibited and may be unlawful.  If you have received this 
communication in error, please notify us immediately by replying to this 
message and destroy the material in its entirety, whether in electronic or hard 
copy format.  Thank you.


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

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

Re: [External] Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

[Pommier, Rex]

John,

Do you need to change your INDDNAME to PHYSINDD?  The 2.2 manual indicates that 
INDDNAME is used for full or track copying and PHYSINDD is used for datasets.  
Are both the datasets you're going after on the same volume?

Rex

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
John Dawes
Sent: Thursday, May 16, 2019 10:21 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [External] Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

 I tried your suggestion but it didn't work:
ADR129E (001)-RI01 (01), KEYWORD '      ' IS IMPROPER 

On Thursday, 16 May 2019, 3:13:43 pm UTC, Mike Schwab 
 wrote:  
 
 
https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.adru000/r2298.htm

INCLUDE(data.set.one, -
                data.set.two)

Commas are REQUIRED.

On Thu, May 16, 2019 at 9:51 AM John Dawes 
<00ff0e22811f-dmarc-requ...@listserv.ua.edu> wrote:
>
> G'Day,
> I am encountering a problem performing a Physical dataset backup of 
> several dsn which are on a specific volume.  For some reason it doesn't work. 
> I receive the error message ADR129E (001)-RI01 (01), KEYWORD '      ' IS 
> IMPROPER Below is the job output and the JCL.  Can you spot my error?  Does 
> DFDSS support a phyisical backup of multiple dsns?
> ADR031I (SCH)-PRIME(01), TYPRUN=NORUN REQUESTED. TASKS WILL EXECUTE 
> INNORUN MODE DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)        -                    
>               DATASET(INCLUDE(HESP.IMS.PROD.MATRIX              -             
>                                  HESP.NETVIEW.PRF))          -                
>             TOL(ENQF)            -        OPT(4)ALLDATA(*) ALLEXCP ADR101I 
> (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'DUMP'
>
> ADR109I (R/I)-RI01 (01), 2019.136 10:21:19 INITIAL SCAN OF USER 
> CONTROLSTATEMENT
>
> ADR129E (001)-RI01 (01), KEYWORD '    ' IS IMPROPER
>
> ADR131E (001)-RI03 (01), ABOVE TEXT BYPASSED UNTIL NEXT COMMAND
>
> ADR017E (001)-CLTSK(01), 2019.136 10:21:19 TASK NOT SCHEDULED DUE 
> TOERROR. TASK
>
> /*
>
> //NORUN  EXECPGM=ADRDSSU,REGION=4096K,PARM='TYPRUN=NORUN'
>
> //*STEP1  EXECPGM=ADRDSSU,REGION=4M,TIME=1440,PARM='UTILMSG=YES'
>
> //DASD1    DD  UNIT=SYSDA,VOL=SER=PROD03,DISP=SHR
>
> //TAPE1    DD  DSN=MVS.PHYSICAL.BKUP.PROD03,
>
> //            DISP=(,CATLG,DELETE),UNIT=3490,VOL=(,,,99)
>
> //SYSPRINT DD  SYSOUT=*
>
> //SYSMAP  DD SYSOUT=*
>
> //SYSIN    DD  *
>  DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)        -    
>DATASET(INCLUDE(HESP.IMS.PROD.MATRIX        -                    
>HESP.NETVIEW.PRF))            -  TOL(ENQF)                          -        
>OPT(4) ALLDATA(*) ALLEXCP
> /*
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

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


The information contained in this message is confidential, protected from 
disclosure and may be legally privileged.  If the reader of this message is not 
the intended recipient or an employee or agent responsible for delivering this 
message to the intended recipient, you are hereby notified that any disclosure, 
distribution, copying, or any action taken or action omitted in reliance on it, 
is strictly prohibited and may be unlawful.  If you have received this 
communication in error, please notify us immediately by replying to this 
message and destroy the material in its entirety, whether in electronic or hard 
copy format.  Thank you.


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

Re: [External] Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

[John Dawes]

 Alan,I'll try it out.  The only drawback is that I will be using more than 1 
tape to backup the dsns.In your example I will be using 2 tapes.
On Thursday, 16 May 2019, 4:54:38 pm UTC, Allan Staller 
 wrote:  
 
 Try this:
//INDD1 dd 
//INDD2 dd .
//OUTDD1 dd 
//OUTDD2 dd .
//SYSIN DD *
 Parallel
 DUMP DSN=datasetname1. Inddd=indd1outdd=outdd1
 DUMP DSN=datasetname2. Inddd=indd21outdd=outdd2

HTH,


-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
John Dawes
Sent: Thursday, May 16, 2019 11:45 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [External] Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

 Rex,
No, there is none. As I had mentioned before, if I execute the job to select 1 
dsn it works, however if I try with 2 or more dsns the job fails.  I suspect 
that DFDSS doesn't support a phyiscial dataset backup for more than 1 dsn.
    On Thursday, 16 May 2019, 3:26:44 pm UTC, Pommier, Rex 
 wrote:

 Do you have some kind of hidden hex character in your input stream?

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
John Dawes
Sent: Thursday, May 16, 2019 10:21 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [External] Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

 I tried your suggestion but it didn't work:
ADR129E (001)-RI01 (01), KEYWORD '      ' IS IMPROPER

    On Thursday, 16 May 2019, 3:13:43 pm UTC, Mike Schwab 
 wrote:

 
https://apc01.safelinks.protection.outlook.com/?url=https%3A%2F%2Fwww.ibm.com%2Fsupport%2Fknowledgecenter%2Fen%2FSSLTBW_2.1.0%2Fcom.ibm.zos.v2r1.adru000%2Fr2298.htm=02%7C01%7Callan.staller%40HCL.COM%7C477dbed3b5f94d1640d508d6da1ddeb7%7C189de737c93a4f5a8b686f4ca9941912%7C0%7C0%7C636936219191148634=nUnrrCmo0KNzeZJ0J1jxn6InE%2Bb1Z44CMH7Ci6QrnxQ%3D=0

INCLUDE(data.set.one, -
                data.set.two)

Commas are REQUIRED.

On Thu, May 16, 2019 at 9:51 AM John Dawes 
<00ff0e22811f-dmarc-requ...@listserv.ua.edu> wrote:
>
> G'Day,
> I am encountering a problem performing a Physical dataset backup of
> several dsn which are on a specific volume.  For some reason it doesn't work. 
> I receive the error message ADR129E (001)-RI01 (01), KEYWORD '      ' IS 
> IMPROPER Below is the job output and the JCL.  Can you spot my error?  Does 
> DFDSS support a phyisical backup of multiple dsns?
> ADR031I (SCH)-PRIME(01), TYPRUN=NORUN REQUESTED. TASKS WILL EXECUTE
> INNORUN MODE DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)        -                    
>               DATASET(INCLUDE(HESP.IMS.PROD.MATRIX              -             
>                                  HESP.NETVIEW.PRF))          -                
>             TOL(ENQF)            -        OPT(4)ALLDATA(*) ALLEXCP ADR101I 
> (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'DUMP'
>
> ADR109I (R/I)-RI01 (01), 2019.136 10:21:19 INITIAL SCAN OF USER
> CONTROLSTATEMENT
>
> ADR129E (001)-RI01 (01), KEYWORD '    ' IS IMPROPER
>
> ADR131E (001)-RI03 (01), ABOVE TEXT BYPASSED UNTIL NEXT COMMAND
>
> ADR017E (001)-CLTSK(01), 2019.136 10:21:19 TASK NOT SCHEDULED DUE
> TOERROR. TASK
>
> /*
>
> //NORUN  EXECPGM=ADRDSSU,REGION=4096K,PARM='TYPRUN=NORUN'
>
> //*STEP1  EXECPGM=ADRDSSU,REGION=4M,TIME=1440,PARM='UTILMSG=YES'
>
> //DASD1    DD  UNIT=SYSDA,VOL=SER=PROD03,DISP=SHR
>
> //TAPE1    DD  DSN=MVS.PHYSICAL.BKUP.PROD03,
>
> //            DISP=(,CATLG,DELETE),UNIT=3490,VOL=(,,,99)
>
> //SYSPRINT DD  SYSOUT=*
>
> //SYSMAP  DD SYSOUT=*
>
> //SYSIN    DD  *
>  DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)        -
>DATASET(INCLUDE(HESP.IMS.PROD.MATRIX        -
>HESP.NETVIEW.PRF))            -  TOL(ENQF)                          -
>OPT(4) ALLDATA(*) ALLEXCP
> /*
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

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


The information contained in this message is confidential, protected from 
disclosure and may be legally privileged.  If the reader of this message is not 
the intended recipient or an employee or agent responsible for delivering this 
message to the intended recipient, you are hereby notified that any disclosure, 
distribution, copying, or any action taken or action omitted in reliance on it, 
is strictly prohibited and may be unlawful.  If you have received this 
communication in error, please notify us immediately by replying to this 
message and destroy the material in its entirety, whether in 

Re: [External] Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

[Allan Staller]

Try this:
//INDD1 dd 
//INDD2 dd .
//OUTDD1 dd 
//OUTDD2 dd .
//SYSIN DD *
 Parallel
 DUMP DSN=datasetname1. Inddd=indd1outdd=outdd1
 DUMP DSN=datasetname2. Inddd=indd21outdd=outdd2

HTH,


-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
John Dawes
Sent: Thursday, May 16, 2019 11:45 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [External] Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

 Rex,
No, there is none. As I had mentioned before, if I execute the job to select 1 
dsn it works, however if I try with 2 or more dsns the job fails.  I suspect 
that DFDSS doesn't support a phyiscial dataset backup for more than 1 dsn.
On Thursday, 16 May 2019, 3:26:44 pm UTC, Pommier, Rex 
 wrote:

 Do you have some kind of hidden hex character in your input stream?

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
John Dawes
Sent: Thursday, May 16, 2019 10:21 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [External] Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

 I tried your suggestion but it didn't work:
ADR129E (001)-RI01 (01), KEYWORD '  ' IS IMPROPER

On Thursday, 16 May 2019, 3:13:43 pm UTC, Mike Schwab 
 wrote:

 
https://apc01.safelinks.protection.outlook.com/?url=https%3A%2F%2Fwww.ibm.com%2Fsupport%2Fknowledgecenter%2Fen%2FSSLTBW_2.1.0%2Fcom.ibm.zos.v2r1.adru000%2Fr2298.htmdata=02%7C01%7Callan.staller%40HCL.COM%7C477dbed3b5f94d1640d508d6da1ddeb7%7C189de737c93a4f5a8b686f4ca9941912%7C0%7C0%7C636936219191148634sdata=nUnrrCmo0KNzeZJ0J1jxn6InE%2Bb1Z44CMH7Ci6QrnxQ%3Dreserved=0

INCLUDE(data.set.one, -
data.set.two)

Commas are REQUIRED.

On Thu, May 16, 2019 at 9:51 AM John Dawes 
<00ff0e22811f-dmarc-requ...@listserv.ua.edu> wrote:
>
> G'Day,
> I am encountering a problem performing a Physical dataset backup of
> several dsn which are on a specific volume.  For some reason it doesn't work. 
> I receive the error message ADR129E (001)-RI01 (01), KEYWORD '  ' IS 
> IMPROPER Below is the job output and the JCL.  Can you spot my error?  Does 
> DFDSS support a phyisical backup of multiple dsns?
> ADR031I (SCH)-PRIME(01), TYPRUN=NORUN REQUESTED. TASKS WILL EXECUTE
> INNORUN MODE DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)-
>   DATASET(INCLUDE(HESP.IMS.PROD.MATRIX  - 
>  HESP.NETVIEW.PRF))  -
> TOL(ENQF)-OPT(4)ALLDATA(*) ALLEXCP ADR101I 
> (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'DUMP'
>
> ADR109I (R/I)-RI01 (01), 2019.136 10:21:19 INITIAL SCAN OF USER
> CONTROLSTATEMENT
>
> ADR129E (001)-RI01 (01), KEYWORD '' IS IMPROPER
>
> ADR131E (001)-RI03 (01), ABOVE TEXT BYPASSED UNTIL NEXT COMMAND
>
> ADR017E (001)-CLTSK(01), 2019.136 10:21:19 TASK NOT SCHEDULED DUE
> TOERROR. TASK
>
> /*
>
> //NORUN  EXECPGM=ADRDSSU,REGION=4096K,PARM='TYPRUN=NORUN'
>
> //*STEP1  EXECPGM=ADRDSSU,REGION=4M,TIME=1440,PARM='UTILMSG=YES'
>
> //DASD1DD  UNIT=SYSDA,VOL=SER=PROD03,DISP=SHR
>
> //TAPE1DD  DSN=MVS.PHYSICAL.BKUP.PROD03,
>
> //DISP=(,CATLG,DELETE),UNIT=3490,VOL=(,,,99)
>
> //SYSPRINT DD  SYSOUT=*
>
> //SYSMAP  DD SYSOUT=*
>
> //SYSINDD  *
>  DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)-
>DATASET(INCLUDE(HESP.IMS.PROD.MATRIX-
>HESP.NETVIEW.PRF))-  TOL(ENQF)  -
>OPT(4) ALLDATA(*) ALLEXCP
> /*
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

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


The information contained in this message is confidential, protected from 
disclosure and may be legally privileged.  If the reader of this message is not 
the intended recipient or an employee or agent responsible for delivering this 
message to the intended recipient, you are hereby notified that any disclosure, 
distribution, copying, or any action taken or action omitted in reliance on it, 
is strictly prohibited and may be unlawful.  If you have received this 
communication in error, please notify us immediately by replying to this 
message and destroy the material in its entirety, whether in electronic or hard 
copy format.  Thank you.


--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 

Re: [External] Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

[Allan Staller]

Yup. 2 datasets backed up in parallel to two separate tapes. 

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
John Dawes
Sent: Thursday, May 16, 2019 12:00 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [External] Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

 Alan,I'll try it out.  The only drawback is that I will be using more than 1 
tape to backup the dsns.In your example I will be using 2 tapes.
On Thursday, 16 May 2019, 4:54:38 pm UTC, Allan Staller 
 wrote:  
 
 Try this:
//INDD1 dd 
//INDD2 dd .
//OUTDD1 dd 
//OUTDD2 dd .
//SYSIN DD *
 Parallel
 DUMP DSN=datasetname1. Inddd=indd1outdd=outdd1
 DUMP DSN=datasetname2. Inddd=indd21outdd=outdd2

HTH,


-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
John Dawes
Sent: Thursday, May 16, 2019 11:45 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [External] Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

 Rex,
No, there is none. As I had mentioned before, if I execute the job to select 1 
dsn it works, however if I try with 2 or more dsns the job fails.  I suspect 
that DFDSS doesn't support a phyiscial dataset backup for more than 1 dsn.
    On Thursday, 16 May 2019, 3:26:44 pm UTC, Pommier, Rex 
 wrote:

 Do you have some kind of hidden hex character in your input stream?

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
John Dawes
Sent: Thursday, May 16, 2019 10:21 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [External] Re: DFDSS QUESTION - PHYSICAL DATASET BACKUP

 I tried your suggestion but it didn't work:
ADR129E (001)-RI01 (01), KEYWORD '      ' IS IMPROPER

    On Thursday, 16 May 2019, 3:13:43 pm UTC, Mike Schwab 
 wrote:

 
https://apc01.safelinks.protection.outlook.com/?url=https%3A%2F%2Fwww.ibm.com%2Fsupport%2Fknowledgecenter%2Fen%2FSSLTBW_2.1.0%2Fcom.ibm.zos.v2r1.adru000%2Fr2298.htmdata=02%7C01%7Callan.staller%40HCL.COM%7C5dbc1f61092f48e522ff08d6da1ffc55%7C189de737c93a4f5a8b686f4ca9941912%7C0%7C0%7C636936228285338559sdata=BxsKicv4l8GzWTU1l%2BbkbQA1cVoPwNixvoisSoK5ij4%3Dreserved=0

INCLUDE(data.set.one, -
                data.set.two)

Commas are REQUIRED.

On Thu, May 16, 2019 at 9:51 AM John Dawes 
<00ff0e22811f-dmarc-requ...@listserv.ua.edu> wrote:
>
> G'Day,
> I am encountering a problem performing a Physical dataset backup of 
> several dsn which are on a specific volume.  For some reason it doesn't work. 
> I receive the error message ADR129E (001)-RI01 (01), KEYWORD '      ' IS 
> IMPROPER Below is the job output and the JCL.  Can you spot my error?  Does 
> DFDSS support a phyisical backup of multiple dsns?
> ADR031I (SCH)-PRIME(01), TYPRUN=NORUN REQUESTED. TASKS WILL EXECUTE 
> INNORUN MODE DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)        -                    
>               DATASET(INCLUDE(HESP.IMS.PROD.MATRIX              -             
>                                  HESP.NETVIEW.PRF))          -                
>             TOL(ENQF)            -        OPT(4)ALLDATA(*) ALLEXCP ADR101I 
> (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'DUMP'
>
> ADR109I (R/I)-RI01 (01), 2019.136 10:21:19 INITIAL SCAN OF USER 
> CONTROLSTATEMENT
>
> ADR129E (001)-RI01 (01), KEYWORD '    ' IS IMPROPER
>
> ADR131E (001)-RI03 (01), ABOVE TEXT BYPASSED UNTIL NEXT COMMAND
>
> ADR017E (001)-CLTSK(01), 2019.136 10:21:19 TASK NOT SCHEDULED DUE 
> TOERROR. TASK
>
> /*
>
> //NORUN  EXECPGM=ADRDSSU,REGION=4096K,PARM='TYPRUN=NORUN'
>
> //*STEP1  EXECPGM=ADRDSSU,REGION=4M,TIME=1440,PARM='UTILMSG=YES'
>
> //DASD1    DD  UNIT=SYSDA,VOL=SER=PROD03,DISP=SHR
>
> //TAPE1    DD  DSN=MVS.PHYSICAL.BKUP.PROD03,
>
> //            DISP=(,CATLG,DELETE),UNIT=3490,VOL=(,,,99)
>
> //SYSPRINT DD  SYSOUT=*
>
> //SYSMAP  DD SYSOUT=*
>
> //SYSIN    DD  *
>  DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)        - 
>DATASET(INCLUDE(HESP.IMS.PROD.MATRIX        -
>HESP.NETVIEW.PRF))            -  TOL(ENQF)                          -
>OPT(4) ALLDATA(*) ALLEXCP
> /*
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

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


The information contained in this message is confidential, protected from 
disclosure and may be legally privileged.  If the reader of this message is not 
the intended recipient or an employee or agent responsible for delivering this 
message to the intended recipient, you are hereby notified that