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

Discussion:

(too old to reply)

Barkow, Eileen

2018-05-16 15:56:01 UTC

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

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

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

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

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

________________________________

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

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

Dyck, Lionel B. , RavenTek

2018-05-16 16:00:53 UTC

Permalink

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

Hope this helps

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

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

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

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

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

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

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

________________________________

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

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

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

Barkow, Eileen

2018-05-16 16:49:30 UTC

Permalink

THANK YOU Lionel!
The TERSE/UNTERSE worked.
Although I think that these utilities should be able to work on their own.

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:IBM-***@LISTSERV.UA.EDU] On Behalf Of Dyck, Lionel B. (RavenTek)
Sent: Wednesday, May 16, 2018 12:02 PM
To: IBM-***@LISTSERV.UA.EDU
Subject: Re: trying to reload a pdse after it has been unloaded and ftp'd

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

Hope this helps

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

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

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

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

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

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

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

________________________________

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

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

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

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

Jackson, Rob

2018-05-16 18:07:59 UTC

Permalink

We DSS dump and FTP hundreds of PDSs and PDSEs every day (don't ask), both text and loadlibs. From z/OS to z/OS you don't need to worry about tersing for portability. You just need 'type e' and 'mode b' in your FTP control cards.

First Tennessee Bank
Mainframe Technical Support

-----Original Message-----
From: IBM Mainframe Discussion List <IBM-***@LISTSERV.UA.EDU> On Behalf Of Barkow, Eileen
Sent: Wednesday, May 16, 2018 12:51 PM
To: IBM-***@LISTSERV.UA.EDU
Subject: Re: trying to reload a pdse after it has been unloaded and ftp'd

[External Email]

THANK YOU Lionel!
The TERSE/UNTERSE worked.
Although I think that these utilities should be able to work on their own.

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:IBM-***@LISTSERV.UA.EDU] On Behalf Of Dyck, Lionel B. (RavenTek)
Sent: Wednesday, May 16, 2018 12:02 PM
To: IBM-***@LISTSERV.UA.EDU
Subject: Re: trying to reload a pdse after it has been unloaded and ftp'd

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

Hope this helps

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

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

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

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

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

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

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

________________________________

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

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

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

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

Barkow, Eileen

2018-05-16 19:09:58 UTC

Permalink

Thanks a lot for type e and mode b -
I remember using them for something or other in the past.
Getting rid of the terse will help.

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

We DSS dump and FTP hundreds of PDSs and PDSEs every day (don't ask), both text and loadlibs. From z/OS to z/OS you don't need to worry about tersing for portability. You just need 'type e' and 'mode b' in your FTP control cards.

First Tennessee Bank
Mainframe Technical Support

-----Original Message-----
From: IBM Mainframe Discussion List <IBM-***@LISTSERV.UA.EDU> On Behalf Of Barkow, Eileen
Sent: Wednesday, May 16, 2018 12:51 PM
To: IBM-***@LISTSERV.UA.EDU
Subject: Re: trying to reload a pdse after it has been unloaded and ftp'd

[External Email]

THANK YOU Lionel!
The TERSE/UNTERSE worked.
Although I think that these utilities should be able to work on their own.

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:IBM-***@LISTSERV.UA.EDU] On Behalf Of Dyck, Lionel B. (RavenTek)
Sent: Wednesday, May 16, 2018 12:02 PM
To: IBM-***@LISTSERV.UA.EDU
Subject: Re: trying to reload a pdse after it has been unloaded and ftp'd

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

Hope this helps

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

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

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

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

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

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

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

________________________________

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

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

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

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

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

Barkow, Eileen

2018-05-16 19:47:58 UTC

Permalink

I used mode b type e and ADRSSSU is not recognizing the INPUT file

ADR389E (001)-TDDS (07), INVALID INPUT ON DDNAME IN, INPUT DATA SET NOT PRODUCED
//RESTFA EXEC PGM=ADRDSSU,COND=(0,NE)
//SYSPRINT DD SYSOUT=*
//IN DD DSN=PBCDOFP.FA.HIST.DUMPED,DISP=SHR

