View previous topic :: View next topic
|
Author |
Message |
santhoshm
New User
Joined: 13 Jun 2007 Posts: 32 Location: chennai
|
|
|
|
Hi,
I need to compare two files of same record layout, and write the difference to a third file.
We are using a field(var1) as key to compare (IF MATCHED).
Each record has a field(var2) which is eg. “$123.45” cobol declaration is $(9).9(2)
This field(var2) in both the files has to be compared and if different then written to an output file.
Second time when the kay (var1) matches again we compare the field(var2) and if different then written to an output file.
Every time we write record to output file the field(var2) has to be summed. i.e. var3 = var3 + var2
My question is how to convert the $123.45 to 00000012345, for computing ?
And how to write a masked variable to output file in easytrieve? E.g. 00000012345 to $123.45 and write to a file in easytrieve. It should display as $123.45 in the file. |
|
Back to top |
|
|
Bill Woodger
Moderator Emeritus
Joined: 09 Mar 2011 Posts: 7309 Location: Inside the Matrix
|
|
|
|
Both of these things have been covered before if you look through/search the Easytrieve topics here.
The second part (as CA provide some code for the first part, I believe you'll discover, look for a posting by Jose) is more tricky for you. The easiest way is to write a Cobol file exit for a "dummy" PRINTER FILE. Otherwise, go without it edited (why does it need to be edited?) or do the editing "manually" with some code.
EDIT:
An example PRINTER EXIT is now here. |
|
Back to top |
|
|
|