On Wed, 16 Apr 2014 14:17:42 +0000, Sankaranarayanan, Vignesh wrote:

>It's FB.

>- Vignesh
>Mainframe Admin

With LRECL=133 try:

INREC PARSE=(%01=(ENDBEFR=C'.',FIXLEN=3),    
             %02=(ENDBEFR=C'.',FIXLEN=3),    
             %03=(ENDBEFR=C'.',FIXLEN=3),    
             %04=(ENDBEFR=C',',FIXLEN=3)),   
      BUILD=(%01,UFF,M11,LENGTH=3,           
             %02,UFF,M11,LENGTH=3,           
             %03,UFF,M11,LENGTH=3,           
             %04,UFF,M11,LENGTH=3,           
             1,133)                          
SORT FIELDS=(1,12,ZD,A)                      
OUTREC BUILD=(13,133)                        

Norbert Friemel

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to