IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

other than xsort


IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
gilli

New User


Joined: 28 Aug 2004
Posts: 5

PostPosted: Mon Aug 30, 2004 1:19 pm
Reply with quote

hi,
is there any utility other than xsort to copy the duplicates and nonduplicates in seperate ps files?
Back to top
View user's profile Send private message
sandip_datta

Active User


Joined: 02 Dec 2003
Posts: 150
Location: Tokyo, Japan

PostPosted: Tue Aug 31, 2004 7:41 am
Reply with quote

I know one term XSUM in Syncsort which will list all duplicate records.

Code:
//SORT     EXEC PGM=SORT
//SYSIN    DD *
  SORT FIELDS=(..,..,..,..)
  SUM FIELDS=NONE,XSUM <-- Use XSUM here
/*
//SORTIN   DD *
1
3
1
2
12
23
3
3
4
5
6
7
7
8
9
/*
//SORTOUT  DD SYSOUT=* (This will contain unique records)
//SORTXSUM DD SYSOUT=* (This will contain duplicate records)
//SYSOUT   DD SYSOUT=*


regards,
Sandip.
Back to top
View user's profile Send private message
gilli

New User


Joined: 28 Aug 2004
Posts: 5

PostPosted: Tue Aug 31, 2004 1:43 pm
Reply with quote

hi,

thanx for u r reply.

but on giving the'xsum' i found the following error.

************************
ICE143I 0 BLOCKSET SORT TECHNIQUE SELECTED
ICE000I 1 - CONTROL STATEMENTS FOR 5740-SM1, DFSORT REL 14.0 - 13:26 ON TUE AUG
SORT FIELDS=(..,..,..,..)
$
ICE007A 1 SYNTAX ERROR
SUM FIELDS=NONE,XSUM
$
ICE172A E XSUM IS NOT SUPPORTED - USE ICETOOL SELECT IF APPROPRIATE
ICE012A 0 MISSING FIELDS OPERAND DEFINER
ICE052I 3 END OF DFSORT
********************

though i'm having sort utility i could not execute the particular xsum function .

is there any other way?
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> JCL & VSAM

 


Search our Forums:

Back to Top