Index: zTryout/THB/AX/Uitgaand/PM/TestProduct/impl/TestProductDixfConverter.cls.xml =================================================================== diff -u -r41316 -r41387 --- zTryout/THB/AX/Uitgaand/PM/TestProduct/impl/TestProductDixfConverter.cls.xml (.../TestProductDixfConverter.cls.xml) (revision 41316) +++ zTryout/THB/AX/Uitgaand/PM/TestProduct/impl/TestProductDixfConverter.cls.xml (.../TestProductDixfConverter.cls.xml) (revision 41387) @@ -48,8 +48,10 @@ // Set AxTestProduct. = Set AxTestProduct.HoofdGroep = Product.Klassificatie.HoofdGroep Set AxTestProduct.SubGroep = Product.Klassificatie.SubGroep - Set AxTestProduct.Klas = Product.Klassificatie.Klas + Break + Set AxTestProduct.IdentNrAlias = $$ListToPieces^vhLib(##class(Prod.Kenmerk.DataDefinitie).Get("OEI",Product.Basis.%Id(),"AliasI"),",") + Set ..AxTestProduct = AxTestProduct Set ..LeverancierNummer = "" Quit ..AxTestProduct Index: zTryout/THB/AX/Uitgaand/PM/TestProduct/impl/TestProductIterator.cls.xml =================================================================== diff -u -r41316 -r41387 --- zTryout/THB/AX/Uitgaand/PM/TestProduct/impl/TestProductIterator.cls.xml (.../TestProductIterator.cls.xml) (revision 41316) +++ zTryout/THB/AX/Uitgaand/PM/TestProduct/impl/TestProductIterator.cls.xml (.../TestProductIterator.cls.xml) (revision 41387) @@ -43,7 +43,7 @@ #Dim SqlStatement as %String Set SqlStatement = "SELECT ID FROM Prod.Product WHERE isnull(Gentype,'')='' and KortTekst not like 'GEN%'" // Indien nodig is hieronder een filter voorzien om het resultaat te beperken tot overzichtelijk, voor debugging: - _" and ID in (1432226,1432225,1425096,1425095,682391,1359867,1168696,1168689,830507,1155640,161442,906194,709825,924268," + _" and ID in (1379217,1432226,1432225,1425096,1425095,682391,1359867,1168696,1168689,830507,1155640,161442,906194,709825,924268," _"1124771,1038806,1039173,1039208,1247980,353741,353743,353744,254245,254258,1259381,161441,665626,1067709,1067714,268026," _"1168369,668615,878186,878220,1169509,1194443,383880,830257)" Set ..ResultSet = ..QueryAPI.GetResultSet(##class(TECH.DynamicQuery).%New(SqlStatement)) Index: zTryout/THB/AX/Uitgaand/PM/TestProduct/impl/TestProductDixfGenerator.cls.xml =================================================================== diff -u -r41316 -r41387 --- zTryout/THB/AX/Uitgaand/PM/TestProduct/impl/TestProductDixfGenerator.cls.xml (.../TestProductDixfGenerator.cls.xml) (revision 41316) +++ zTryout/THB/AX/Uitgaand/PM/TestProduct/impl/TestProductDixfGenerator.cls.xml (.../TestProductDixfGenerator.cls.xml) (revision 41387) @@ -32,7 +32,7 @@ // Do AXTestProductData.VoegToeVeld("zTryout.THB.AXdixf.TestProduct.TestProduct", "") Do AXTestProductData.VoegToeVeld("zTryout.THB.AXdixf.TestProduct.TestProduct", "HoofdGroep") Do AXTestProductData.VoegToeVeld("zTryout.THB.AXdixf.TestProduct.TestProduct", "SubGroep") - Do AXTestProductData.VoegToeVeld("zTryout.THB.AXdixf.TestProduct.TestProduct", "Klas") + Do AXTestProductData.VoegToeVeld("zTryout.THB.AXdixf.TestProduct.TestProduct", "IdentNrAlias") Set AXTestProductData.ScheidingsTeken = ";" Index: zTryout/THB/AXdixf/TestProduct/TestProduct.cls.xml =================================================================== diff -u -r41316 -r41387 --- zTryout/THB/AXdixf/TestProduct/TestProduct.cls.xml (.../TestProduct.cls.xml) (revision 41316) +++ zTryout/THB/AXdixf/TestProduct/TestProduct.cls.xml (.../TestProduct.cls.xml) (revision 41387) @@ -72,7 +72,7 @@ %String - + %String