Numeric format conversion

umed · New User Joined: 13 May 2005 Posts: 38

Hi,
I am having input record with 2 fields having picture clause as given below :

field1 s9(9) comp
filed2 s9(9) comp

In output record I want same fields in below given format

field1 9(5)
field2 9(15)

How can we achive this.

Regards,
Umed

Frank Yaeger · Posted: Fri Sep 01, 2006 8:29 pm

You can use DFSORT's INREC, OUTREC or OUTFIL statement to do the conversion.

field1: you can use p1,4,BI,TO=ZD,LENGTH=5

field2: you can use p2,4,BI,TO=ZD,LENGTH=15

where p1 is the starting position of field1 and p2 is the starting position of field2.

For some more information on numeric conversion with DFSORT, see:

publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ICE1CG20/2.4.7?DT=20060615173822