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

DFSORT/ICETOOL :: RE: Count the length of the record & display in a new line

$
0
0
Author: sreekusr
Subject: Reply to: Count the length of the record & display in a new line
Posted: Thu Mar 23, 2017 10:05 pm (GMT 5.5)

Hi Arun,

Thanks it worked.

Code:

//TOOLIN DD *                                           
COPY FROM(IN) USING(CTL1)                               
COPY FROM(T1) TO(OUT) USING(CTL2)                       
/*                                                       
//CTL1CNTL DD *                                         
  OUTFIL FNAMES=T1,FTOV,VLTRIM=X'00'                     
/*                                                       
//CTL2CNTL DD *                                         
  OUTFIL VTOF,                                           
  BUILD=(C'DATA,',1,2,BI,SUB,+4,TO=ZD,LENGTH=4,/,         
         5,3000)                                         
/*                                                       


Viewing all articles
Browse latest Browse all 8500

Trending Articles