Hi Rex,

I created the following program to allow NEWNAMEU with the DUMP command.

*  Invoke ADRDSSU to allow NEWNUNC parameter on DUMP command   
STZDSSU  csect                                                 
STZDSSU  amode 31                                              
STZDSSU  rmode any                                             
         stm   14,12,12(13)                                    
         lr    12,15                                           
         using STZDSSU,12                                      
         link  ep=ADRDSSU,param=(zero,zero,zero,zero,zero),vl=1
         lm    14,12,12(13)                                    
         sr    15,15                                           
         br    14                                              
         ds    d                                               
zero     dc    f'0'                                            
         end                                                  

 I have an open PMR because I get message ADR482E when I try to either list
or restore any of the datasets in the DFDSS dump.  I also tried using
ADRXMAIA, but I get the same error with the RESTORE command.

Regards,

Al Loeffler

-----Original Message-----
From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> On Behalf Of
Robert2 Gensler
Sent: Tuesday, January 8, 2019 10:55 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: DFDSS question

Hi Rex,

You are correct, NEWNAMEUnconditional is only supported for applications
that invoke DFSMSdss and it is not supported for batch JCL invocations.
The keyword was added because there was a requirement for applications to
rename data sets as they were dumped.  The restriction was put in place
because we did not have the resource to fully test both the batch JCL and
API usage of the keyword and we wanted to deliver the support for
applications.

I am not sure if this is a feasible workaround, but if you change your EXEC
PGM=ADRDSSU to EXEC PGM=ADRXMAIA then you could use NEWNAMEU in batch JCL.
I would only recommend this for the JCL you want to use NEWNAMEU with and
not all DFSMSdss JCL.  ADRXMAIA is our cross memory API that acts as an API
on top of ADRDSSU.  This would get around the 'API only restriction'.  But I
will caution you that there would be added overhead when invoking ADRXMAIA
so if this is performance sensitive it might not be feasible.

Thanks,
Robert Gensler
DFSMSdss Architecture and Development
Tucson, AZ
1-720-349-5211
rgen...@us.ibm.com

IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> wrote on
01/08/2019 12:45:38 PM:

> From: "Pommier, Rex" <rpomm...@sfgmembers.com>
> To: IBM-MAIN@LISTSERV.UA.EDU
> Date: 01/08/2019 12:54 PM
> Subject: DFDSS question
> Sent by: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU>
>
> Hi all,
>
> I'm looking at DFDSS dataset dump and see this parameter in the
> manual:  NEWNAMEUnconditional which would allow me to rename datasets 
> being backed up instead of needing to use the RENUNC on a restore.  
> Unfortunately, the manual also states - and I verified by trying it - 
> that I can't use this parm just running DFDSS as a batch job step, it 
> can only be used in the API. Any idea why this limitation is there?
>
> Due to circumstances beyond my control, I can't have people use RENUNC 
> on a restore step, but using the NEWNUNC parm on a DUMP would work 
> perfectly.  Today, to get around this limitation, we have a process in 
> place that uses a third party product to dump the needed VSAM datasets 
> to tape, then another third party product comes along and does a tape 
> to tape copy to rename the datasets on the tape.
>
> In lieu of being able to use NEWNUNC in a normal batch run of DFDSS, 
> does somebody have a working program that uses the API that I could 
> beg or borrow to build a program from?  I'm not a proficient assembler 
> language programmer but I could modify something that is already 
> existing and working.
>
> Thanks,
>
> Rex
>
> 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

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

Reply via email to