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() ]]>