TECH.RegisteredObject,TECH.Mockable DOM.Halux.AAP.DnaCodeRepository 1 TECH.DateTime.DateTimeAPI 1 DOM.Halux.AAP.KlantinstellingenRepository 1 APPS.VKP.Maatwerk.impl.ConfiguratorService 1 DnaCodeRepository:DOM.Halux.AAP.DnaCodeRepository="",DateTimeApi:TECH.DateTime.DateTimeAPI="",ConfiguratorService:APPS.VKP.Maatwerk.impl.ConfiguratorService="",KlantInstellingenRepository:DOM.Halux.AAP.KlantinstellingenRepository="" 1 1 %Status ToeleveringId:%String,LaatstGescandePalletCode:%String %String ToeleveringId:%String %String ProductNummer:%String %String PalletCode:%String 1 %Boolean HuidigePalletCode:%String,LaatstGebruiktePalletCode:%String,MetRollOver:%Boolean 1 %Boolean = LaatstGebruiktePalletNummer) Set IsPalletCodeRecenter = (IsPalletCodeRecenter && ((MetRollOver = $$$False) || (HuidigePalletNummer < 50000))) If (($Extract(LaatstGebruiktePalletCode, 9, 9) = "B") && (HuidigePalletNummer = LaatstGebruiktePalletNummer)) { Set IsPalletCodeRecenter = $$$False } Quit IsPalletCodeRecenter ]]>