Weergave van getallen in een berekend veld

[MetDick]

Goedenavond

In een berekend veld (dat naar een MySQL tabel gaat) toon ik meerdere bedragen.
Een aantal van deze bedragen zijn zelf ook berekeningen.

Deze berekende bedragen worden in hun oorspronkelijke vorm getoond, dus niet met 2 decimalen.

Dat dacht ik op te lossen door de inhoud van een hulpveld te gebruiken: Truncate (bedrag, 2)
Dat werkt niet

Toe dacht ik het met een tweede hulpveld op te lossen (GetAsText (hulpveld)
Maar dat werkt ook niet

Kan iemand mij helpen met een oplossing?

vriendelijke groeten

Dick

 

[MetDick]

1 uur geleden zei MetDick:

Goedenavond

In een berekend veld (dat naar een MySQL tabel gaat) toon ik meerdere bedragen.
Een aantal van deze bedragen zijn zelf ook berekeningen.

Deze berekende bedragen worden helaas in hun oorspronkelijke vorm getoond, dus niet met 2 decimalen (wat de bedoeling is).

Dat dacht ik op te lossen door de inhoud van een hulpveld te gebruiken: Truncate (bedrag, 2)
Dat werkt niet.

Toen dacht ik het met een tweede hulpveld op te lossen (GetAsText (hulpveld))
Maar dat werkt ook niet.

Ik doe dus iets niet goed.
Maar wat?
Kent iemand een oplossing?

vriendelijke groeten

Dick

Voorbeeldbestand bijgevoegd

 

weergave_van_vatuta_in_berekening.fmp12

Edited August 24, 2018 by MetDick
voorbeeld toegevoegd

[ovvk]

Je kunt de Round functie gebruiken, echter heb je nog niet je eis van de voorloop nul opgelost.

"De bedoeling is dat de bedragen in deze tekst getoond worden¶
met twee decimalen en de voorloopnul.¶¶
Prijs excl. btw: " & Round(Prijs_excl;2) & 
"¶BTW: " &  Round(BTW bedrag;2) &
"¶Prijs incl. btw: " & Round(Prijs_incl;2)

je zou ook een custom function kunnen gebruiken zolas bijvoorbeeld: https://www.briandunning.com/cf/945

 

succes

 

[MetDick]

Hallo ovvk
De Round functie geeft hetzelfde probleem als de Truncate functie: niet het zichtbare resultaat wordt getoond, maar de berekende waarde.

Ik heb ook naar dezelfde custom functie van Brian Dunning gekeken:

Let ([
      n = Number;  
      p = DecimalPrecision;
      Sep = ThousandSeparator ;
      Nbr = Abs ( Round ( n; p ) )
];
Case ( Not IsEmpty ( n ) ;
      Case ( GetAsNumber ( n ) < 0; "-" ) &
      Substitute ( NumToJText ( Int ( Nbr ); 1; 0 ); ","; Sep ) &
      Choose ( p ≤ 0; Filter ( 1/2; ".," ) &
      Middle ( Nbr - Int ( Nbr ) & Substitute ( ( 10 ^ p ) - 1; 9; 0 ); 2; p ) )
)
)

Wanneer ik de functie in het edit veld plak en probeer te saven loop ik vast op de tweede regel.
Mijn kennis schiet daar dus te kort.

 

jammer

[MetDick]

EDIT

Ik heb de functie doorgrond en toegepast

WERKT!

Probleem opgelost!