COMMAND INPUT ===> SCROLL ===> P
EZA1701I >>> PASS
230 FTPPMSA is logged on. Working directory is "FTPPMSA.".
EZA1460I Command:
EZA1736I mode B
EZA1701I >>> MODE B
200 Data transfer mode is Block
EZA1460I Command:
EZA1736I type e
EZA1701I >>> TYPE E
200 Representation type is Ebcdic NonPrint
EZA1460I Command:
EZA1736I LOCSITE TR PRI=500 SEC=60
EZA1460I Command:
EZA1736I LOCSITE LRECL=1024 BLKSIZE=27648 RECFM=FB
EZA1460I Command:
EZA1736I GET 'XCICS.FA.HIST.DUMPED' 'PBCDOFP.FA.HIST.DUMPED' (REPLACE
EZA1701I >>> PASV

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

We DSS dump and FTP hundreds of PDSs and PDSEs every day (don't ask), both text and loadlibs. From z/OS to z/OS you don't need to worry about tersing for portability. You just need 'type e' and 'mode b' in your FTP control cards.

First Tennessee Bank
Mainframe Technical Support

-----Original Message-----
From: IBM Mainframe Discussion List <IBM-***@LISTSERV.UA.EDU> On Behalf Of Barkow, Eileen
Sent: Wednesday, May 16, 2018 12:51 PM
To: IBM-***@LISTSERV.UA.EDU
Subject: Re: trying to reload a pdse after it has been unloaded and ftp'd

[External Email]

THANK YOU Lionel!
The TERSE/UNTERSE worked.
Although I think that these utilities should be able to work on their own.

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:IBM-***@LISTSERV.UA.EDU] On Behalf Of Dyck, Lionel B. (RavenTek)
Sent: Wednesday, May 16, 2018 12:02 PM
To: IBM-***@LISTSERV.UA.EDU
Subject: Re: trying to reload a pdse after it has been unloaded and ftp'd

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

Hope this helps

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

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

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

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

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

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

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

________________________________

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

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

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

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

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

Jackson, Rob

2018-05-16 20:15:24 UTC

Permalink

That looks like the DCB for a tersed dataset. DSS would be creating RECFM=U and BLKSIZE=27998 on disk.

Try this instead:

LOCSITE VARrecfm LRECL=27998 RECFM=U BLKSIZE=27998

First Tennessee Bank
Mainframe Technical Support

-----Original Message-----
From: IBM Mainframe Discussion List <IBM-***@LISTSERV.UA.EDU> On Behalf Of Barkow, Eileen
Sent: Wednesday, May 16, 2018 3:49 PM
To: IBM-***@LISTSERV.UA.EDU
Subject: Re: trying to reload a pdse after it has been unloaded and ftp'd

[External Email]

I used mode b type e and ADRSSSU is not recognizing the INPUT file

ADR389E (001)-TDDS (07), INVALID INPUT ON DDNAME IN, INPUT DATA SET NOT PRODUCED
//RESTFA EXEC PGM=ADRDSSU,COND=(0,NE)
//SYSPRINT DD SYSOUT=*
//IN DD DSN=PBCDOFP.FA.HIST.DUMPED,DISP=SHR

COMMAND INPUT ===> SCROLL ===> P
EZA1701I >>> PASS
230 FTPPMSA is logged on. Working directory is "FTPPMSA.".
EZA1460I Command:
EZA1736I mode B
EZA1701I >>> MODE B
200 Data transfer mode is Block
EZA1460I Command:
EZA1736I type e
EZA1701I >>> TYPE E
200 Representation type is Ebcdic NonPrint EZA1460I Command:
EZA1736I LOCSITE TR PRI=500 SEC=60
EZA1460I Command:
EZA1736I LOCSITE LRECL=1024 BLKSIZE=27648 RECFM=FB EZA1460I Command:
EZA1736I GET 'XCICS.FA.HIST.DUMPED' 'PBCDOFP.FA.HIST.DUMPED' (REPLACE EZA1701I >>> PASV

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

We DSS dump and FTP hundreds of PDSs and PDSEs every day (don't ask), both text and loadlibs. From z/OS to z/OS you don't need to worry about tersing for portability. You just need 'type e' and 'mode b' in your FTP control cards.

First Tennessee Bank
Mainframe Technical Support

-----Original Message-----
From: IBM Mainframe Discussion List <IBM-***@LISTSERV.UA.EDU> On Behalf Of Barkow, Eileen
Sent: Wednesday, May 16, 2018 12:51 PM
To: IBM-***@LISTSERV.UA.EDU
Subject: Re: trying to reload a pdse after it has been unloaded and ftp'd

[External Email]

THANK YOU Lionel!
The TERSE/UNTERSE worked.
Although I think that these utilities should be able to work on their own.

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:IBM-***@LISTSERV.UA.EDU] On Behalf Of Dyck, Lionel B. (RavenTek)
Sent: Wednesday, May 16, 2018 12:02 PM
To: IBM-***@LISTSERV.UA.EDU
Subject: Re: trying to reload a pdse after it has been unloaded and ftp'd

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

Hope this helps

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

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

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

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

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

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

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

________________________________

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

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

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

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

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

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

Seymour J Metz

2018-05-16 16:01:37 UTC

Permalink

You can FTP an XMIT unload.

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

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

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

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

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

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

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

________________________________

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

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

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

Barkow, Eileen

2018-05-16 16:50:36 UTC

Permalink

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

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

You can FTP an XMIT unload.

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

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

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

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

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

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

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

________________________________

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

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

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

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

Dyck, Lionel B. , RavenTek

2018-05-16 16:56:28 UTC

Permalink

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

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

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

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

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

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

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

You can FTP an XMIT unload.

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

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

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

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

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

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

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

________________________________

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

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

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

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

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

Farley, Peter x23353

2018-05-16 16:56:50 UTC

Permalink

You don't really need to worry about the XMIT userid - just specify anything at all, ABCD.DEFGHIJK will do. The basic idea is that you are using XMIT to set up a transportable copy of the PDSE and that you will be using FTP to send the file, not actually XMITting it.

HTH

Peter

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

EXTERNAL EMAIL

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

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

You can FTP an XMIT unload.

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

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

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

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

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

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

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

________________________________

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

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

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

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

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 ***@listserv.ua.edu with the message: INFO IBM-MAIN

Steve Horein

2018-05-16 17:54:39 UTC

Permalink

Although I haven't used it much, it would seem ftp's MVSPUT 'XCICS.FA.HIST'
'XCICS.FA.HIST.RESTORED' (REALLOC could eliminate some steps?

Post by Barkow, Eileen
I am trying to reload an unloaded pdse after it has been ftp'd to a target lpar.
there is a known problem with this using IEBCOPY UNLOAD/RELOAD described
on IBMLINK and none of the
work-around overrides to ftp work. TRSMAIN/TERSE does not support PDSE. So
I switched over to ADRDSSU.
I dump a dataset and am able to restore it on the same lpar.
However, when i ftp the dumped dataset to the remote lpar, the restore
fails because the input dataset is not valid for ADRDSSU
(tried ftp with both BIN and EBCDIC default).
both datasets (remote and local) look the same to me when browsing them
and have the same dcb info.
does anyone know how to restore an unloaded pdse that has been ftp'd?
thanks in advance for any info.
****************************************
Data Set Name . . . . : XCICS.FA.HIST.DUMPED
General Data
Management class . . : **None**
Storage class . . . : **None**
Volume serial . . . : W1STG2
Device type . . . . : 3390
Data class . . . . . : **None**
Organization . . . : PS
Record format . . . : U
Record length . . . : 0
Block size . . . . : 27998
1st extent tracks . : 1500
Secondary tracks . : 60
***original job used to create XCICS.FA.HIST.DUMPED******
//DUMP EXEC PGM=ADRDSSU
//SYSPRINT DD SYSOUT=A
//DASD1 DD UNIT=SYSDA,VOL=SER=XCICX0,DISP=SHR
//TAPE DD UNIT=SYSDA,
// DISP=(NEW,CATLG),DSNAME=XCICS.FA.HIST.DUMPED,
// SPACE=(TRK,(1500,60),RLSE)
//SYSIN DD *
DUMP LOGINDDNAME(DASD1) OUTDDNAME(TAPE) -
DATASET(INCLUDE(XCICS.FA.HIST)) WAIT(0,0)
/*
//****************************************************
**job to restore after ftp of XCICS.FA.HIST.DUMPED to remote lpar******
//RESTFA EXEC PGM=ADRDSSU COND=((0,NE),(0,EQ))
//*EST EXEC PGM=ADRDSSU,PARM='TYPRUN=NORUN'
//SYSPRINT DD SYSOUT=*
//IN DD DSN=XCICS.FA.HIST.DUMPED,DISP=SHR
//OUT DD VOL=SER=W1STG2,DISP=SHR,UNIT=SYSDA
//SYSIN DD *
RESTORE INDD(IN) OUTDD(OUT) DATASET(INCLUDE(XCICS.FA.HIST)) -
CATALOG -
RENUNC(XCICS.FA.HIST,XCICS.FA.HIST.RESTORED) REPLACE
//
************************************************************
*********************
PAGE 0001 5695-DF175 DFSMSDSS V2R02.0 DATA SET SERVICES 2018.136 11:13
RESTORE INDD(IN) OUTDD(OUT) DATASET(INCLUDE(XCICS.FA.HIST)) -
CATALOG -
RENUNC(XCICS.FA.HIST,XCICS.FA.HIST.RESTORED) REPLACE
ADR101I (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'RESTORE '
ADR109I (R/I)-RI01 (01), 2018.136 11:13:26 INITIAL SCAN OF USER CONTROL STATEMEN
ADR016I (001)-PRIME(01), RACF LOGGING OPTION IN EFFECT FOR THIS TASK
ADR006I (001)-STEND(01), 2018.136 11:13:26 EXECUTION BEGINS
ADR389E (001)-TDDS (07), INVALID INPUT ON DDNAME IN, INPUT DATA SET NOT PRODUCED
ADR415W (001)-TDDS (02), NO DATA SETS WERE COPIED, DUMPED, OR RESTORED FROM ANY
ADR006I (001)-STEND(02), 2018.136 11:13:26 EXECUTION ENDS
ADR013I (001)-CLTSK(01), 2018.136 11:13:26 TASK COMPLETED WITH RETURN CODE 0008
ADR012I (SCH)-DSSU (01), 2018.136 11:13:26 DFSMSDSS PROCESSING COMPLETE. HIGHEST
________________________________
This e-mail, including any attachments, may be confidential, privileged or
otherwise legally protected. It is intended only for the addressee. If you
received this e-mail in error or from someone who was not authorized to
send it to you, do not disseminate, copy or otherwise use this e-mail or
its attachments. Please notify the sender immediately by reply e-mail and
delete the e-mail from your system.
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,

Steve Horein

2018-05-16 17:55:57 UTC

Permalink

Forgot to include the link:
https://www.ibm.com/support/knowledgecenter/SSLTBW_2.2.0/com.ibm.zos.v2r2.halu001/mvsputsubcmd.htm

Post by Steve Horein
Although I haven't used it much, it would seem ftp's MVSPUT 'XCICS.FA.HIST'
'XCICS.FA.HIST.RESTORED' (REALLOC could eliminate some steps?

Post by Barkow, Eileen
I am trying to reload an unloaded pdse after it has been ftp'd to a target lpar.
there is a known problem with this using IEBCOPY UNLOAD/RELOAD described
on IBMLINK and none of the
work-around overrides to ftp work. TRSMAIN/TERSE does not support PDSE.
So I switched over to ADRDSSU.
I dump a dataset and am able to restore it on the same lpar.
However, when i ftp the dumped dataset to the remote lpar, the restore
fails because the input dataset is not valid for ADRDSSU
(tried ftp with both BIN and EBCDIC default).
both datasets (remote and local) look the same to me when browsing them
and have the same dcb info.
does anyone know how to restore an unloaded pdse that has been ftp'd?
thanks in advance for any info.
****************************************
Data Set Name . . . . : XCICS.FA.HIST.DUMPED
General Data
Management class . . : **None**
Storage class . . . : **None**
Volume serial . . . : W1STG2
Device type . . . . : 3390
Data class . . . . . : **None**
Organization . . . : PS
Record format . . . : U
Record length . . . : 0
Block size . . . . : 27998
1st extent tracks . : 1500
Secondary tracks . : 60
***original job used to create XCICS.FA.HIST.DUMPED******
//DUMP EXEC PGM=ADRDSSU
//SYSPRINT DD SYSOUT=A
//DASD1 DD UNIT=SYSDA,VOL=SER=XCICX0,DISP=SHR
//TAPE DD UNIT=SYSDA,
// DISP=(NEW,CATLG),DSNAME=XCICS.FA.HIST.DUMPED,
// SPACE=(TRK,(1500,60),RLSE)
//SYSIN DD *
DUMP LOGINDDNAME(DASD1) OUTDDNAME(TAPE) -
DATASET(INCLUDE(XCICS.FA.HIST)) WAIT(0,0)
/*
//****************************************************
**job to restore after ftp of XCICS.FA.HIST.DUMPED to remote lpar******
//RESTFA EXEC PGM=ADRDSSU COND=((0,NE),(0,EQ))
//*EST EXEC PGM=ADRDSSU,PARM='TYPRUN=NORUN'
//SYSPRINT DD SYSOUT=*
//IN DD DSN=XCICS.FA.HIST.DUMPED,DISP=SHR
//OUT DD VOL=SER=W1STG2,DISP=SHR,UNIT=SYSDA
//SYSIN DD *
RESTORE INDD(IN) OUTDD(OUT) DATASET(INCLUDE(XCICS.FA.HIST)) -
CATALOG -
RENUNC(XCICS.FA.HIST,XCICS.FA.HIST.RESTORED) REPLACE
//
************************************************************
*********************
PAGE 0001 5695-DF175 DFSMSDSS V2R02.0 DATA SET SERVICES 2018.136 11:13
RESTORE INDD(IN) OUTDD(OUT) DATASET(INCLUDE(XCICS.FA.HIST)) -
CATALOG -
RENUNC(XCICS.FA.HIST,XCICS.FA.HIST.RESTORED) REPLACE
ADR101I (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'RESTORE '
ADR109I (R/I)-RI01 (01), 2018.136 11:13:26 INITIAL SCAN OF USER CONTROL STATEMEN
ADR016I (001)-PRIME(01), RACF LOGGING OPTION IN EFFECT FOR THIS TASK
ADR006I (001)-STEND(01), 2018.136 11:13:26 EXECUTION BEGINS
ADR389E (001)-TDDS (07), INVALID INPUT ON DDNAME IN, INPUT DATA SET NOT PRODUCED
ADR415W (001)-TDDS (02), NO DATA SETS WERE COPIED, DUMPED, OR RESTORED FROM ANY
ADR006I (001)-STEND(02), 2018.136 11:13:26 EXECUTION ENDS
ADR013I (001)-CLTSK(01), 2018.136 11:13:26 TASK COMPLETED WITH RETURN CODE 0008
ADR012I (SCH)-DSSU (01), 2018.136 11:13:26 DFSMSDSS PROCESSING COMPLETE. HIGHEST
________________________________
This e-mail, including any attachments, may be confidential, privileged
or otherwise legally protected. It is intended only for the addressee. If
you received this e-mail in error or from someone who was not authorized to
send it to you, do not disseminate, copy or otherwise use this e-mail or
its attachments. Please notify the sender immediately by reply e-mail and
delete the e-mail from your system.
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,

Barkow, Eileen

2018-05-16 17:59:21 UTC

Permalink

There is a 'mput' ftp command to ftp all the members but it takes a long time.
I am not sure about the MVSPUT option.

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

Although I haven't used it much, it would seem ftp's MVSPUT 'XCICS.FA.HIST'
'XCICS.FA.HIST.RESTORED' (REALLOC could eliminate some steps?

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

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

Paul Gilmartin

2018-05-16 19:13:08 UTC

Permalink

Post by Barkow, Eileen
THANK YOU Lionel!
The TERSE/UNTERSE worked.
Although I think that these utilities should be able to work on their own.

+1

Archivers such as IEBCOPY, ADRDSSU, TRSMAIN, ... should generate portable
archives which can be transmitted via conduits independent on the idiosyncrasies
of z/OS and its peripheral devices. TRANSMIT and pax get it right.

Post by Barkow, Eileen
XMIT x.y DS(input) ODS(xxx.xmit)
Where x.y is node.userid but that can be anything as it is just going to a dataset

And, blessedly, RECEIVE verifies or enforces neither the receiving node nor the
receiving userid.

Post by Barkow, Eileen
-----Original Message-----
From: Barkow, Eileen
Sent: Wednesday, May 16, 2018 11:52 AM
I was going to try XMIT as a last resort but the TERSE/UNTERSE steps added to the ADRDSSU jobs worked.
I think that XMIT needs a USERID to send to and there are different userids involved in each lpar.

-- gil

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