MVSFORUMS.com

[apru]

I tried this in the EQQCYAIN code :

//SYSIN DD *
ACTION=LIST,RESOURCE=CPOPCOM,JOBNAME=JOB1,STATUS=E
/*

but it is not giving the step number and reason for error.

[papadi]

Why does what you tried not have the SELECT that was recommended?

Possibly there is something i am missing . . .
_________________
All the best,

di

[apru]

Hi...


1.I didnt understand how to use the SELECT in EQQYCAIN code.

2.When an abend occurs , is it possible to copy only the portion of sysdump (from sysdump till END of sysdump) from spool to dataset???

[apru]

sorry..I actually meant that when an abend occurs,how to print from SYMPTOM DUMP till END OF SYMPTOM DUMP from spool to dataset???

[kolusu]

[apru]

Thanks Kolusu

I was able to print the required contents to flat file. ...But I need some clarifications :-

1.Is it possible to filter both IEF142I message and the related IEF640I messages from spool to dataset together in case of JCL errors??

ie.Can we print the job code,jcl error(obtained from IEF142I message) and the reason for error(obtained from IEF640I message) in a single line in dataset??...

2.In case of IEFC605I messages,how can we print the line number appearing before the IEFC605I message to the dataset??

[apru]

Sorry for not including the below topic in my previous query...

In the TWS automatic recovery statement ,Is it possible to pass any parameter?

Actually I have the following statement:

//*%OPC recover restart=n,addappl=appl1

*****************************************************

In the APPL1 application ,I have a job called JOB1 to copy contents from spool to dataset.
Is there any way to pass the jobname of the failed job as parameter to JOB1 ??

[kolusu]

[apru]

Hi..

Actually I want to print the job code,jcl error(obtained from IEF142I message) and the reason for error(obtained from IEF640I message) in a single line in dataset.I tried the following code:

INREC IFTHEN=(WHEN=(21,7,CH,EQ,C'IEF452I',AND,12,7,CH,EQ,C'IEF640I'),
PARSE=(%01=(STARTAFT=C'IEF452I ',ENDBEFR=C' ',FIXLEN=8),
%02=(STARTAFT=C'- ',ENDBEFR=C'-',FIXLEN=11),
%03=(STARTAFT=C' ',FIXLEN=20),
%04=(STARTAFT=C'IEF640I ',FIXLEN=80)),
BUILD=(%01,C'#',%03,C'#',%04,133:X))

But I am not getting the required output with this code...Should we parse both the strings separately and then build them together???

[apru]

Hi

1.I did try EQQYCAIN utility with SELECT parm .but I was not able to get the required data alone..(jobname, stepname, errorcode, reason)

2.By line numbers in IEF605I message , what I meant is,

4 IEF605I INVALID OPERAND


In the above line, how is it possible to filter the line number (in this case 4 ) along with the reason???

[kolusu]

apru,

Did you understand the DFSORT job I gave you? Initially your request to pull the information from IEF142I which has the information you wanted after the message.

Now for IEF605I message you want the data before and After the message, so you need to change it accordingly and you simply cannot use the same logic used for IEF142I.

Having said that what are you going to do with this information? You are simply spending time on something that is already available.

Kolusu

[apru]

Hi

I did try the code to print the IEF452I and IEF640I messages in the same line.
But I am getting a syntax error.Can you please help me resolve the error??
This is the code snippet:

[apru]

Actually this data set is required for another program.That is the reason why I am filtering only selective data..

[kolusu]