MVSFORUMS.com

dtf · Last edited by dtf on Tue Feb 01, 2011 1:41 pm; edited 1 time in total

In ISPF, if I use the sort command, and the records are already in "Sort Sequence", I get a message telling me so. Is there a simple way within DFSORT/SYNCSORT, to know the same?

I suppose I could do a file compare between the SORTIN file and SORTOUT file, but this seems like a bit of overkill and not very efficient.

DTF
________
Giugiaro Mustang

Frank Yaeger · Posted: Tue Jan 18, 2005 1:04 pm Post subject:

With DFSORT, you could do a one-file (SORTIN01) MERGE like this:

Dinesh.G · Beginner Joined: 18 Jan 2005 Posts: 9 Topics: 2

Is there any Way to check whether the Input file is Sorted or not
by the DFSORT/SyncSort using (Exec PGM=SORT).

Thanks & Rgds
Dinesh Kumar

kolusu · Posted: Mon Jan 24, 2005 9:09 am Post subject:

Dinesh.G · Beginner Joined: 18 Jan 2005 Posts: 9 Topics: 2

Thanks Kolusu for the Link which You have sent, but the problem which i face while submitting the Job as given by Frank is that the
PGM=ICEMAN invokes the SyncSort Utility and If the file is in sequence, I am getting a return code 0. When the file is not in sequence, I am getting the following error message:
WER068A OUT OF SEQ SORTIN01 , BLOCK 1
and the Job is abending rather than giving a return code of 16 .How can I avert my job from abending when the File is not in sequence and have some return code other than zero.

Thanks & Rgds
Dinesh

kolusu · Posted: Tue Jan 25, 2005 6:41 am Post subject:

Dinesh,

Add the parm NORC16 to your step and rerun the job. Now the job will not abend, but will complete successfully with a return code of 16.