Index: vhTestFiles/IntegratieTests/Productie.HoffmannZaag.GeefZaagLijst/Test/ZaagLijst.txt =================================================================== diff -u -r73859 -r74211 --- vhTestFiles/IntegratieTests/Productie.HoffmannZaag.GeefZaagLijst/Test/ZaagLijst.txt (.../ZaagLijst.txt) (revision 73859) +++ vhTestFiles/IntegratieTests/Productie.HoffmannZaag.GeefZaagLijst/Test/ZaagLijst.txt (.../ZaagLijst.txt) (revision 74211) @@ -101,7 +101,7 @@ true CS DG - 5228422 + 3279569 \\Notes01\Images\GENERIEK\TBX\spaanplaat_DG.JPG @@ -537,7 +537,7 @@ true CS DG - 5228422 + 3279569 \\Notes01\Images\GENERIEK\TBX\spaanplaat_DG.JPG @@ -623,7 +623,7 @@ true CS DG - 5228422 + 3279569 \\Notes01\Images\GENERIEK\TBX\spaanplaat_DG.JPG @@ -1059,7 +1059,7 @@ true CS DG - 5228422 + 3279569 \\Notes01\Images\GENERIEK\TBX\spaanplaat_DG.JPG Index: vhTest/Integratie/Productie/HoffmannZaag/GeefZaagLijst/Test.cls.xml =================================================================== diff -u -r74210 -r74211 --- vhTest/Integratie/Productie/HoffmannZaag/GeefZaagLijst/Test.cls.xml (.../Test.cls.xml) (revision 74210) +++ vhTest/Integratie/Productie/HoffmannZaag/GeefZaagLijst/Test.cls.xml (.../Test.cls.xml) (revision 74211) @@ -18,16 +18,16 @@ set LegraboxenPerToeleveringArray = ##class(vhTest.Integratie.Productie.Setup.ProductenPerToeleveringArray).%New() set LegraboxenToelevering1 = ##class(vhTest.Integratie.Productie.Setup.ProductInfoLijst).%New() - do LegraboxenToelevering1.Insert(##class(vhTest.Integratie.Productie.Setup.ProductInfo).%New(..MaakProduct(..GeefLbxStandaardladeMetMat(), LegraBoxProductID1, "TB6W"), 1)) - do LegraboxenToelevering1.Insert(##class(vhTest.Integratie.Productie.Setup.ProductInfo).%New(..MaakProduct(..GeefLbxKLade(), LegraBoxProductID2, "AKZR"), 10)) - do LegraboxenToelevering1.Insert(##class(vhTest.Integratie.Productie.Setup.ProductInfo).%New(..MaakProduct(..GeefLbxMLadeMetMat(), LegraBoxProductID3, "AKZQ"), 1)) - do LegraboxenToelevering1.Insert(##class(vhTest.Integratie.Productie.Setup.ProductInfo).%New(..MaakProduct(..GeefLbxKLadeDiepte350(), LegraBoxProductID4, "ALBX"), 1)) + do LegraboxenToelevering1.Insert(##class(vhTest.Integratie.Productie.Setup.ProductInfo).%New(..MaakProduct(..GeefLbxStandaardladeMetMat(), LegraBoxProductID1, "TB6W", "DummyCIDGeefZaagLijst_1"), 1)) + do LegraboxenToelevering1.Insert(##class(vhTest.Integratie.Productie.Setup.ProductInfo).%New(..MaakProduct(..GeefLbxKLade(), LegraBoxProductID2, "AKZR", "DummyCIDGeefZaagLijst_2"), 10)) + do LegraboxenToelevering1.Insert(##class(vhTest.Integratie.Productie.Setup.ProductInfo).%New(..MaakProduct(..GeefLbxMLadeMetMat(), LegraBoxProductID3, "AKZQ", "DummyCIDGeefZaagLijst_3"), 1)) + do LegraboxenToelevering1.Insert(##class(vhTest.Integratie.Productie.Setup.ProductInfo).%New(..MaakProduct(..GeefLbxKLadeDiepte350(), LegraBoxProductID4, "ALBX", "DummyCIDGeefZaagLijst_4"), 1)) do LegraboxenPerToeleveringArray.SetAt(LegraboxenToelevering1,$$$ToeleveringID1) set LegraboxenToelevering2 = ##class(vhTest.Integratie.Productie.Setup.ProductInfoLijst).%New() - do LegraboxenToelevering2.Insert(##class(vhTest.Integratie.Productie.Setup.ProductInfo).%New(..MaakProduct(..GeefLbxKLadeDiepte350(), LegraBoxProductID4, "ALBX"), 1)) - do LegraboxenToelevering2.Insert(##class(vhTest.Integratie.Productie.Setup.ProductInfo).%New(..MaakProduct(..GeefLbxStandaardladeMetMat(), LegraBoxProductID5, "ALBY"), 1)) + do LegraboxenToelevering2.Insert(##class(vhTest.Integratie.Productie.Setup.ProductInfo).%New(..MaakProduct(..GeefLbxKLadeDiepte350(), LegraBoxProductID4, "ALBX", "DummyCIDGeefZaagLijst_5"), 1)) + do LegraboxenToelevering2.Insert(##class(vhTest.Integratie.Productie.Setup.ProductInfo).%New(..MaakProduct(..GeefLbxStandaardladeMetMat(), LegraBoxProductID5, "ALBY", "DummyCIDGeefZaagLijst_6"), 1)) do LegraboxenPerToeleveringArray.SetAt(LegraboxenToelevering1,$$$ToeleveringID2) quit LegraboxenPerToeleveringArray @@ -108,6 +108,7 @@ Set LBXKenmerken.ZijWandType = Enum.ZijwandType.Pure Do LBXKenmerken.GekoppeldeIngegevenKenmerken.SetAt(..GeefMatKenmerken(),"MatX") Set LBXKenmerken.GUIKenmerken.IsBinnenbreedte = $$$True + Set LBXKenmerken.GUIKenmerken.WandDikte = 18 Quit LBXKenmerken ]]> @@ -147,6 +148,8 @@ Set LBXKenmerken.LadeDiepte = ##class(DOM.PM.enu.LBXLadeDiepte).LadeDiepte450() Set LBXKenmerken.LadeHoogte = ##class(DOM.PM.enu.LBXLadeHoogte).K() Set LBXKenmerken.RugHoogte = ##class(DOM.PM.enu.LBXRugHoogte).K() + Set LBXKenmerken.GUIKenmerken.IsBinnenbreedte = $$$True + Set LBXKenmerken.GUIKenmerken.WandDikte = 18 Quit LBXKenmerken ]]> @@ -163,6 +166,8 @@ Set LBXKenmerken.LadeHoogte = ##class(DOM.PM.enu.LBXLadeHoogte).M() Set LBXKenmerken.LadeDiepte = ##class(DOM.PM.enu.LBXLadeDiepte).LadeDiepte450() Set LBXKenmerken.RugHoogte = ##class(DOM.PM.enu.LBXRugHoogte).M() + Set LBXKenmerken.GUIKenmerken.IsBinnenbreedte = $$$True + Set LBXKenmerken.GUIKenmerken.WandDikte = 18 #dim MATKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.MATKenmerken = ##class(DOM.PM.Maatwerk.Calc.Common.impl.MATKenmerken).%New() @@ -192,6 +197,8 @@ Set LBXKenmerken.LadeDiepte = ##class(DOM.PM.enu.LBXLadeDiepte).LadeDiepte350() Set LBXKenmerken.LadeHoogte = ##class(DOM.PM.enu.LBXLadeHoogte).K() Set LBXKenmerken.RugHoogte = ##class(DOM.PM.enu.LBXRugHoogte).K() + Set LBXKenmerken.GUIKenmerken.IsBinnenbreedte = $$$True + Set LBXKenmerken.GUIKenmerken.WandDikte = 18 Quit LBXKenmerken ]]> @@ -201,14 +208,14 @@ 1 DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken