How to define decimal variable in Ezytrieve?

chetanambi · New User Joined: 21 Jan 2012 Posts: 58 Location: India

Hi,

I am new to Ezytrieve programming. I want to know how to define a variable with decimal point in Ezytrieve?. I want to use this field for computations involving decimal values so that my report shows output like 5456.56 etc. I have looked into manuals and found this :-

Nic Clouston · Posted: Sun Aug 26, 2012 10:57 pm

From my Easytrieve notes made a few years ago (and, presumably, taken from the manual)

dick scherrer · Posted: Mon Aug 27, 2012 7:18 am

Hello,

You need to get a copy of the documentation. There are quite a few things that are not difficult but they are surely not intuitive.

If your organization is licensed to use Easytrieve, all of the manuals are downloadable free fro CA Support.

Bill Woodger · Posted: Mon Aug 27, 2012 12:28 pm

In your documentation locate references to MASK.

From the documentation, understand that a MASK is only applied when a field is PRINTed or DISPLAYed.

chetanambi · New User Joined: 21 Jan 2012 Posts: 58 Location: India

Yes, Bill.. I searched in the forum and MASK is only applied if the field is PRINTed or DISPLAYed.

But my requirement is like this: In my input file there are about 5 fields which are defined with S9(7)V99 COMP-3. I need to subtract sum of these 5 fields from the field defined with S9(9) COMP-3 which is also defined in the same input file. When I subtract I am not getting correct result. Please help me out.

I have defined those 5 fields and WS field for computation as below

dbzTHEdinosauer · Posted: Mon Aug 27, 2012 11:00 pm

if you follow the P with a number, does that not indicate decimal positions?

you are not into testing/experimenting are you?

Bill Woodger · Posted: Mon Aug 27, 2012 11:17 pm

As dbz indicates, you have defined all your fields without decimal places. That is like multiplying them by 100. Here your problem.

Put a number after the P indicating the number of decimal places you have. Note that if you have a whole number, and you want it signed, you have to specify 0 decimal places. In Easytrieve Plus, the number of decimals also inidates a signed field.

chetanambi · New User Joined: 21 Jan 2012 Posts: 58 Location: India

dbz,
Ofcourse I am doing trial and error method to find the solution.

All amount fields are actually defined with S9(7)V99 COMP-3 and credit limit as S9(9) COMP-3. So as per your suggestions I have modified the definition as below. When I put display for amount fields it is not considering digits after decimal point.

dbzTHEdinosauer · Posted: Tue Aug 28, 2012 10:58 am

why not change

chetanambi · New User Joined: 21 Jan 2012 Posts: 58 Location: India

dbz,

I-CREDIT-LIMIT is input field and is defined with S9(9) COMP-3. How can you change its definition?.

dbzTHEdinosauer · Posted: Tue Aug 28, 2012 11:24 am

opps, I overlooked that part.

why not move credit limit to your ws-balance-amt
then subtract the others?

ws-balance-amt = credit-amt - (amt1 + amt2 ...)

i do not know of any programming or scripting language,
that will ignore decimal positions when the result of the computation had declared decimal positions.

are you subtracting everything from credit amount and then
moving to ws-balance-amt.

dbzTHEdinosauer · Posted: Tue Aug 28, 2012 11:32 am

it would be helpful to see your arithmetic statements
in addition to the data descriptions that you have already provided.

chetanambi · New User Joined: 21 Jan 2012 Posts: 58 Location: India

dbz,

I am storing sum of all the amounts in one more variable and then subtracting this from credit-amount and storing the result in WS-BALANCE amout as below:

Bill Woodger · Posted: Tue Aug 28, 2012 12:22 pm

Can you do DISPLAY HEX <field-name> for each of your I- fields and post the results/

Bill Woodger · Posted: Tue Aug 28, 2012 12:40 pm

I notice you haven't put anything in the field on MATCHFL.

sandip_mainframe · New User Joined: 20 Sep 2006 Posts: 63 Location: pune

Hi Chetan,

Display working storage variables in spool area and then copy spool data in the dataset after execution of job.

DISPLAY WS-SUM-AMT WS-BALANCE-AMT

In spool you will be able to view the values in deciamal format. It will surely work. Some days back I had same requirement and I did in the same way.

Thanks,
Sandip Walsinge
Walsinge Technologies Pvt Ltd Pune.

Bill Woodger · Posted: Tue Aug 28, 2012 6:16 pm

That's all fine, sandip_mainframe, but pointless. If it worked in that particular program the topic would never have been started.

Until we've seen the code/data which is wrong, there's not much we can do. Inane little bits of code are no help at all, I'm sorry to say.