Index: APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/DwarsverdelingValidator.cls.xml =================================================================== diff -u -r36094 -r36127 --- APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/DwarsverdelingValidator.cls.xml (.../DwarsverdelingValidator.cls.xml) (revision 36094) +++ APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/DwarsverdelingValidator.cls.xml (.../DwarsverdelingValidator.cls.xml) (revision 36127) @@ -21,8 +21,12 @@ %Boolean 3)&&($$$Not(..Product.Klasse="SP2")||$$$Not(..Product.RugHoogte="C"))) $$$False + Quit:(..Product.HeeftDwarsverdeling &&(..Product.AantalDwarsverdelingen>4)) $$$False + + Quit $$$True ]]> Index: vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/DwarsverdelingValidator/Test.cls.xml =================================================================== diff -u -r35921 -r36127 --- vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/DwarsverdelingValidator/Test.cls.xml (.../Test.cls.xml) (revision 35921) +++ vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/DwarsverdelingValidator/Test.cls.xml (.../Test.cls.xml) (revision 36127) @@ -35,10 +35,51 @@ Set Validator = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.Validator.DwarsverdelingValidator).%New(Product) + Do $$$AssertFalse(Validator.IsValid()) +]]> + + + + + + + + + + + +