APPS.EC.Rapporteur.impl.Rapporteur APPS.EC.Webshop.impl.UrlBepaler 1 APPS.EC.WebshopSessionService 1 APPS.EC.DataService 1 DOM.common.dto.HandelKlantData 1 APPS.EC.enu.RapporteurType ##class(APPS.EC.enu.RapporteurType).Klant() 1 CommonApi:DOM.common.CommonAPI,MailApi:TECH.Mail.MailAPI,VertaalApi:DOM.common.Transl.VertaalAPI,WebshopURLBepaler:APPS.EC.Webshop.impl.UrlBepaler,DataService:APPS.EC.DataService 1 1 %Status 1 Offerte:APPS.VKP.Offerte DestilPersonality:DOM.common.DestilPersonality DupontPersonality:DOM.common.DupontPersonality HeinPersonality:DOM.common.HeinPersonality DaroPersonality:DOM.common.DaroPersonality HaefeleBEPersonality:DOM.common.HaefeleBEPersonality HaefeleNLPersonality:DOM.common.HaefeleNLPersonality HaefeleDEPersonality:DOM.common.HaefeleDEPersonality KischPersonality:DOM.common.KischPersonality SFSPersonality:DOM.common.SFSPersonality VanRaemdonckPersonality:DOM.common.VanRaemdonckPersonality VanHoeckePersonality:DOM.common.VanHoeckePersonality VanHoeckVoorHaluxPersonality:DOM.common.VanHoeckeVoorHaluxPersonality BeslagDesignPersonality:DOM.common.BeslagDesignPersonality GalimbertiPersonality:DOM.common.GalimbertiPersonality HahleOyPersonality:DOM.common.HahleOyPersonality PavanelloPersonality:DOM.common.PavanelloPersonality FerexpertPersonality:DOM.common.FerexpertPersonality Verzender:%String,URL:%String,PersonalityNaam:%String,AntwoordNaar:%String="" 1 Verzender:%String,PersonalityNaam:%String,AntwoordNaar:%String 1 URL:%String,PersonalityNaam:%String 1 " _ URLNaarBestelling _ "" Do ..Mail.VoegToeLijn(..GeefVertaling("Aanspreking") _ " " _ ..HandelKlantData.Naam _ ", ") Do ..Mail.VoegToeLijn("") Do ..Mail.VoegToeLijn(..GeefOmschrijvingVertaling(PersonalityNaam, ..Offerte.GeefID())) Do ..Mail.VoegToeLijn(..GeefVertaling("OfferteLabel") _ ": ") Do ..Mail.VoegToeLijn(Link) Do ..Mail.VoegToeLijn("") If $$$Not(..Offerte.GeefDocumentReferenties().OrderReferentie = "") { Do ..Mail.VoegToeLijn("" _ ..GeefVertaling("ReferentieLabel") _ ": " _ ..Offerte.GeefDocumentReferenties().OrderReferentie) } If $$$Not(..Offerte.GeefBestelOpmerking() = "") { Do ..Mail.VoegToeLijn("" _ ..GeefVertaling("OpmerkingLabel") _ ": " _ ..Offerte.GeefBestelOpmerking()) } Do ..Mail.VoegToeLijn(..GeefVertaling("SlotFormule")) Do ..Mail.VoegToeLijn(..GeefOndergetekendeVertaling(PersonalityNaam)) ]]> 1 1 1 %Boolean URL:%String 1 %String DomeinVerwerker:APPS.EC.enu.WebShopVerwerker 1 APPS.EC.dto.RefSessieData Sleutel:TECH.String 1 TECH.String PersonalityNaam:TECH.String,OfferteID:TECH.String 1 TECH.String PersonalityNaam:TECH.String 1 TECH.String