issue with variables in recordset - currency delivers different decimals in different tables

[brigitteAT]

sorry this my first attempt to get help with bulding my acounting database with access 2013 (win7 pro)

I have a table FL and a form FL where I enter each line, (whether I get or spend money) the date, amount VAT...., and select, on which account nummer to debit and to credit
when I have finished these I run a Visual Basic Code "recordset" (to enter these data in another table FJ splitting the information in separate lines, for each account number .. 2 and more lines (in the Form FJ I can see all these lines and controll them)
...
rs!FJSOLLbrutto = Me.FLbrutto And rs!FjHABENbrutto = 0 ( the value of me.flbrutto is 120,- )
rs!FJSOLLUST = Me.FLUST And rs!FjHABENUST = 0 (the value of me.flust is 10,91 )
rs!FJSOLLnetto = Me.FLnetto And rs!FJHABENnetto = 0 (the value of me.flnetto is 109,09)


.....
my problem now is:
the values shown in the table FJ are
FJSOLLbrutto 120,-
FJSOLLUST 11,--
FJSOLLnetto 109,--

i have declared all fields - which contain money-amounts - in all tables as currency, with 2 decimals (same result with currency + fixed)
the amounts are shown correctly in the form and table FL
but:
they are no longer shown correctly in the table FJ, after having them inserted per recordset....
but as shown above, I haven't declared any (new, different) variables for the amounts to be copied, only the fieldnames...
why does access suddenly show rounded amounts in the new table????
and what do I have to do, to avoid this problem?

would be very grateful if you could help me!!! but please make it simple, my Englisch as well as my Access Knowledge is limited!!!

[kd2017]

My first thought is if you're making an accounting app you're tackling a complicated project and also reinvinting the wheel.

Second, I don't quite follow your psuedo code, can you post your actual code? Or even a zipped version of your db file if you'd like.

(edit)

oh, what datatypes are you using in your different tables. Sounds like one table is getting rounded to an integer. Make sure they're currency data types.

(edit x2)
ok, it sounds like you have done that. Can you check the actual formatting property of these fields?

[brigitteAT]

not qite reeinventig the wheel, but the routine I'ven been used to for 20 years with a professional programme, which I have no longer access to, (retired) :-)

my code is a 1:1 copy - but only part of the whole (... which is much longer ...)
by these three lines I only wanted to show, that that the values which I want to be inserted in the other table, are not declared as new variables in the code, but I only use the values of the fields in the fist table...

[Minty]

I think I'm being think but I'm not understanding the AND bit here in red;

rs!FJSOLLnetto = Me.FLnetto And rs!FJHABENnetto = 0

By using an AND it will behave like a boolean which will only ever return an Integer no matter what value. (I think)

[brigitteAT]

thank you, I made a new line instead of AND and this seems to work
will change my whole code like this and tell you if this was it:-)

[brigitteAT]

thank you so much!!!! I was about to give up....

[Minty]

thank you so much!!!! I was about to give up....

Glad to help, good luck with your project.

[brigitteAT]

thanks for your help, fortunally meantime minty has solved my problem :-)