Paul,

Simple things to try:

1) Based on this from the manual:

 It is possible to pass DFSMSdss filtering criteria in a data set by using the 
FILTERDD keyword. If you do this, the data set should have the following 
characteristics:

    RECFM=F or FB
    LRECL=80
    BLKSIZE=80 for F (or a multiple of 80 for FB

Make your FILTER DD a dataset instead of instream.

2) I like this one better. Move the filter criteria into the DUMP DATASET 
INCLUDE instead of a DD:

//SYSIN    DD *
DUMP DATASET(INCLUDE(PBREX.PRJW.**, PBREX.PRUFST.CHOICE.AUDIT) -
               BY(DSORG,NE,VSAM)) -
               OUTDDNAME(TAPE1) -
               WAIT(0,0) -
               FORCECP(0) -
               DELETE PURGE

My thoughts were possible a ")" imbalance?

Finally, if dump is successful, you really want to delete datasets?

Bob


-----Original Message-----
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Beesley, Paul
Sent: Tuesday, September 11, 2018 5:32 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Abend 0C4 in DFDSS

Asking in desperation here... I have raised a PMR but there are no known hits 
and investigation is potentially billable so thought I'd check with this 
forum...
Find it really hard to believe that nobody else in the world has had this 
problem if it's a real bug.

We've had 2 occurrences of this abend after upgrading from 2.1 to 2.3, 1 on 
each of 2 systems. It's really hard to reproduce (in fact we can't, apart from 
these 2 jobs).
Symptoms are :
IEA794I SVC DUMP HAS CAPTURED:  283
DUMPID=003 REQUESTED BY JOB (BBSPDB03)
DUMP TITLE=DFSMSDSS-DUMP ABEND=0C4,COMPID=DF175,ADRFTARR,JOBNAM
           E=BBSPDB03 CSECT:ADRDTDSC OFFSET:0003D050

>From this job:
//PS010    EXEC PGM=ADRDSSU
//SYSPRINT DD SYSOUT=*
//TAPE1    DD DUMMY
//FILTER   DD *
 INCL(PBREX.PRJW.**, -
 PBREX.PRUFST.CHOICE.AUDIT) -
 BY(DSORG,NE,VSAM) -
//SYSIN    DD *
 DUMP OUTDDNAME(TAPE1) -
 DATASET(FILTERDD(FILTER)) -
 WAIT(0,0) -
 FORCECP(0) -
 DELETE PURGE

The other job is similar. Only similarity is that the generic dataset names 
refer to some GDGs, some of which are on tape.
Both systems have the same usermods (for ADRUENQ and ADRUPSWD) but I have 
restored them off and still get the issue.

Thanks

Regards and thanks
Paul

Atos, Atos Consulting, Worldline and Canopy The Open Cloud Company are trading 
names used by the Atos group. The following trading entities are registered in 
England and Wales: Atos IT Services UK Limited (registered number 01245534), 
Atos Consulting Limited (registered number 04312380), Atos Worldline UK Limited 
(registered number 08514184) and Canopy The Open Cloud Company Limited 
(registration number 08011902). The registered office for each is at Second 
Floor, Mid City Place, 71 High Holborn, London, WC1V 6EA.  The VAT No. for each 
is: GB232327983.

This e-mail and the documents attached are confidential and intended solely for 
the addressee, and may contain confidential or privileged information. If you 
receive this e-mail in error, you are not authorised to copy, disclose, use or 
retain it. Please notify the sender immediately and delete this email from your 
systems. As emails may be intercepted, amended or lost, they are not secure. 
Atos therefore can accept no liability for any errors or their content. 
Although Atos endeavours to maintain a virus-free network, we do not warrant 
that this transmission is virus-free and can accept no liability for any 
damages resulting from any virus transmitted. The risks are deemed to be 
accepted by everyone who communicates with Atos by email.

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