View previous topic :: View next topic
|
Author |
Message |
V S Amarendra Reddy
Active User
Joined: 13 Sep 2006 Posts: 216 Location: USA
|
|
|
|
Hi,
My sort control card is as below.
Code: |
//CTL2CNTL DD *
OPTION NULLOUT=RC16
INCLUDE COND=(1,10,CH,EQ,11,10,CH)
//*
|
This abends fine when the o/p is EMPTY.
But when this abends, I should display user error message in SPOOL such as 'The file is empty' and then abend the step. Is it possible to do that? Let the LRECL=80,RECFM=FB and assume that we need to copy input to output.
Regards
Amar |
|
Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19244 Location: Inside the Matrix
|
|
|
|
Hello,
Do you get an rc16 when the file is empty?
If yes, this is NOT an abend and you can conditionally create any message you want. |
|
Back to top |
|
|
V S Amarendra Reddy
Active User
Joined: 13 Sep 2006 Posts: 216 Location: USA
|
|
|
|
Hi Dick,
yes I got RC16 and the step stops the process. Now, do you mean I use this step's condition code and let the next step write error message into the SPOOL?
Regards
Amar |
|
Back to top |
|
|
Bill Woodger
Moderator Emeritus
Joined: 09 Mar 2011 Posts: 7309 Location: Inside the Matrix
|
|
|
|
Yes, if the RC16 doesn't actually abend (RC not equal to zero does not indicate an abend) then you can have a subsequent conditional step.
You could also document it in the "run instructions", in your scheduler.... what is it you are trying to achieve by having a message produced as well? |
|
Back to top |
|
|
Skolusu
Senior Member
Joined: 07 Dec 2007 Posts: 2205 Location: San Jose
|
|
|
|
V S Amarendra Reddy,
1. Have MODE CONTINUE before your COPY step.
2. Change your CTL2CNTL to add another temp dataset(T1) which will have just the count
3. Add a COPY to your TOOLIN to copy T1 to MSG dataset using CTL3CNTL which will have IFTHEN=(when=(1,8,uff,eq,0),build=(c'THE FILE IS EMPTY ')) and when=none,build=(80x) |
|
Back to top |
|
|
|