Quantcast
Channel: IBM Mainframe Computers Forums
Viewing all articles
Browse latest Browse all 9405

SYNCSORT :: RE: Unique sort situation....

$
0
0
Author: Rohit Umarjikar
Posted: Wed Apr 27, 2016 11:28 pm (GMT 5.5)

Code:
//SORTIN DD *                                 
M2031111111111111                             
M2041111111111111                             
M2091111111111111                             
//SORTOUT DD SYSOUT=*                         
//SYSIN DD *                                   
   INREC FINDREP=(INOUT=(C'M204',C'M999'))     
  SORT FIELDS=(1,4,CH,A)                       
   OUTREC FINDREP=(INOUT=(C'M999',C'M204'))   
/*

_________________
Regards,
Rohit Umarjikar
"Some things Man was never meant to know. For everything else, there's Google"


Viewing all articles
Browse latest Browse all 9405

Trending Articles