Index: vhUnitTest/APPS/MAG/Inventaris/TestInventarisService.cls.xml =================================================================== diff -u -r2359 -r2360 --- vhUnitTest/APPS/MAG/Inventaris/TestInventarisService.cls.xml (.../TestInventarisService.cls.xml) (revision 2359) +++ vhUnitTest/APPS/MAG/Inventaris/TestInventarisService.cls.xml (.../TestInventarisService.cls.xml) (revision 2360) @@ -348,7 +348,7 @@ Set TransLoc1 = "98D98C98" Set TransLoc2 = "99D99C99" - Set ProductID = 154599 + Set ProductID = 154598 Set KlantID = 1000 Set BonID = 1234 @@ -370,8 +370,8 @@ If BijTeLadenProduct.ProductID = ProductID { Set ProductGevonden = 1 - Do $$$AssertEquals(BijTeLadenProduct.AantalTePicken,5002,"Aantal producten te picken is OK.") - Do $$$AssertEquals(BijTeLadenProduct.AantalPickbaar,895,"Aantal producten die pickbaar zijn, is OK.") + Do $$$AssertEquals(BijTeLadenProduct.AantalTePicken,5000,"Aantal producten te picken is OK.") + Do $$$AssertEquals(BijTeLadenProduct.AantalPickbaar,0,"Aantal producten die pickbaar zijn, is OK.") } } @@ -444,8 +444,8 @@ Set ^ORDW("D",ID,"S","A") = "" // Markeren dat deze voorkomt in het Avento - Set ^ORDW("D",ID,"D",119047,100) = "154599\B\\5000\0\\\A\\200" - Set ^ORDW("D",ID,"D",119047,100,100) = "154599\W\5000\0\\62210,53942\\\\00218051\\FVS\A\U" + Set ^ORDW("D",ID,"D",119048,100) = "154598\B\\5000\0\\\A\\200" + Set ^ORDW("D",ID,"D",119048,100,100) = "154598\W\5000\0\\62210,53942\\\\00218051\\FVS\A\U" Set Pickbaar = 1 Do ##class(EWMS.TransLoc).ZetIsPickbaar("04B25A03",Pickbaar)