TECH.RegisteredObject,APPS.EDI.PrijsBerekening.PrijsBerekeningService APPS.EDI.PrijsBerekening.impl.PrijsBerekeningRepository 1 TECH.ObjectUtils.impl.ObjectConverter 1 APPS.EC.ConfiguratorService 1 DOM.common.enu.Personality 1 APPS.EC.Winkelkar.WinkelkarService 1 PrijsBerekeningRepository:APPS.EDI.PrijsBerekening.impl.PrijsBerekeningRepository="" 1 1 %Status 1 EDIAanvraag:APPS.EDI.PrijsBerekening.dto.Aanvraag APPS.EDI.PrijsBerekening.dto.Resultaat EDIAanvraag:APPS.EDI.PrijsBerekening.dto.Aanvraag 1 APPS.PM.Maatwerk.dto.IngegevenKenmerken Product:APPS.EDI.common.dto.v001.LadeTAX 1 APPS.PM.Maatwerk.dto.IngegevenKenmerken LBX ) Do ConvertDataTAX.Add("LadeBinnenKleur",) Do ConvertDataTAX.Add("FrontEindkapKleur",) Do ConvertDataTAX.Add("GlijderType",) Do ConvertDataTAX.Add("HeeftDiepteVerstelling",) Do ConvertDataTAX.Add("KoppelingType",) Do ..ObjectConverter.Convert(Product,IngegevenKenmerken,ConvertDataTAX) Set IngegevenKenmerken.NietMeeleveren = Product.NietMeeleveren Set IngegevenKenmerken.LosseComponent = "" Set IngegevenKenmerken.Uittrekbaarheid = ##class(DOM.PM.enu.TAORUittrekbaarheid).Volledig() ;Set IngegevenKenmerken.HeeftTipon = "" ;Set IngegevenKenmerken.Omschrijving = "" If (Product.HeeftMat) { Do IngegevenKenmerken.GekoppeldeIngegevenKenmerken.Insert(..GeefGekoppeldeIKMat(Product)) } Quit IngegevenKenmerken ]]> Lade:APPS.EDI.common.dto.v001.Lade 1 APPS.PM.Maatwerk.dto.GekoppeldIngegevenKenmerk IngegevenKenmerken:APPS.PM.Maatwerk.dto.IngegevenKenmerken,KlantID:DOM.VKP.KlantID 1 APPS.PM.Maatwerk.dto.IngegevenKenmerken KlantID:%String 1 APPS.EDI.PrijsBerekening.data.PrijsBerekening Winkelkar:DOM.EC.Winkelkar.Winkelkar,IngegevenKenmerken:APPS.PM.Maatwerk.dto.IngegevenKenmerken,Aantal:%Numeric 1 DOM.EC.Winkelkar.MaatwerkLijn