Sort Card required for DFSORT V1R10



IBM's flagship sort product DFSORT for sorting, merging, copying, data manipulation and reporting. Includes ICETOOL and ICEGENER

Re: Sort Card required for DFSORT V1R10

Postby skolusu » Wed Nov 28, 2012 5:59 am

use the following control cards. This will handle upto 99 headers and trailers.

//SYSIN    DD *                                                   
  SORT FIELDS=(1,2,BI,A)                                         
  OUTREC IFTHEN=(WHEN=(1,2,BI,EQ,0),OVERLAY=(40:SEQNUM,2,ZD)),   
  IFTHEN=(WHEN=(1,2,BI,NE,0),OVERLAY=(35:SEQNUM,4,BI),HIT=NEXT), 
  IFTHEN=(WHEN=(1,2,BI,EQ,999),                                   
  OVERLAY=(11:35,4,BI,SUB,+1,BI,LENGTH=4,42:SEQNUM,2,ZD))         

  OUTFIL OMIT=(40,2,ZD,GT,1,OR,42,2,ZD,GT,1),BUILD=(1,34)         
//*
Kolusu - DFSORT Development Team (IBM)
DFSORT is on the Web at:
www.ibm.com/storage/dfsort
skolusu
 
Posts: 586
Joined: Wed Apr 02, 2008 10:38 pm
Has thanked: 0 time
Been thanked: 39 times

Re: Sort Card required for DFSORT V1R10

Postby Prasanna G » Thu Nov 29, 2012 10:54 am

Thanks Kolusu.. It worked as expected..
User avatar
Prasanna G
 
Posts: 68
Joined: Tue Apr 12, 2011 9:49 pm
Has thanked: 1 time
Been thanked: 0 time

Previous

Return to DFSORT/ICETOOL/ICEGENER

 


  • Related topics
    Replies
    Views
    Last post