APPS.TRANSP.VerpakkingEenheidVisitor,%RegisteredObject APPS.TRANSP.GLS.GLSv1.Bericht.dto.Request APPS.TRANSP.dto.LeveringInfo %Integer Request:APPS.TRANSP.GLS.GLSv1.Bericht.dto.Request,LeveringInfo:APPS.TRANSP.dto.LeveringInfo %Status VerpakkingEenheid:APPS.TRANSP.dto.VerpakkingEenheid Colli:APPS.TRANSP.dto.VerpakkingEenheid.Colli %Status Europallet:APPS.TRANSP.dto.VerpakkingEenheid.Europallet %Status HalveEuropallet:APPS.TRANSP.dto.VerpakkingEenheid.HalveEuropallet %Status Langgoed:APPS.TRANSP.dto.VerpakkingEenheid.Langgoed %Status 0){ Set ..Request.T530 = ..GeefGeformateerdGewicht((Langgoed.Gewicht / Langgoed.Aantal)) }Else{ Do ..VulInGewicht() } Quit $$$OK ]]> BuitenmaatsPallet:APPS.TRANSP.dto.VerpakkingEenheid.BuitenmaatsPallet %Status Opmerking : omdat we momenteel niet beschikken over het gewicht per verpakkingeenheid (pallet/colli/..;) Nemen we het totaal gewicht en delen we dat door het aantal verpakkingeenheden. 1 0) && (..LeveringInfo.GewichtReedsVerdeeld > 0) { #dim OverblijvendGewicht As %Decimal = (..LeveringInfo.Gewicht - ..LeveringInfo.GewichtReedsVerdeeld) #dim OverblijvendAantalVerpakkingEenheden = (..LeveringInfo.AantalVerpakkingEenhedenTotaal - ..LeveringInfo.AantalVerpakkingEenhedenReedsVerdeeld) Set ..Request.T530 = ..GeefGeformateerdGewicht((OverblijvendGewicht / OverblijvendAantalVerpakkingEenheden)) }Else{ Set ..Request.T530 = ..GeefGeformateerdGewicht((..LeveringInfo.Gewicht / ..LeveringInfo.AantalVerpakkingEenhedenTotaal)) } ]]> 1 %Boolean Gewicht:%Decimal 1 %String