Quantcast
Viewing all articles
Browse latest Browse all 8500

DFSORT/ICETOOL :: RE: Select first 2 group data

Author: vice_versa
Posted: Tue Jun 14, 2016 1:47 pm (GMT 5.5)

It is OK
thanks you very much

Rohit Umarjikar wrote:
Try this card.
Code:
//SYSIN    DD *                                                   
   SORT FIELDS=COPY                                               
   INREC IFOUTLEN=80,                                             
   IFTHEN=(WHEN=GROUP,KEYBEGIN=(1,11),PUSH=(81:ID=8)),           
   IFTHEN=(WHEN=GROUP,KEYBEGIN=(1,5),PUSH=(89:81,8)),             
   IFTHEN=(WHEN=INIT,                                             
   OVERLAY=(40:+1,ADD,(81,8,ZD,SUB,89,8,ZD),M11,LENGTH=3))       
   OUTFILE INCLUDE=(40,3,ZD,EQ,001,OR,40,3,ZD,EQ,002),BUILD=(1,16)


Viewing all articles
Browse latest Browse all 8500

Trending Articles