Index: vhUnitTest/APPS/Halux/Docs/TestEtiketBuilder.cls.xml
===================================================================
diff -u -r51356 -r51357
--- vhUnitTest/APPS/Halux/Docs/TestEtiketBuilder.cls.xml (.../TestEtiketBuilder.cls.xml) (revision 51356)
+++ vhUnitTest/APPS/Halux/Docs/TestEtiketBuilder.cls.xml (.../TestEtiketBuilder.cls.xml) (revision 51357)
@@ -68,6 +68,11 @@
1
+
+vhTest.Mock.APPS.Halux.Docs.impl.LadeKlantEtiketBuilder
+1
+
+
aTestCase:%String
@@ -121,20 +129,18 @@
Do ..ToeleveringMetLijn.IndienMethodCall("GeefOorsprongKetting").DanReturn("")
#dim EtiketStub = ##class(BL.Etiket.LadeKlantEtiket).%New(..StandaardPartij1.GeefID())
- #dim LadeKlantEtiketBuilderMock As APPS.Halux.Docs.impl.LadeKlantEtiketBuilder = ##class(vhTest.Mock.APPS.Halux.Docs.impl.LadeKlantEtiketBuilder).%New(,..ProductApi)
- Do LadeKlantEtiketBuilderMock.VerwachtMethodCall("MaakBasisMaatwerkProductEtiket",..#ProductID,..StandaardPartij1,..#Aantal).DanReturn(EtiketStub)
- Do LadeKlantEtiketBuilderMock.VerwachtMethodCall("VulInToeleveringInfo",EtiketStub,..ToeleveringMetLijn,..ToeleveringMetLijn.GeefToeleveringLijn(..#ToeleveringLijnID),..StandaardPartij1).DanReturn(EtiketStub)
- Do LadeKlantEtiketBuilderMock.VerwachtMethodCall("FormateerProductieWeek",..ToeleveringMetLijn.GeefDueOutTime()).DanReturn("ProductieWeek")
+ Do ..LadeKlantEtiketBuilderMock.VerwachtMethodCall("MaakBasisMaatwerkProductEtiket",..#ProductID,..StandaardPartij1,..#Aantal).DanReturn(EtiketStub)
+ Do ..LadeKlantEtiketBuilderMock.VerwachtMethodCall("VulInToeleveringInfo",EtiketStub,..ToeleveringMetLijn,..ToeleveringMetLijn.GeefToeleveringLijn(..#ToeleveringLijnID),..StandaardPartij1).DanReturn(EtiketStub)
- Set EtiketBuilder = ##class(APPS.Halux.Docs.EtiketBuilder).%New(, ..ToeleveringApiStub, LadeKlantEtiketBuilderMock, ..PartijApiStub)
+ Set EtiketBuilder = ##class(APPS.Halux.Docs.EtiketBuilder).%New(, ..ToeleveringApiStub, ..LadeKlantEtiketBuilderMock, ..PartijApiStub)
#dim Etiket As BL.Etiket.LadeKlantEtiket = EtiketBuilder.MaakMaatwerkProductViaToelevering(..ToeleveringMetLijn.GeefID(),..#ToeleveringLijnID,..#Aantal)
If $$$AssertTrue($IsObject(Etiket),"Etiket is aangemaakt."){
Do $$$AssertEquals(Etiket.%ClassName(1),##class(BL.Etiket.LadeKlantEtiket).%ClassName(1))
Do $$$AssertEquals(Etiket.ProductieWeek,"ProductieWeek")
}
- Do LadeKlantEtiketBuilderMock.Verifieer()
+ Do ..LadeKlantEtiketBuilderMock.Verifieer()
]]>
@@ -143,20 +149,18 @@
Do ..ToeleveringMetLijn.IndienMethodCall("GeefOorsprongKetting").DanReturn("((1, ""K||7833"", 255025))")
#dim EtiketStub = ##class(BL.Etiket.LadeKlantEtiket).%New(..StandaardPartij2.GeefID())
- #dim LadeKlantEtiketBuilderMock As APPS.Halux.Docs.impl.LadeKlantEtiketBuilder = ##class(vhTest.Mock.APPS.Halux.Docs.impl.LadeKlantEtiketBuilder).%New(,..ProductApi)
- Do LadeKlantEtiketBuilderMock.VerwachtMethodCall("MaakBasisMaatwerkProductEtiket",..#ProductID,..StandaardPartij2,..#Aantal).DanReturn(EtiketStub)
- Do LadeKlantEtiketBuilderMock.VerwachtMethodCall("VulInToeleveringInfo",EtiketStub,..ToeleveringMetLijn,..ToeleveringMetLijn.GeefToeleveringLijn(..#ToeleveringLijnID),..StandaardPartij2).DanReturn(EtiketStub)
- Do LadeKlantEtiketBuilderMock.VerwachtMethodCall("FormateerProductieWeek",..ToeleveringMetLijn.GeefDueOutTime()).DanReturn("ProductieWeek")
+ Do ..LadeKlantEtiketBuilderMock.VerwachtMethodCall("MaakBasisMaatwerkProductEtiket",..#ProductID,..StandaardPartij2,..#Aantal).DanReturn(EtiketStub)
+ Do ..LadeKlantEtiketBuilderMock.VerwachtMethodCall("VulInToeleveringInfo",EtiketStub,..ToeleveringMetLijn,..ToeleveringMetLijn.GeefToeleveringLijn(..#ToeleveringLijnID),..StandaardPartij2).DanReturn(EtiketStub)
- Set EtiketBuilder = ##class(APPS.Halux.Docs.EtiketBuilder).%New(, ..ToeleveringApiStub, LadeKlantEtiketBuilderMock, ..PartijApiStub)
+ Set EtiketBuilder = ##class(APPS.Halux.Docs.EtiketBuilder).%New(, ..ToeleveringApiStub, ..LadeKlantEtiketBuilderMock, ..PartijApiStub)
#dim Etiket As BL.Etiket.LadeKlantEtiket = EtiketBuilder.MaakMaatwerkProductViaToelevering(..ToeleveringMetLijn.GeefID(),..#ToeleveringLijnID,..#Aantal)
If $$$AssertTrue($IsObject(Etiket),"Etiket is aangemaakt."){
Do $$$AssertEquals(Etiket.%ClassName(1),##class(BL.Etiket.LadeKlantEtiket).%ClassName(1))
Do $$$AssertEquals(Etiket.ProductieWeek,"ProductieWeek")
}
- Do LadeKlantEtiketBuilderMock.Verifieer()
+ Do ..LadeKlantEtiketBuilderMock.Verifieer()
]]>
@@ -165,12 +169,10 @@
Do ..ToeleveringMetLijn.IndienMethodCall("GeefOorsprongKetting").DanReturn("")
#dim EtiketStub = ##class(BL.Etiket.LadeKlantEtiketVHoss).%New(..StandaardPartij1.GeefID())
- #dim LadeKlantEtiketBuilderMock As APPS.Halux.Docs.impl.LadeKlantEtiketBuilder = ##class(vhTest.Mock.APPS.Halux.Docs.impl.LadeKlantEtiketBuilder).%New(,..ProductApi)
- Do LadeKlantEtiketBuilderMock.VerwachtMethodCall("MaakMaatwerkProductInVHossEtiket",..#ProductID,..StandaardPartij1,..#Aantal).DanReturn(EtiketStub)
- Do LadeKlantEtiketBuilderMock.VerwachtMethodCall("VulInToeleveringInfo",EtiketStub,..ToeleveringMetLijn,..ToeleveringMetLijn.GeefToeleveringLijn(..#ToeleveringLijnID),..StandaardPartij1).DanReturn(EtiketStub)
- Do LadeKlantEtiketBuilderMock.VerwachtMethodCall("FormateerProductieWeek",..ToeleveringMetLijn.GeefDueOutTime()).DanDoeNiks()
+ Do ..LadeKlantEtiketBuilderMock.VerwachtMethodCall("MaakMaatwerkProductInVHossEtiket",..#ProductID,..StandaardPartij1,..#Aantal).DanReturn(EtiketStub)
+ Do ..LadeKlantEtiketBuilderMock.VerwachtMethodCall("VulInToeleveringInfo",EtiketStub,..ToeleveringMetLijn,..ToeleveringMetLijn.GeefToeleveringLijn(..#ToeleveringLijnID),..StandaardPartij1).DanReturn(EtiketStub)
- Set EtiketBuilder = ##class(APPS.Halux.Docs.EtiketBuilder).%New(, ..ToeleveringApiStub, LadeKlantEtiketBuilderMock, ..PartijApiStub)
+ Set EtiketBuilder = ##class(APPS.Halux.Docs.EtiketBuilder).%New(, ..ToeleveringApiStub, ..LadeKlantEtiketBuilderMock, ..PartijApiStub)
#dim BatchID As %String = 999999
Set WPVerpak = ##class(DS.PPS.TBX.sub.emWPVerpak).%New()
Set WPVerpak.FrameID = "O1000001"
@@ -189,9 +191,10 @@
Do $$$AssertEquals(MaatwerkProductEtiket.VHossZijkant,"2")
Do $$$AssertEquals(MaatwerkProductEtiket.VolgendSlotNr,"")
Do $$$AssertEquals(MaatwerkProductEtiket.VorigSlotNr,"+")
+ Do $$$AssertEquals(MaatwerkProductEtiket.ProductieWeek,"ProductieWeek")
}
- Do LadeKlantEtiketBuilderMock.Verifieer()
+ Do ..LadeKlantEtiketBuilderMock.Verifieer()
]]>
@@ -200,12 +203,10 @@
Do ..ToeleveringMetLijn.IndienMethodCall("GeefOorsprongKetting").DanReturn("((1, ""K||7833"", 255025))")
#dim EtiketStub = ##class(BL.Etiket.LadeKlantEtiketVHoss).%New(..StandaardPartij2.GeefID())
- #dim LadeKlantEtiketBuilderMock As APPS.Halux.Docs.impl.LadeKlantEtiketBuilder = ##class(vhTest.Mock.APPS.Halux.Docs.impl.LadeKlantEtiketBuilder).%New(,..ProductApi)
- Do LadeKlantEtiketBuilderMock.VerwachtMethodCall("MaakMaatwerkProductInVHossEtiket",..#ProductID,..StandaardPartij2,..#Aantal).DanReturn(EtiketStub)
- Do LadeKlantEtiketBuilderMock.VerwachtMethodCall("VulInToeleveringInfo",EtiketStub,..ToeleveringMetLijn,..ToeleveringMetLijn.GeefToeleveringLijn(..#ToeleveringLijnID),..StandaardPartij2).DanReturn(EtiketStub)
- Do LadeKlantEtiketBuilderMock.VerwachtMethodCall("FormateerProductieWeek",..ToeleveringMetLijn.GeefDueOutTime()).DanDoeNiks()
+ Do ..LadeKlantEtiketBuilderMock.VerwachtMethodCall("MaakMaatwerkProductInVHossEtiket",..#ProductID,..StandaardPartij2,..#Aantal).DanReturn(EtiketStub)
+ Do ..LadeKlantEtiketBuilderMock.VerwachtMethodCall("VulInToeleveringInfo",EtiketStub,..ToeleveringMetLijn,..ToeleveringMetLijn.GeefToeleveringLijn(..#ToeleveringLijnID),..StandaardPartij2).DanReturn(EtiketStub)
- Set EtiketBuilder = ##class(APPS.Halux.Docs.EtiketBuilder).%New(, ..ToeleveringApiStub, LadeKlantEtiketBuilderMock, ..PartijApiStub)
+ Set EtiketBuilder = ##class(APPS.Halux.Docs.EtiketBuilder).%New(, ..ToeleveringApiStub, ..LadeKlantEtiketBuilderMock, ..PartijApiStub)
#dim BatchID As %String = 999999
Set WPVerpak = ##class(DS.PPS.TBX.sub.emWPVerpak).%New()
Set WPVerpak.FrameID = "O1000001"
@@ -224,9 +225,10 @@
Do $$$AssertEquals(MaatwerkProductEtiket.VHossZijkant,"2")
Do $$$AssertEquals(MaatwerkProductEtiket.VolgendSlotNr,"")
Do $$$AssertEquals(MaatwerkProductEtiket.VorigSlotNr,"+")
+ Do $$$AssertEquals(MaatwerkProductEtiket.ProductieWeek,"ProductieWeek")
}
- Do LadeKlantEtiketBuilderMock.Verifieer()
+ Do ..LadeKlantEtiketBuilderMock.Verifieer()
]]>