Forcing the cobol code to abend the Job

Amit Suri · New User Joined: 28 Oct 2008 Posts: 25 Location: hyderabad

Hi

I have written one cobol code which will count the number of records in the input file and compare the count against the Trailer Record coming with the file : As of now i am displaying a Warning message to the SYSOUT in case count calculated by Program does not match with the count present in the trailer record of the file

Can anyone please suggest me the best way to abend the Job in case of
the count mismatch

dbzTHEdinosauer · Posted: Wed Sep 02, 2009 2:50 pm

why abend the job? very poor use of resources.

you only want to indicate that counts are not equal.
an abend uses system resources to generate a dump,
as well as the error handling routines.

just set RETURN-CODE to non-zero.

Amit Suri · New User Joined: 28 Oct 2008 Posts: 25 Location: hyderabad

I appreciate your Prompt Reply

I am not in favour of abending the job as it is possibly going to delay the
Process in case the input files have incorect Counts

But our Upstream teams are not in line with us :wink:

Anyways Thanks again

Robert Sample · Posted: Wed Sep 02, 2009 3:27 pm

Language Environment has a callable service to force an abend. Check the LE Programming Reference manual for details of the call.