How to change the format of a i/p field

adapalam · New User Joined: 14 Mar 2007 Posts: 6 Location: hyderabad

Suppose we have an input field which has a declaration as follows:
10 Field1 pic s9(5)v9(3) comp-3
and the position of this field is at 514...

Now if i want to put this field in the output file at 24th position and the format is s9(4)v9(2) comp-3

William Thompson · Posted: Tue Jul 31, 2007 4:31 pm

Have you looked at a sort manual?
Sorts offer a lot of function for reformatting your input, but you will be truncating the leading and trailing digits....

Frank Yaeger · Posted: Tue Jul 31, 2007 8:18 pm

adapalam,

You need to clarify what you want to do.

pic s9(5)v9(3) comp-3 is a 5-byte PD field and s9(4)v9(2) comp-3 is a 4-byte PD field.

You're starting out with a value like 12345.678 (X'012345678C') for input - what exactly is it you want for output? Do you want 2345.67 (X'0234567C') or something else? Note that the decimal point is not actually carried in the PD value.