MVSFORUMS.com

sivafdms · Intermediate Joined: 29 May 2007 Posts: 165 Topics: 77

Hi,

I have a requirement in which i need to copy last record from a file into other. In the next i need to comapre the new file from above to the existing to the existing file,based on return code of the compare step i.e. if zero delete 1st record form new file else abend the job.

Is there any way to abend the job using only return code from previous step.

Thanks,
Siva

expat · Posted: Wed Oct 15, 2008 1:24 am Post subject:

Some places have a dodgy module which will always abend when it is executed, some shops use a SAS program to create an abend, some shops don't use anything like this.

Certainly one to ask your peers about. If they ddo have something like the above then yes it can be conditionally executed. If not, then you will need to think of some other way to terminate execution.
_________________
If it's true that we are here to help others,
then what exactly are the others here for ?

sivafdms · Intermediate Joined: 29 May 2007 Posts: 165 Topics: 77

Hi Expat,

Thanks!!!

is it possible to set the MAXCC such it will terminate the flow abonormally

Thanks,
Siva

Dibakar · Posted: Wed Oct 15, 2008 1:24 pm Post subject:

You can always run a program that doesn't exist to create an abend like -

sivafdms · Intermediate Joined: 29 May 2007 Posts: 165 Topics: 77

Hi Dibakar,

Thanks for your reply.....

Is there any other way we can copy records backwards , i know one using file-aid.

Thanks,
Siva

kolusu · Posted: Fri Oct 17, 2008 11:09 pm Post subject:

sivafdms,

If you have z/OS DFSORT V1R5 PTF UK90013 (July, 2008), you can use the new SUBSET operator to keep/remove the header and trailer records. For example, TRAILER(4) or LAST(4) keeps or removes the last 4 records.