Index: APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/DwarsverdelingValidator.cls.xml =================================================================== diff -u -r36233 -r36238 --- APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/DwarsverdelingValidator.cls.xml (.../DwarsverdelingValidator.cls.xml) (revision 36233) +++ APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/DwarsverdelingValidator.cls.xml (.../DwarsverdelingValidator.cls.xml) (revision 36238) @@ -1,54 +1,34 @@ -TECH.RegisteredObject,TECH.Validator.Validator +TECH.RegisteredObject - -APPS.EDI.common.dto.v001.LadeTBX -1 - - - -TECH.Exceptions -list -1 - - - -Product:APPS.EDI.common.dto.v001.LadeTBX -1 -%Status - - - + %Boolean 3)&&($$$Not(..Product.Klasse="SP2")||$$$Not(..Product.RugHoogte="C"))){ + If (Product.HeeftDwarsverdeling &&(Product.AantalDwarsverdelingen>3)&&($$$Not(Product.Klasse="SP2")||$$$Not(Product.RugHoogte="C"))){ Set Exception = ##class(TECH.ObjectUtils.ObjectConverterCombinationException).%New() - Do Exception.AddCombination($classname(..Product),"HeeftDwarsverdeling",..Product.HeeftDwarsverdeling) - Do Exception.AddCombination($classname(..Product),"AantalDwarsverdelingen",..Product.AantalDwarsverdelingen) - Do Exception.AddCombination($classname(..Product),"Klasse",..Product.Klasse) - Do Exception.AddCombination($classname(..Product),"RugHoogte",..Product.RugHoogte) - Do ..Exceptions.Insert(Exception) + Do Exception.AddCombination($classname(Product),"HeeftDwarsverdeling",Product.HeeftDwarsverdeling) + Do Exception.AddCombination($classname(Product),"AantalDwarsverdelingen",Product.AantalDwarsverdelingen) + Do Exception.AddCombination($classname(Product),"Klasse",Product.Klasse) + Do Exception.AddCombination($classname(Product),"RugHoogte",Product.RugHoogte) + Do Exceptions.Insert(Exception) } - If (..Product.HeeftDwarsverdeling &&(..Product.AantalDwarsverdelingen>4)) { - Set Exception = ##class(TECH.ObjectUtils.ObjectConverterPropertyException).%New("Input", $classname(..Product), "AantalDwarsverdelingen", ..Product.AantalDwarsverdelingen,"","") - Do ..Exceptions.Insert(Exception) + If (Product.HeeftDwarsverdeling &&(Product.AantalDwarsverdelingen>4)) { + Set Exception = ##class(TECH.ObjectUtils.ObjectConverterPropertyException).%New("Input", $classname(Product), "AantalDwarsverdelingen", Product.AantalDwarsverdelingen,"","") + Do Exceptions.Insert(Exception) } - Quit $$$If(..Exceptions.Count()>0,$$$false,$$$true) + Quit $$$If(Exceptions.Count()>0,$$$false,$$$true) ]]> Index: APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductValidator.cls.xml =================================================================== diff -u -r36091 -r36238 --- APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductValidator.cls.xml (.../ProductValidator.cls.xml) (revision 36091) +++ APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/ProductValidator.cls.xml (.../ProductValidator.cls.xml) (revision 36238) @@ -53,30 +53,40 @@ 1 + +TECH.Exceptions +list +1 + + Product:APPS.EDI.common.dto.v001.LadeTBX %Boolean 0,$$$false,$$$true) ]]> Index: APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/GreepEnMeenemerValidator.cls.xml =================================================================== diff -u -r36233 -r36238 --- APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/GreepEnMeenemerValidator.cls.xml (.../GreepEnMeenemerValidator.cls.xml) (revision 36233) +++ APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/GreepEnMeenemerValidator.cls.xml (.../GreepEnMeenemerValidator.cls.xml) (revision 36238) @@ -3,40 +3,20 @@ TECH.RegisteredObject,TECH.Validator.Validator - -APPS.EDI.common.dto.v001.LadeTBX -1 - - - -TECH.Exceptions -list -1 - - - -Product:APPS.EDI.common.dto.v001.LadeTBX -1 -%Status - - - + %Boolean 0,$$$false,$$$true) + Quit $$$If(Exceptions.Count()>0,$$$false,$$$true) ]]> Index: APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/OpvullijstValidator.cls.xml =================================================================== diff -u -r36233 -r36238 --- APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/OpvullijstValidator.cls.xml (.../OpvullijstValidator.cls.xml) (revision 36233) +++ APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/OpvullijstValidator.cls.xml (.../OpvullijstValidator.cls.xml) (revision 36238) @@ -3,40 +3,20 @@ TECH.RegisteredObject,TECH.Validator.Validator - -APPS.EDI.common.dto.v001.LadeTBX -1 - - - -TECH.Exceptions -list -1 - - - -Product:APPS.EDI.common.dto.v001.LadeTBX -1 -%Status - - - + %Boolean 0,$$$false,$$$true) + Quit $$$If(Exceptions.Count()>0,$$$false,$$$true) ]]> Index: APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/MatValidator.cls.xml =================================================================== diff -u -r36233 -r36238 --- APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/MatValidator.cls.xml (.../MatValidator.cls.xml) (revision 36233) +++ APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/MatValidator.cls.xml (.../MatValidator.cls.xml) (revision 36238) @@ -3,48 +3,28 @@ TECH.RegisteredObject,TECH.Validator.Validator - -APPS.EDI.common.dto.v001.LadeTBX -1 - - - -TECH.Exceptions -list -1 - - - -Product:APPS.EDI.common.dto.v001.LadeTBX -1 -%Status - - - + %Boolean 0,$$$false,$$$true) + Quit $$$If(Exceptions.Count()>0,$$$false,$$$true) ]]> Index: APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/CorpusWandDikteValidator.cls.xml =================================================================== diff -u -r36233 -r36238 --- APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/CorpusWandDikteValidator.cls.xml (.../CorpusWandDikteValidator.cls.xml) (revision 36233) +++ APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/CorpusWandDikteValidator.cls.xml (.../CorpusWandDikteValidator.cls.xml) (revision 36238) @@ -1,38 +1,18 @@ -TECH.RegisteredObject,TECH.Validator.Validator +TECH.RegisteredObject - -APPS.EDI.common.dto.v001.LadeTBX -1 - - - -TECH.Exceptions -list -1 - - - -Product:APPS.EDI.common.dto.v001.LadeTBX -1 -%Status - - - + %Boolean 0,$$$false,$$$true) + Quit $$$If(Exceptions.Count()>0,$$$false,$$$true) ]]> Index: APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/ZijkantHoogteValidator.cls.xml =================================================================== diff -u -r36233 -r36238 --- APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/ZijkantHoogteValidator.cls.xml (.../ZijkantHoogteValidator.cls.xml) (revision 36233) +++ APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/ZijkantHoogteValidator.cls.xml (.../ZijkantHoogteValidator.cls.xml) (revision 36238) @@ -3,43 +3,23 @@ TECH.RegisteredObject,TECH.Validator.Validator - -APPS.EDI.common.dto.v001.LadeTBX -1 - - - -TECH.Exceptions -list -1 - - - -Product:APPS.EDI.common.dto.v001.LadeTBX -1 -%Status - - - + %Boolean 0,$$$false,$$$true) + Quit $$$If(Exceptions.Count()>0,$$$false,$$$true) ]]> Index: APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/InschuifElementValidator.cls.xml =================================================================== diff -u -r36233 -r36238 --- APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/InschuifElementValidator.cls.xml (.../InschuifElementValidator.cls.xml) (revision 36233) +++ APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/InschuifElementValidator.cls.xml (.../InschuifElementValidator.cls.xml) (revision 36238) @@ -3,52 +3,32 @@ TECH.RegisteredObject,TECH.Validator.Validator - -APPS.EDI.common.dto.v001.LadeTBX -1 - - - -TECH.Exceptions -list -1 - - - -Product:APPS.EDI.common.dto.v001.LadeTBX -1 -%Status - - - + %Boolean 0,$$$false,$$$true) + Quit $$$If(Exceptions.Count()>0,$$$false,$$$true) ]]> Index: APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/FrontOndersteuningValidator.cls.xml =================================================================== diff -u -r36233 -r36238 --- APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/FrontOndersteuningValidator.cls.xml (.../FrontOndersteuningValidator.cls.xml) (revision 36233) +++ APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/FrontOndersteuningValidator.cls.xml (.../FrontOndersteuningValidator.cls.xml) (revision 36238) @@ -3,38 +3,18 @@ TECH.RegisteredObject,TECH.Validator.Validator - -APPS.EDI.common.dto.v001.LadeTBX -1 - - - -TECH.Exceptions -list -1 - - - -Product:APPS.EDI.common.dto.v001.LadeTBX -1 -%Status - - - + %Boolean 0,$$$false,$$$true) + Quit $$$If(Exceptions.Count()>0,$$$false,$$$true) ]]> Index: APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/UitsparingValidator.cls.xml =================================================================== diff -u -r36233 -r36238 --- APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/UitsparingValidator.cls.xml (.../UitsparingValidator.cls.xml) (revision 36233) +++ APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/UitsparingValidator.cls.xml (.../UitsparingValidator.cls.xml) (revision 36238) @@ -3,106 +3,86 @@ TECH.RegisteredObject,TECH.Validator.Validator - -APPS.EDI.common.dto.v001.LadeTBX -1 - - - -TECH.Exceptions -list -1 - - - -Product:APPS.EDI.common.dto.v001.LadeTBX -1 -%Status - - - + %Boolean 0,$$$false,$$$true) + Quit $$$If(Exceptions.Count()>0,$$$false,$$$true) ]]>