Index: vhUnitTest/APPS/PM/impl/ProductKopieerder.cls.xml =================================================================== diff -u -r46155 -r46214 --- vhUnitTest/APPS/PM/impl/ProductKopieerder.cls.xml (.../ProductKopieerder.cls.xml) (revision 46155) +++ vhUnitTest/APPS/PM/impl/ProductKopieerder.cls.xml (.../ProductKopieerder.cls.xml) (revision 46214) @@ -108,7 +108,7 @@ do $$$AssertEquals(Product.GeefLeverancierID(),"L||6020") do $$$AssertEquals(Product.GeefAantalInGrootVerpakking(),"20") do $$$AssertEquals(Product.GeefAantalInKleinVerpakking(),"0") - do $$$AssertEquals(Product.GeefAantalInNormaleVerpakking(),"20") + do $$$AssertEquals(Product.GeefAantalInNormaalVerpakking(),"20") do $$$AssertEquals(Product.GeefHoutCertificaatID(),"") do $$$AssertEquals(Product.GeefStockDrempelVoorAankoop(),"") do $$$AssertEquals(Product.GeefGenerischProductID(),"") Index: vhUnitTest/DOM/PM/impl/DataM/DataMProduct/Test.cls.xml =================================================================== diff -u -r46155 -r46214 --- vhUnitTest/DOM/PM/impl/DataM/DataMProduct/Test.cls.xml (.../Test.cls.xml) (revision 46155) +++ vhUnitTest/DOM/PM/impl/DataM/DataMProduct/Test.cls.xml (.../Test.cls.xml) (revision 46214) @@ -50,7 +50,7 @@ Do Product.ZetGewichtPerDuizendStuksInKG(123.45) Do Product.ZetAantalInGrootVerpakking(333) Do Product.ZetAantalInKleinVerpakking(111) - Do Product.ZetAantalInNormaleVerpakking(222) + Do Product.ZetAantalInNormaalVerpakking(222) Do Product.ZetPalletAantal(456) Do Product.ZetLeverancierReferentie("LeverancierReferentie") Do Product.ZetStockNietStock("1") @@ -68,7 +68,7 @@ Do $$$AssertEquals(Product.GeefStockNietStock(),"1") Do $$$AssertEquals(Product.GeefLeverancierReferentie(),"LeverancierReferentie") Do $$$AssertEquals(Product.GeefPalletAantal(),456) - Do $$$AssertEquals(Product.GeefAantalInNormaleVerpakking(),222) + Do $$$AssertEquals(Product.GeefAantalInNormaalVerpakking(),222) Do $$$AssertEquals(Product.GeefAantalInKleinVerpakking(),111) Do $$$AssertEquals(Product.GeefAantalInGrootVerpakking(),333) Do $$$AssertEquals(Product.GeefGewichtPerDuizendStuksInKG(),123.45) Index: vhTest/Fake/DOM/PM/impl/DataM/DataMProduct.cls.xml =================================================================== diff -u -r46155 -r46214 --- vhTest/Fake/DOM/PM/impl/DataM/DataMProduct.cls.xml (.../DataMProduct.cls.xml) (revision 46155) +++ vhTest/Fake/DOM/PM/impl/DataM/DataMProduct.cls.xml (.../DataMProduct.cls.xml) (revision 46214) @@ -14,6 +14,17 @@ %Integer + +%Integer + + + + +AantalInNormaalVerpakking:%Integer + + + %String - -AantalInNormaleVerpakking:%Integer - - - CifPPL:%Numeric @@ -141,12 +147,6 @@ ]]> - -%Integer - - - DOM.PM.enu.ActiefStatus %String - + 1 %Integer @@ -427,9 +427,9 @@ AantalInKleinVerpakking:%Integer - + 1 -AantalInNormaleVerpakking:%Integer +AantalInNormaalVerpakking:%Integer Index: vhTest/Mock/DOM/PM/Product.cls.xml =================================================================== diff -u -r45990 -r46214 --- vhTest/Mock/DOM/PM/Product.cls.xml (.../Product.cls.xml) (revision 45990) +++ vhTest/Mock/DOM/PM/Product.cls.xml (.../Product.cls.xml) (revision 46214) @@ -20,9 +20,9 @@ ]]> - + %Integer - @@ -454,9 +454,9 @@ ]]> - -AantalInNormaleVerpakking:%Integer - +AantalInNormaalVerpakking:%Integer + Index: vhUnitTest/DOM/PM/impl/ProductImpl/Test.cls.xml =================================================================== diff -u -r46155 -r46214 --- vhUnitTest/DOM/PM/impl/ProductImpl/Test.cls.xml (.../Test.cls.xml) (revision 46155) +++ vhUnitTest/DOM/PM/impl/ProductImpl/Test.cls.xml (.../Test.cls.xml) (revision 46214) @@ -112,9 +112,9 @@ Set DataMProductMock = ##class(vhTest.Mock.DOM.PM.impl.DataM.DataMProduct).%New() #dim Product As DOM.PM.Product = ##class(DOM.PM.impl.ProductImpl).%New(..#ProductId,DataMProductMock) - Do DataMProductMock.VerwachtMethodCall("GeefKorttekst").DanDoeNiks() + Do DataMProductMock.VerwachtMethodCall("GeefKorttekst").DanReturn("Korttekst") - Do Product.GeefKorttekst() + Do $$$AssertEquals(Product.GeefKorttekst(),"Korttekst") Do DataMProductMock.Verifieer() ]]> @@ -138,9 +138,9 @@ Set DataMProductMock = ##class(vhTest.Mock.DOM.PM.impl.DataM.DataMProduct).%New() #dim Product As DOM.PM.Product = ##class(DOM.PM.impl.ProductImpl).%New(..#ProductId,DataMProductMock) - Do DataMProductMock.VerwachtMethodCall("GeefIdentNr").DanDoeNiks() + Do DataMProductMock.VerwachtMethodCall("GeefIdentNr").DanReturn("1.234.567.8") - Do Product.GeefIdentNr() + Do $$$AssertEquals(Product.GeefIdentNr(),"1.234.567.8") Do DataMProductMock.Verifieer() ]]> @@ -164,9 +164,9 @@ Set DataMProductMock = ##class(vhTest.Mock.DOM.PM.impl.DataM.DataMProduct).%New() #dim Product As DOM.PM.Product = ##class(DOM.PM.impl.ProductImpl).%New(..#ProductId,DataMProductMock) - Do DataMProductMock.VerwachtMethodCall("GeefLeverancierID").DanDoeNiks() + Do DataMProductMock.VerwachtMethodCall("GeefLeverancierID").DanReturn("L||1234") - Do Product.GeefLeverancierID() + Do $$$AssertEquals(Product.GeefLeverancierID(),"L||1234") Do DataMProductMock.Verifieer() ]]> @@ -190,9 +190,9 @@ Set DataMProductMock = ##class(vhTest.Mock.DOM.PM.impl.DataM.DataMProduct).%New() #dim Product As DOM.PM.Product = ##class(DOM.PM.impl.ProductImpl).%New(..#ProductId,DataMProductMock) - Do DataMProductMock.VerwachtMethodCall("GeefHoofdGroep").DanDoeNiks() + Do DataMProductMock.VerwachtMethodCall("GeefHoofdGroep").DanReturn("HoofdGroep") - Do Product.GeefHoofdGroep() + Do $$$AssertEquals(Product.GeefHoofdGroep(),"HoofdGroep") Do DataMProductMock.Verifieer() ]]> @@ -216,9 +216,9 @@ Set DataMProductMock = ##class(vhTest.Mock.DOM.PM.impl.DataM.DataMProduct).%New() #dim Product As DOM.PM.Product = ##class(DOM.PM.impl.ProductImpl).%New(..#ProductId,DataMProductMock) - Do DataMProductMock.VerwachtMethodCall("GeefGroep").DanDoeNiks() + Do DataMProductMock.VerwachtMethodCall("GeefGroep").DanReturn("Groep") - Do Product.GeefGroep() + Do $$$AssertEquals(Product.GeefGroep(),"Groep") Do DataMProductMock.Verifieer() ]]> @@ -242,9 +242,9 @@ Set DataMProductMock = ##class(vhTest.Mock.DOM.PM.impl.DataM.DataMProduct).%New() #dim Product As DOM.PM.Product = ##class(DOM.PM.impl.ProductImpl).%New(..#ProductId,DataMProductMock) - Do DataMProductMock.VerwachtMethodCall("GeefSubGroep").DanDoeNiks() + Do DataMProductMock.VerwachtMethodCall("GeefSubGroep").DanReturn("SubGroep") - Do Product.GeefSubGroep() + Do $$$AssertEquals(Product.GeefSubGroep(),"SubGroep") Do DataMProductMock.Verifieer() ]]> @@ -268,9 +268,9 @@ Set DataMProductMock = ##class(vhTest.Mock.DOM.PM.impl.DataM.DataMProduct).%New() #dim Product As DOM.PM.Product = ##class(DOM.PM.impl.ProductImpl).%New(..#ProductId,DataMProductMock) - Do DataMProductMock.VerwachtMethodCall("GeefFSCHout").DanDoeNiks() + Do DataMProductMock.VerwachtMethodCall("GeefFSCHout").DanReturn("FSCHout") - Do Product.GeefFSCHout() + Do $$$AssertEquals(Product.GeefFSCHout(),"FSCHout") Do DataMProductMock.Verifieer() ]]> @@ -294,9 +294,9 @@ Set DataMProductMock = ##class(vhTest.Mock.DOM.PM.impl.DataM.DataMProduct).%New() #dim Product As DOM.PM.Product = ##class(DOM.PM.impl.ProductImpl).%New(..#ProductId,DataMProductMock) - Do DataMProductMock.VerwachtMethodCall("GeefTelbaar").DanDoeNiks() + Do DataMProductMock.VerwachtMethodCall("GeefTelbaar").DanReturn("Telbaar") - Do Product.GeefTelbaar() + Do $$$AssertEquals(Product.GeefTelbaar(),"Telbaar") Do DataMProductMock.Verifieer() ]]> @@ -320,9 +320,9 @@ Set DataMProductMock = ##class(vhTest.Mock.DOM.PM.impl.DataM.DataMProduct).%New() #dim Product As DOM.PM.Product = ##class(DOM.PM.impl.ProductImpl).%New(..#ProductId,DataMProductMock) - Do DataMProductMock.VerwachtMethodCall("GeefGewichtPerDuizendStuksInKG").DanDoeNiks() + Do DataMProductMock.VerwachtMethodCall("GeefGewichtPerDuizendStuksInKG").DanReturn("123.45") - Do Product.GeefGewichtPerDuizendStuksInKG() + Do $$$AssertEquals(Product.GeefGewichtPerDuizendStuksInKG(),"123.45") Do DataMProductMock.Verifieer() ]]> @@ -333,9 +333,9 @@ Set DataMProductMock = ##class(vhTest.Mock.DOM.PM.impl.DataM.DataMProduct).%New() #dim Product As DOM.PM.Product = ##class(DOM.PM.impl.ProductImpl).%New(..#ProductId,DataMProductMock) - Do DataMProductMock.VerwachtMethodCall("ZetAantalInGrootVerpakking","333").DanDoeNiks() + Do DataMProductMock.VerwachtMethodCall("ZetAantalInGrootVerpakking",333).DanDoeNiks() - Do Product.ZetAantalInGrootVerpakking("333") + Do Product.ZetAantalInGrootVerpakking(333) Do DataMProductMock.Verifieer() ]]> @@ -346,9 +346,9 @@ Set DataMProductMock = ##class(vhTest.Mock.DOM.PM.impl.DataM.DataMProduct).%New() #dim Product As DOM.PM.Product = ##class(DOM.PM.impl.ProductImpl).%New(..#ProductId,DataMProductMock) - Do DataMProductMock.VerwachtMethodCall("GeefAantalInGrootVerpakking").DanDoeNiks() + Do DataMProductMock.VerwachtMethodCall("GeefAantalInGrootVerpakking").DanReturn(333) - Do Product.GeefAantalInGrootVerpakking() + Do $$$AssertEquals(Product.GeefAantalInGrootVerpakking(),333) Do DataMProductMock.Verifieer() ]]> @@ -359,9 +359,9 @@ Set DataMProductMock = ##class(vhTest.Mock.DOM.PM.impl.DataM.DataMProduct).%New() #dim Product As DOM.PM.Product = ##class(DOM.PM.impl.ProductImpl).%New(..#ProductId,DataMProductMock) - Do DataMProductMock.VerwachtMethodCall("ZetAantalInKleinVerpakking","111").DanDoeNiks() + Do DataMProductMock.VerwachtMethodCall("ZetAantalInKleinVerpakking",111).DanDoeNiks() - Do Product.ZetAantalInKleinVerpakking("111") + Do Product.ZetAantalInKleinVerpakking(111) Do DataMProductMock.Verifieer() ]]> @@ -372,35 +372,35 @@ Set DataMProductMock = ##class(vhTest.Mock.DOM.PM.impl.DataM.DataMProduct).%New() #dim Product As DOM.PM.Product = ##class(DOM.PM.impl.ProductImpl).%New(..#ProductId,DataMProductMock) - Do DataMProductMock.VerwachtMethodCall("GeefAantalInKleinVerpakking").DanDoeNiks() + Do DataMProductMock.VerwachtMethodCall("GeefAantalInKleinVerpakking").DanReturn(111) - Do Product.GeefAantalInKleinVerpakking() + Do $$$AssertEquals(Product.GeefAantalInKleinVerpakking(),111) Do DataMProductMock.Verifieer() ]]> - + - + @@ -411,7 +411,7 @@ Set DataMProductMock = ##class(vhTest.Mock.DOM.PM.impl.DataM.DataMProduct).%New() #dim Product As DOM.PM.Product = ##class(DOM.PM.impl.ProductImpl).%New(..#ProductId,DataMProductMock) - Do DataMProductMock.VerwachtMethodCall("ZetPalletAantal","456").DanDoeNiks() + Do DataMProductMock.VerwachtMethodCall("ZetPalletAantal",456).DanDoeNiks() Do Product.ZetPalletAantal("456") @@ -424,9 +424,9 @@ Set DataMProductMock = ##class(vhTest.Mock.DOM.PM.impl.DataM.DataMProduct).%New() #dim Product As DOM.PM.Product = ##class(DOM.PM.impl.ProductImpl).%New(..#ProductId,DataMProductMock) - Do DataMProductMock.VerwachtMethodCall("GeefPalletAantal").DanDoeNiks() + Do DataMProductMock.VerwachtMethodCall("GeefPalletAantal").DanReturn(456) - Do Product.GeefPalletAantal() + Do $$$AssertEquals(Product.GeefPalletAantal(),456) Do DataMProductMock.Verifieer() ]]> @@ -450,9 +450,9 @@ Set DataMProductMock = ##class(vhTest.Mock.DOM.PM.impl.DataM.DataMProduct).%New() #dim Product As DOM.PM.Product = ##class(DOM.PM.impl.ProductImpl).%New(..#ProductId,DataMProductMock) - Do DataMProductMock.VerwachtMethodCall("GeefLeverancierReferentie").DanDoeNiks() + Do DataMProductMock.VerwachtMethodCall("GeefLeverancierReferentie").DanReturn("LeverancierReferentie") - Do Product.GeefLeverancierReferentie() + Do $$$AssertEquals(Product.GeefLeverancierReferentie(),"LeverancierReferentie") Do DataMProductMock.Verifieer() ]]> @@ -476,9 +476,9 @@ Set DataMProductMock = ##class(vhTest.Mock.DOM.PM.impl.DataM.DataMProduct).%New() #dim Product As DOM.PM.Product = ##class(DOM.PM.impl.ProductImpl).%New(..#ProductId,DataMProductMock) - Do DataMProductMock.VerwachtMethodCall("GeefStockNietStock").DanDoeNiks() + Do DataMProductMock.VerwachtMethodCall("GeefStockNietStock").DanReturn("1") - Do Product.GeefStockNietStock() + Do $$$AssertEquals(Product.GeefStockNietStock(),"1") Do DataMProductMock.Verifieer() ]]> @@ -489,7 +489,7 @@ Set DataMProductMock = ##class(vhTest.Mock.DOM.PM.impl.DataM.DataMProduct).%New() #dim Product As DOM.PM.Product = ##class(DOM.PM.impl.ProductImpl).%New(..#ProductId,DataMProductMock) - Do DataMProductMock.VerwachtMethodCall("ZetCifPPL","7.6").DanDoeNiks() + Do DataMProductMock.VerwachtMethodCall("ZetCifPPL",7.6).DanDoeNiks() Do Product.ZetCifPPL("7.6") @@ -502,9 +502,9 @@ Set DataMProductMock = ##class(vhTest.Mock.DOM.PM.impl.DataM.DataMProduct).%New() #dim Product As DOM.PM.Product = ##class(DOM.PM.impl.ProductImpl).%New(..#ProductId,DataMProductMock) - Do DataMProductMock.VerwachtMethodCall("GeefCifPPL").DanDoeNiks() + Do DataMProductMock.VerwachtMethodCall("GeefCifPPL").DanReturn(7.6) - Do Product.GeefCifPPL() + Do $$$AssertEquals(Product.GeefCifPPL(),7.6) Do DataMProductMock.Verifieer() ]]> @@ -515,7 +515,7 @@ Set DataMProductMock = ##class(vhTest.Mock.DOM.PM.impl.DataM.DataMProduct).%New() #dim Product As DOM.PM.Product = ##class(DOM.PM.impl.ProductImpl).%New(..#ProductId,DataMProductMock) - Do DataMProductMock.VerwachtMethodCall("ZetCifPercentage","5.4").DanDoeNiks() + Do DataMProductMock.VerwachtMethodCall("ZetCifPercentage",5.4).DanDoeNiks() Do Product.ZetCifPercentage("5.4") @@ -528,9 +528,9 @@ Set DataMProductMock = ##class(vhTest.Mock.DOM.PM.impl.DataM.DataMProduct).%New() #dim Product As DOM.PM.Product = ##class(DOM.PM.impl.ProductImpl).%New(..#ProductId,DataMProductMock) - Do DataMProductMock.VerwachtMethodCall("GeefCifPercentage").DanDoeNiks() + Do DataMProductMock.VerwachtMethodCall("GeefCifPercentage").DanReturn(5.4) - Do Product.GeefCifPercentage() + Do $$$AssertEquals(Product.GeefCifPercentage(),5.4) Do DataMProductMock.Verifieer() ]]> @@ -554,9 +554,9 @@ Set DataMProductMock = ##class(vhTest.Mock.DOM.PM.impl.DataM.DataMProduct).%New() #dim Product As DOM.PM.Product = ##class(DOM.PM.impl.ProductImpl).%New(..#ProductId,DataMProductMock) - Do DataMProductMock.VerwachtMethodCall("GeefBarcodeWaarde").DanDoeNiks() + Do DataMProductMock.VerwachtMethodCall("GeefBarcodeWaarde").DanReturn("B4rc0dewaarde") - Do Product.GeefBarcodeWaarde() + Do $$$AssertEquals(Product.GeefBarcodeWaarde(),"B4rc0dewaarde") Do DataMProductMock.Verifieer() ]]> @@ -567,7 +567,7 @@ Set DataMProductMock = ##class(vhTest.Mock.DOM.PM.impl.DataM.DataMProduct).%New() #dim Product As DOM.PM.Product = ##class(DOM.PM.impl.ProductImpl).%New(..#ProductId,DataMProductMock) - Do DataMProductMock.VerwachtMethodCall("ZetMinimumBestelhoeveelheid","5").DanDoeNiks() + Do DataMProductMock.VerwachtMethodCall("ZetMinimumBestelhoeveelheid",5).DanDoeNiks() Do Product.ZetMinimumBestelhoeveelheid("5") @@ -580,9 +580,9 @@ Set DataMProductMock = ##class(vhTest.Mock.DOM.PM.impl.DataM.DataMProduct).%New() #dim Product As DOM.PM.Product = ##class(DOM.PM.impl.ProductImpl).%New(..#ProductId,DataMProductMock) - Do DataMProductMock.VerwachtMethodCall("GeefMinimumBestelhoeveelheid").DanDoeNiks() + Do DataMProductMock.VerwachtMethodCall("GeefMinimumBestelhoeveelheid").DanReturn(5) - Do Product.GeefMinimumBestelhoeveelheid() + Do $$$AssertEquals(Product.GeefMinimumBestelhoeveelheid(),5) Do DataMProductMock.Verifieer() ]]> @@ -606,9 +606,9 @@ Set DataMProductMock = ##class(vhTest.Mock.DOM.PM.impl.DataM.DataMProduct).%New() #dim Product As DOM.PM.Product = ##class(DOM.PM.impl.ProductImpl).%New(..#ProductId,DataMProductMock) - Do DataMProductMock.VerwachtMethodCall("GeefUitverkoopSinds").DanDoeNiks() + Do DataMProductMock.VerwachtMethodCall("GeefUitverkoopSinds").DanReturn(55555) - Do Product.GeefUitverkoopSinds() + Do $$$AssertEquals(Product.GeefUitverkoopSinds(),55555) Do DataMProductMock.Verifieer() ]]> Index: DOM/PM/impl/DataM/DataMProduct.cls.xml =================================================================== diff -u -r46155 -r46214 --- DOM/PM/impl/DataM/DataMProduct.cls.xml (.../DataMProduct.cls.xml) (revision 46155) +++ DOM/PM/impl/DataM/DataMProduct.cls.xml (.../DataMProduct.cls.xml) (revision 46214) @@ -397,7 +397,7 @@ ]]> - + %Integer @@ -697,9 +697,9 @@ ]]> - -AantalInNormaleVerpakking:%Integer - +AantalInNormaalVerpakking:%Integer + Index: vhTest/Mock/DOM/PM/impl/DataM/DataMProduct.cls.xml =================================================================== diff -u -r46155 -r46214 --- vhTest/Mock/DOM/PM/impl/DataM/DataMProduct.cls.xml (.../DataMProduct.cls.xml) (revision 46155) +++ vhTest/Mock/DOM/PM/impl/DataM/DataMProduct.cls.xml (.../DataMProduct.cls.xml) (revision 46214) @@ -20,9 +20,9 @@ ]]> - + %Integer - @@ -400,9 +400,9 @@ ]]> - -AantalInNormaleVerpakking:%Integer - +AantalInNormaalVerpakking:%Integer + Index: DOM/PM/impl/ProductImpl.cls.xml =================================================================== diff -u -r46155 -r46214 --- DOM/PM/impl/ProductImpl.cls.xml (.../ProductImpl.cls.xml) (revision 46155) +++ DOM/PM/impl/ProductImpl.cls.xml (.../ProductImpl.cls.xml) (revision 46214) @@ -213,9 +213,9 @@ ]]> - + %Integer - @@ -650,9 +650,9 @@ ]]> - -AantalInNormaleVerpakking:%Integer - +AantalInNormaalVerpakking:%Integer +