MVSFORUMS.com

[priya173]

Hi,

I have a huge file (length 4939) with a lot of numeric fields in explicit decimal format. But since I need to perform few arithmetic operations on these fields, I would want to get them converted to the Implicit decimal format.

I tried the Fileaid reformat option but then it is not converting few fields in the occurs clause. Can someone help me with some utility to do it. I do not want to write a COBOL program for this.

Input fields:
-------------
Amt1 PIC 9(9).9(2)
Amt2 PIC 9(5).9(5)

Output fields:
---------------
Amt1 PIC 9(9)V9(2)
Amt2 PIC 9(5)V9(5)
_________________
Regards,
Subha

[kolusu]

[priya173]

Input File
0000111.000111 0000222.000222
0000222.000222 0000333.000333
0000333.000333 0000444.000444

Output File
0000333.000333
0000555.000555
0000777.000777

All that I want to do is add the two fieds and write the sum in the output files. The output file amount could be in any format
_________________
Regards,
Subha

[Frank Yaeger]

Subha,

Here's a DFSORT job that will do what you asked for:

[kolusu]

priya73,

try this

[priya173]

Actually the example was a much simpler one in relaity I have to read 3 files and based on the value of the files I need to perform few arithmetic operations.

Like...

File1
Emp_Dep and Sal

File2
Emp_Id and Rating

Calculation

If Emp_Dep = 'INS" and Rating = '1' then
Hike = (Sal * 0.40 ) + Sal

There are 25 fields like this so we thought of converting the numeric fields and then using the output file.

Kindly let me know if this is possible.
_________________
Regards,
Subha

[kolusu]

priya173,

Why are you wasting time? Why can't you tell us the requirement properly at once ? Search the board for examples of matching files and apply the logic shown above for calculation


Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu