persistent DataM %Library.Persistent %Library.Integer 0 0 0 0 0 0 0 0 %Library.Integer 0 0 0 0 0 0 0 0 Koers aankoop programma's %Library.Float 0 0 0 0 0 0 0 0 Koers financiële programma's %Library.Float 0 0 0 0 0 0 0 0 Koers verkoop programma's %Library.Float 0 0 0 0 0 0 0 0 %Library.String 0 0 0 0 0 0 0 0 Officiële muntcode %Library.String 0 0 0 0 0 0 0 0 %Library.String 0 0 0 0 0 0 0 0 Uniekheid index voor property MuntCode 0 1 1 MuntCode 1 Ophalen van de basismunt object 0 1 expression 0 %Library.String 0 Ophalen van de basismunt object 0 1 expression 0 Res.Munt 0 Omzetting van een bedrag in deze munt naar de basismunt NoSa : "N" : Standaard munt "S" : Schaduw munt Optie "A" = Aankoop "V" = Verkoop "F" = Financieel 0 0 code Bedrag:%Library.Float=1,Optie:%Library.String="V",NoSa:%Library.String="N" 0 %Library.Float 0 Omzetting van een bedrag in de basismunt naar deze munt NoSa : "N" : Standaard munt "S" : Schaduw munt Optie "A" = Aankoop "V" = Verkoop "F" = Financieel in combinatie met Optie="I" 0 0 code Bedrag:%Library.Float=1,Optie:%Library.String="V",NoSa:%Library.String="N" 0 %Library.Float 0 Ophalen van alle MuntKodes %Library.SQLQuery () 0 SELECT MuntCode, OffMuntCode, Omschrijving FROM Res.Munt ORDER BY OffMuntCode 0 %Library.CacheSQLStorage ^Res.MuntS data ^KBA delimited "11" {MuntCode} "\" 7 "\" 3 "\" 4 "\" 6 "\" 5 "\" 1 "\" 2