APPS.EC.KlantDataReferentieBepaler,DOM.common.PersonalityUnishopVisitor %String - APPS.VKP.OfferteService 1 APPS.EC.DataService 1 %String 1 APPS.VKP.Offerte 1 DOM.common.impl.PersonalityService 1 APPS.EC.impl.KlantDataReferentieBepaler.LeverAdresBepaler 1 OfferteService:APPS.VKP.OfferteService="",DataService:APPS.EC.DataService="",LeverAdresBepaler:APPS.EC.impl.KlantDataReferentieBepaler.LeverAdresBepaler="" 1 1 %Status 1 Offerte:APPS.VKP.Offerte %String Tekst:%String,Prefix:%String="" 1 0) { If ($Length(..KlantDataReferentie) > 0) { Set ..KlantDataReferentie = ..KlantDataReferentie _ ..#Delimiter } Set ..KlantDataReferentie = ..KlantDataReferentie _ Prefix _ Tekst } ]]> DestilPersonality:DOM.common.DestilPersonality BeslagDesignPersonality:DOM.common.BeslagDesignPersonality BeslagteknikkPersonality:DOM.common.BeslagteknikkPersonality DupontPersonality:DOM.common.DupontPersonality BiemarBoisPersonality:DOM.common.BiemarBoisPersonality CampeTonnyPersonality:DOM.common.CampeTonnyPersonality RiniPersonality:DOM.common.RiniPersonality FurnifitPersonality:DOM.common.FurnifitPersonality YachtSupplierPersonality:DOM.common.YachtSupplierPersonality DSGroupPersonality:DOM.common.DSGroupPersonality DeBisschopPersonality:DOM.common.DeBisschopPersonality DeceuninckDeforcePersonality:DOM.common.DeceuninckDeforcePersonality PierardPersonality:DOM.common.PierardPersonality HeinPersonality:DOM.common.HeinPersonality SeefelderPersonality:DOM.common.SeefelderPersonality DaroPersonality:DOM.common.DaroPersonality KischPersonality:DOM.common.KischPersonality VanRaemdonckPersonality:DOM.common.VanRaemdonckPersonality ZweygartPersonality:DOM.common.ZweygartPersonality JBarthPersonality:DOM.common.JBarthPersonality KleinerPersonality:DOM.common.KleinerPersonality LayerPersonality:DOM.common.LayerPersonality HaefeleBEPersonality:DOM.common.HaefeleBEPersonality HaefeleNLPersonality:DOM.common.HaefeleNLPersonality HaefeleDEPersonality:DOM.common.HaefeleDEPersonality HaefeleSEPersonality:DOM.common.HaefeleSEPersonality HaefeleFIPersonality:DOM.common.HaefeleFIPersonality SFSPersonality:DOM.common.SFSPersonality GalimbertiPersonality:DOM.common.GalimbertiPersonality FerexpertPersonality:DOM.common.FerexpertPersonality HahleOyPersonality:DOM.common.HahleOyPersonality PavanelloPersonality:DOM.common.PavanelloPersonality VanHoeckePersonality:DOM.common.VanHoeckePersonality VanHoeckVoorHaluxPersonality:DOM.common.VanHoeckeVoorHaluxPersonality Personality:DOM.common.Personality Personality:DOM.common.Personality 1 0) { #dim Gebruiker As %String = ..DataService.GeefGebruikerData(Personality.GeefID(), GebruikerID).Naam Do ..VoegToeIndienNodig(Gebruiker) } #dim KlantID As DOM.VKP.KlantID = ..GeefKlantIDVoorInfoVanOfferte(..Offerte) #dim KlantData As DOM.VKP.impl.KlantData = ..DataService.GeefKlantData(Personality.GeefID(), KlantID) #dim Naam As %String = KlantData.Naam Do ..VoegToeIndienNodig(Naam) #dim Gemeente As %String = KlantData.Gemeente Do ..VoegToeIndienNodig(Gemeente) #dim Straat As %String = KlantData.StraatEnNr Do ..VoegToeIndienNodig(Straat) #dim Email As %String = KlantData.EmailAdres Do ..VoegToeIndienNodig(Email) #dim TEL As %String = KlantData.TelefoonNummer Do ..VoegToeIndienNodig(TEL, "Tel: ") #dim FAX As %String = KlantData.FaxNummer Do ..VoegToeIndienNodig(FAX, "Fax: ") #dim LeverAdres As %String = ..LeverAdresBepaler.GeefLeverAdres(..Offerte) Do ..VoegToeIndienNodig(LeverAdres, "Adres: ") ]]> Offerte:APPS.VKP.Offerte 1 %String