Vulling persistent 0 Res.PI.Items %Integer 0 0 0 0 0 0 0 0 %Boolean 0 0 0 0 0 0 0 0 Res.PI.VullingExtra 0 0 list 0 0 0 0 0 0 %Library.String 0 0 0 0 0 0 0 0 %Library.String 0 0 0 0 0 0 0 0 Sommige bewerkingen kunnen alleen besteld worden bijr een bepaalde leverancier. Dit in combinatie met de leveranciers van de vullingextra kan uiteindelijk bepaald worden welke leverancier het glas moet leveren. Het kan zijn dat sommige beglazing niet kan geleverd worden. De volgorde van de leverancier is belangrijk om dat de eerste in de lijst de default leverancier is Res.PI.emVullingLevering 0 0 list 0 0 0 0 0 0 Res.PI.VullingExtra 0 0 list 0 0 0 0 0 0 Res.PI.Kost 0 0 0 0 0 0 0 0 Geeft de codering van de vulling aan. Zo kunnen vullingen geselecteerd worden (of niet geselecteerd) door het gekozen profiel %Library.String 0 0 "4" 0 0 0 0 0 0 Lijst met taalafhankelijke omschrijving Excluded codes : XG %Library.SQLQuery Taal:%Library.String="N" 0 'ZZ') AND (NOT ItemID in ('XG') ) ORDER BY VUL.Sort]]> 0 Ophalen van de Vullingen met beperking volgens VulCode Excluded codes : XG %Library.SQLQuery VCode:%String 0 SELECT ID, ItemID, Omschrijving, Sort FROM Res_PI.Vulling WHERE (VulCode = :VCode) AND (NOT ItemID in ('XG') ) ORDER BY Sort 0 Oproepen via Set vtl=##class(Res.PI.Vulling).GeefVullingVertaling("FG","N") 1 VullingItemID:%String,Taal:%String="N" 1 %Library.List %Library.CacheStorage VullingDefaultData "VUL" Gewicht GlasKost IsStdGehard KaderExtras LosExtras VulCode HeeftVulCode KortTekst Leveranciers KostCode OLDGlasKost