Index: APPS/Halux/Docs/impl/MaatwerkProductEtiketBuilder.cls.xml =================================================================== diff -u -r30042 -r30045 --- APPS/Halux/Docs/impl/MaatwerkProductEtiketBuilder.cls.xml (.../MaatwerkProductEtiketBuilder.cls.xml) (revision 30042) +++ APPS/Halux/Docs/impl/MaatwerkProductEtiketBuilder.cls.xml (.../MaatwerkProductEtiketBuilder.cls.xml) (revision 30045) @@ -21,7 +21,7 @@ ProductID:%String,Partij:DOM.PARTIJ.Partij,Aantal:%Integer BL.Etiket.LadeKlantEtiket @@ -31,7 +31,7 @@ ProductID:%String,Partij:DOM.PARTIJ.Partij,Aantal:%Integer BL.Etiket.LadeKlantEtiketVHoss Index: vhUnitTest/APPS/Halux/Docs/impl/TestMaatwerkProductEtiketBuilder.cls.xml =================================================================== diff -u -r30042 -r30045 --- vhUnitTest/APPS/Halux/Docs/impl/TestMaatwerkProductEtiketBuilder.cls.xml (.../TestMaatwerkProductEtiketBuilder.cls.xml) (revision 30042) +++ vhUnitTest/APPS/Halux/Docs/impl/TestMaatwerkProductEtiketBuilder.cls.xml (.../TestMaatwerkProductEtiketBuilder.cls.xml) (revision 30045) @@ -186,7 +186,7 @@ Do ..Data.Order.ZetAfleveradres(AfleverAdres) Do ..Data.Order.Save() - #Dim Etiket As BL.Etiket.MaatwerkProduct = ..EtiketBuilder.MaakBasisMaatwerkProductEtiket(..Data.ProductID,Partij,1) + #Dim Etiket As BL.Etiket.LadeKlantEtiket = ..EtiketBuilder.MaakBasisMaatwerkProductEtiket(..Data.ProductID,Partij,1) Do ..EtiketBuilder.VulInOrderInfo(Etiket,..Data.Order,Partij,ProductOrderLijn) Do $$$AssertEquals(Etiket.LblInfo1,"Klant") Index: vhUnitTest/APPS/Halux/Docs/TestEtiketBuilder.cls.xml =================================================================== diff -u -r30042 -r30045 --- vhUnitTest/APPS/Halux/Docs/TestEtiketBuilder.cls.xml (.../TestEtiketBuilder.cls.xml) (revision 30042) +++ vhUnitTest/APPS/Halux/Docs/TestEtiketBuilder.cls.xml (.../TestEtiketBuilder.cls.xml) (revision 30045) @@ -32,7 +32,7 @@ #dim Etiket As APPS.common.Print.AbstractLabel = EtiketBuilder.MaakMaatwerkProductViaOrder(..Data.Order.GeefID(),101,1) If $$$AssertTrue($IsObject(Etiket),"Etiket is aangemaakt."){ - Do $$$AssertEquals(Etiket.%ClassName(1),"BL.Etiket.MaatwerkProduct") + Do $$$AssertEquals(Etiket.%ClassName(1),##class(BL.Etiket.LadeKlantEtiket).%ClassName(1)) Do ..ControleEtiket(Etiket) Do $$$AssertEquals(Etiket.ToeleveringID,..Data.Order.GeefOrderLijnViaVolgnummer(101).GeefToelevering().GeefID()) } @@ -46,7 +46,7 @@ #dim Etiket As APPS.common.Print.AbstractLabel = EtiketBuilder.MaakMaatwerkProductViaToelevering(ToeleveringID,101,1) If $$$AssertTrue($IsObject(Etiket),"Etiket is aangemaakt."){ - Do $$$AssertEquals(Etiket.%ClassName(1),"BL.Etiket.MaatwerkProduct") + Do $$$AssertEquals(Etiket.%ClassName(1),##class(BL.Etiket.LadeKlantEtiket).%ClassName(1)) Do ..ControleEtiket(Etiket) Do $$$AssertEquals(Etiket.ToeleveringID,ToeleveringID) } @@ -66,7 +66,7 @@ #dim Etiket As APPS.common.Print.AbstractLabel = EtiketBuilder.MaakMaatwerkProductInVHossViaToelevering(ToeleveringID,100,1,BatchID,WPVerpak) If $$$AssertTrue($IsObject(Etiket),"Etiket is aangemaakt."){ - Do $$$AssertEquals(Etiket.%ClassName(1),"BL.Etiket.MaatwerkProductInVHoss2D") + Do $$$AssertEquals(Etiket.%ClassName(1),##class(BL.Etiket.LadeKlantEtiketVHoss).%ClassName(1)) Do ..ControleEtiket(Etiket) #dim MaatwerkProductEtiket As BL.Etiket.LadeKlantEtiketVHoss = Etiket Do $$$AssertEquals(MaatwerkProductEtiket.LadeID,"99999903200000700")