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")