Re: Strange behaviour with DBMONEY

Mike Aubury <[email protected]> Fri, 31 Jan 2020 19:45:51 +0000
Newsgroups gmane.comp.lang.4gl.aubit.general
Message-ID <CAGAq4WGHASxgKk77o433r9gKDe=NG-ADdb7gmUDGgEYi0r2Oug@mail.gmail.com>
I thought DBMONEY in Aubit4GL only worked with single character currency
symbols.
Does it work if its set to just "K" (for the purposes of testing) ?

On Fri, 31 Jan 2020 at 08:27, Øyvind Gjerstad <[email protected]>
wrote:

> Recently discovered a strange behaviour, here it is boiled down to a
> minimum:
>
> Given:
> export DBMONEY="Kr ," (on the client AND server side).
>
> create table foo(dec_1 decimal(13,3));
> insert into foo (dec_1) values (42);  -- or whatever
> select * From foo;
> 12,000
>
> And this 4gl program:
>
> database testogj1
> main
>   define p_dec_1 decimal(13,3)
>
>   select first 1 dec_1 into p_dec_1 from foo
>
>   insert into foo (dec_1) values (p_dec_1)
> end main
>
>
> After the 4gl program has run, the content of the table is:
> select * From foo;
> 12,000
> 12,000
>
> All well and fine. But if the program is run with DBMONEY unset (or empty)
> on the client side (still the old value on the server), the content of the
> table after this test is:
> select * From foo;
> 12,000
> 12000,000
>
> So, it seems like aubit 4gl receives the decimal value as a string
> somehow, and (since DBMONEY is unset) does interpret the commas as
> thousands separator.
>
> This is a bit unexpected, and not the way it works in Informix 4gl.
> Although I think DBMONEY really is a flawed concept, it can't easily be
> changed in an old and huge system.
>
> tested on:
> aubit 4gl 1.2, build 39, RHEL 6 and 7
> aubit 4gl 1.5, build 1, HP-UX 11
> --
>
>
>
> * Øyvind Gjerstad *
> Systemkonsulent
>
> M +47 909 41 485
> [email protected]
>
> * ___________________*
>
>
> * PostNord AS *
> T +47 987 09300
> IT og Forretningsutvikling
> Øran Vest
> Postboks 100
> 6301 Åndalsnes
> www.postnord.no
> _______________________________________________
> Aubit4gl-discuss mailing list
> [email protected]
> https://lists.sourceforge.net/lists/listinfo/aubit4gl-discuss
>

_______________________________________________
Aubit4gl-discuss mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/aubit4gl-discuss