>> Is there any conversion function like Rexx C2D()?
Gil,
As mentioned earlier, DFSORT gives you the flexibility of converting the passed
symbol to any numeric format (Binary, Packed, Floating point..)
Assuming the LRECL=200 for the input file , you can use the following
INREC OVERLAY=(201:JP1,
205:201,04,UFF,BI,LENGTH=4)
OUTFIL INCLUDE=(INP_EXTNTS,GT,205,04,BI),
BUILD=(01,200)
OP’s requirement is to sum the extents also which can be done using SECTIONS
and TRAILER3. However, I don’t have OP’s Complete control cards to write the
equivalent cards.
Thanks,
Kolusu
DFSORT Development
IBM Corporation
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN