Index: APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/dto/BatchNaarObjectiveTekstVelden.cls.xml =================================================================== diff -u -r74307 -r74390 --- APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/dto/BatchNaarObjectiveTekstVelden.cls.xml (.../BatchNaarObjectiveTekstVelden.cls.xml) (revision 74307) +++ APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/dto/BatchNaarObjectiveTekstVelden.cls.xml (.../BatchNaarObjectiveTekstVelden.cls.xml) (revision 74390) @@ -78,6 +78,16 @@ + +%String + + + + +%String + + + %String @@ -176,6 +186,12 @@ GebruikHalvePaletten + +LeveradresDetails + + +LeveradresLand + Index: APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/HoofdDataGenerator.cls.xml =================================================================== diff -u -r74307 -r74390 --- APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/HoofdDataGenerator.cls.xml (.../HoofdDataGenerator.cls.xml) (revision 74307) +++ APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/HoofdDataGenerator.cls.xml (.../HoofdDataGenerator.cls.xml) (revision 74390) @@ -131,20 +131,28 @@ 1 APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveTekstVelden Index: vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/HoofdDataGenerator/DataVoorToeleveringGenerator/GenereerData/Test.cls.xml =================================================================== diff -u -r74319 -r74390 --- vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/HoofdDataGenerator/DataVoorToeleveringGenerator/GenereerData/Test.cls.xml (.../Test.cls.xml) (revision 74319) +++ vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/HoofdDataGenerator/DataVoorToeleveringGenerator/GenereerData/Test.cls.xml (.../Test.cls.xml) (revision 74390) @@ -44,7 +44,7 @@ Set Afleveradres = ##class(DOM.VKP.impl.LeverAdres).%New() #dim BatchMock As vhTest.Mock.APPS.Halux.common.Batch = ##class(vhTest.Mock.APPS.Halux.common.Batch).%New() - Do BatchMock.VerwachtMethodCall("GeefID").ExactAantalKeer(3).DanReturn(..#BatchId) + Do BatchMock.VerwachtMethodCall("GeefID").ExactAantalKeer(1).DanReturn(..#BatchId) #dim ToeleveringMock As vhTest.Mock.DOM.AKP.Toelevering = ..GeefToeleveringMock(..#ToeleveringId, ..#AantalLades, ..#Horolog, 1) @@ -55,7 +55,6 @@ Set BatchPitchExported.Volgnummer = BatchPitchExportedVolgnummer Set BatchPitchExported.LijnNummer = LijnNummer #dim BatchPitchExportedLijst As %ListOfObjects = ##class(TECH.ListUtils).CreateListOfObjects(BatchPitchExported) - #dim BatchPitchExportedServiceMock As vhTest.Mock.APPS.Halux.Planning.Pitching.impl.BatchPitchExportedService = ..GeefBatchPitchExportedServiceMock(..#BatchId, BatchPitchExportedLijst) #dim OrderMock As vhTest.Mock.DOM.VKP.Order = ##class(vhTest.Mock.DOM.VKP.Order).%New() Do OrderMock.VerwachtMethodCall("GeefAxSalesId").ExactAantalKeer(1).DanDoeNiks() @@ -76,7 +75,7 @@ Set LegacyPartijApiMock = ##class(vhTest.Mock.DOM.PARTIJ.LegacyPartijAPI).%New() Do LegacyPartijApiMock.VerwachtMethodCall("GeefKlantNummerVoorPartijID", "K||1234").ExactAantalKeer(1).DanReturn(KlantId) - Set DataVoorToeleveringGenerator = ##class(APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.HoofdDataGenerator.DataVoorToeleveringGenerator).%New(BatchPitchExportedServiceMock, OrderApiMock, PartijAPIMock, LegacyPartijApiMock) + Set DataVoorToeleveringGenerator = ##class(APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.HoofdDataGenerator.DataVoorToeleveringGenerator).%New(,OrderApiMock, PartijAPIMock, LegacyPartijApiMock) #dim BatchNaarObjectiveData As APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveData = DataVoorToeleveringGenerator.GenereerData(BatchMock, ToeleveringMock, ..#SequentieNummerToelevering, ..#AantalLades) Do $$$AssertEquals(BatchNaarObjectiveData.Id, ..#ToeleveringId) @@ -94,9 +93,9 @@ If ($$$AssertTrue($IsObject(GebruikersVelden.TekstVelden))) { #dim TekstVelden As APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveTekstVelden = GebruikersVelden.TekstVelden Do $$$AssertEquals(TekstVelden.ToeleveringId, ..#ToeleveringId) - Do $$$AssertEquals(TekstVelden.Rangorde, "100_00001") + Do $$$AssertEquals(TekstVelden.Rangorde, "") Do $$$AssertEquals(TekstVelden.BatchId, ..#BatchId) - Do $$$AssertEquals(TekstVelden.ProductieLijn, LijnNummer) + Do $$$AssertEquals(TekstVelden.ProductieLijn, "") Do $$$AssertEquals(TekstVelden.Verzendwijze, VerwachteVerzendingWijzeGeformateerd) Do $$$AssertEquals(TekstVelden.KlantOrderId, ..#KlantOrderNummer) Do $$$AssertEquals(TekstVelden.MultipersonalityKlant1, "null") @@ -117,7 +116,6 @@ Do OrderMock.Verifieer() Do PartijAPIMock.Verifieer() Do LegacyPartijApiMock.Verifieer() - Do BatchPitchExportedServiceMock.Verifieer() ]]> @@ -132,7 +130,7 @@ Set Afleveradres = ##class(DOM.VKP.impl.LeverAdres).%New() #dim BatchMock As vhTest.Mock.APPS.Halux.common.Batch = ##class(vhTest.Mock.APPS.Halux.common.Batch).%New() - Do BatchMock.VerwachtMethodCall("GeefID").ExactAantalKeer(3).DanReturn(..#BatchId) + Do BatchMock.VerwachtMethodCall("GeefID").ExactAantalKeer(1).DanReturn(..#BatchId) #dim ToeleveringMock As vhTest.Mock.DOM.AKP.Toelevering = ..GeefToeleveringMock(..#ToeleveringId, ..#AantalLades, ..#Horolog, 1) @@ -143,7 +141,6 @@ Set BatchPitchExported.Volgnummer = BatchPitchExportedVolgnummer Set BatchPitchExported.LijnNummer = LijnNummer #dim BatchPitchExportedLijst As %ListOfObjects = ##class(TECH.ListUtils).CreateListOfObjects(BatchPitchExported) - #dim BatchPitchExportedServiceMock As vhTest.Mock.APPS.Halux.Planning.Pitching.impl.BatchPitchExportedService = ..GeefBatchPitchExportedServiceMock(..#BatchId, BatchPitchExportedLijst) #dim OrderMock As vhTest.Mock.DOM.VKP.Order = ##class(vhTest.Mock.DOM.VKP.Order).%New() Do OrderMock.VerwachtMethodCall("GeefAxSalesId").ExactAantalKeer(1).DanDoeNiks() @@ -164,7 +161,7 @@ Set LegacyPartijApiMock = ##class(vhTest.Mock.DOM.PARTIJ.LegacyPartijAPI).%New() Do LegacyPartijApiMock.VerwachtMethodCall("GeefKlantNummerVoorPartijID", "K||1234").ExactAantalKeer(1).DanReturn(KlantId) - Set DataVoorToeleveringGenerator = ##class(APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.HoofdDataGenerator.DataVoorToeleveringGenerator).%New(BatchPitchExportedServiceMock, OrderApiMock, PartijAPIMock, LegacyPartijApiMock) + Set DataVoorToeleveringGenerator = ##class(APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.HoofdDataGenerator.DataVoorToeleveringGenerator).%New(,OrderApiMock, PartijAPIMock, LegacyPartijApiMock) #dim BatchNaarObjectiveData As APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveData = DataVoorToeleveringGenerator.GenereerData(BatchMock, ToeleveringMock, ..#SequentieNummerToelevering, ..#AantalLades, DummySuffixId) Do $$$AssertEquals(BatchNaarObjectiveData.Id, ..#ToeleveringId _ "_" _ DummySuffixId) @@ -178,16 +175,17 @@ Do OrderMock.Verifieer() Do PartijAPIMock.Verifieer() Do LegacyPartijApiMock.Verifieer() - Do BatchPitchExportedServiceMock.Verifieer() ]]> - - + error gooien en loggen"() +{ #dim ErrorBoodschap As %String = "Rangorde kan niet gevonden worden aangezien de batch nog niet gepitcht is voor BatchId '111111'." Set BatchPitchExportedLijst = ##class(%ListOfObjects).%New() - #dim BatchPitchExportedServiceMock As vhTest.Mock.APPS.Halux.Planning.Pitching.impl.BatchPitchExportedService = ..GeefBatchPitchExportedServiceMock(..#BatchId, BatchPitchExportedLijst) #dim BatchMock As vhTest.Mock.APPS.Halux.common.Batch = ##class(vhTest.Mock.APPS.Halux.common.Batch).%New() Do BatchMock.VerwachtMethodCall("GeefID").ExactAantalKeer(1).DanReturn(..#BatchId) @@ -201,24 +199,22 @@ #dim Substring = ##class(TECH.ListUtils).CreateListOfDataTypes(ErrorBoodschap) Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.DataNotFoundException",Substring)) - Set DataVoorToeleveringGenerator = ##class(APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.HoofdDataGenerator.DataVoorToeleveringGenerator).%New(BatchPitchExportedServiceMock, "", "", "", LoggerMock) + Set DataVoorToeleveringGenerator = ##class(APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.HoofdDataGenerator.DataVoorToeleveringGenerator).%New(, "", "", "", LoggerMock) #dim BatchNaarObjectiveData As APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveData = DataVoorToeleveringGenerator.GenereerData(BatchMock, ToeleveringMock, ..#SequentieNummerToelevering, ..#AantalLades) - Do BatchPitchExportedServiceMock.Verifieer() Do BatchMock.Verifieer() Do ToeleveringMock.Verifieer() Do LoggerMock.Verifieer() -]]> - +} - - error gooien en loggen"() +{ #dim ErrorBoodschap As %String = "De rangorde kan niet worden bepaald voor BatchId '111111', aangezien er meerdere batches zijn gepitcht." Set BatchPitchExported1 = ##class(APPS.Halux.Planning.Pitching.BatchPitchExported).%New() Set BatchPitchExported2 = ##class(APPS.Halux.Planning.Pitching.BatchPitchExported).%New() #dim BatchPitchExportedLijst As %ListOfObjects = ##class(TECH.ListUtils).CreateListOfObjects(BatchPitchExported1, BatchPitchExported2) - #dim BatchPitchExportedServiceMock As vhTest.Mock.APPS.Halux.Planning.Pitching.impl.BatchPitchExportedService = ..GeefBatchPitchExportedServiceMock(..#BatchId, BatchPitchExportedLijst) #dim BatchMock As vhTest.Mock.APPS.Halux.common.Batch = ##class(vhTest.Mock.APPS.Halux.common.Batch).%New() Do BatchMock.VerwachtMethodCall("GeefID").ExactAantalKeer(1).DanReturn(..#BatchId) @@ -232,15 +228,16 @@ #dim Substring = ##class(TECH.ListUtils).CreateListOfDataTypes(ErrorBoodschap) Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.DataCorruptException",Substring)) - Set DataVoorToeleveringGenerator = ##class(APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.HoofdDataGenerator.DataVoorToeleveringGenerator).%New(BatchPitchExportedServiceMock, "", "", "", LoggerMock) + Set DataVoorToeleveringGenerator = ##class(APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.HoofdDataGenerator.DataVoorToeleveringGenerator).%New(, "", "", "", LoggerMock) #dim BatchNaarObjectiveData As APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveData = DataVoorToeleveringGenerator.GenereerData(BatchMock, ToeleveringMock, ..#SequentieNummerToelevering, ..#AantalLades) - Do BatchPitchExportedServiceMock.Verifieer() Do BatchMock.Verifieer() Do ToeleveringMock.Verifieer() Do LoggerMock.Verifieer() -]]> - +} +*/ +]]> + @@ -321,7 +316,7 @@ Set Afleveradres = ##class(DOM.VKP.impl.LeverAdres).%New() #dim BatchMock As vhTest.Mock.APPS.Halux.common.Batch = ##class(vhTest.Mock.APPS.Halux.common.Batch).%New() - Do BatchMock.VerwachtMethodCall("GeefID").ExactAantalKeer(3).DanReturn(..#BatchId) + Do BatchMock.VerwachtMethodCall("GeefID").ExactAantalKeer(1).DanReturn(..#BatchId) #dim ToeleveringMock As vhTest.Mock.DOM.AKP.Toelevering = ..GeefToeleveringMock(..#ToeleveringId, ..#AantalLades, ..#Horolog, 1, OorspronKeeting) @@ -332,7 +327,6 @@ Set BatchPitchExported.Volgnummer = BatchPitchExportedVolgnummer Set BatchPitchExported.LijnNummer = LijnNummer #dim BatchPitchExportedLijst As %ListOfObjects = ##class(TECH.ListUtils).CreateListOfObjects(BatchPitchExported) - #dim BatchPitchExportedServiceMock As vhTest.Mock.APPS.Halux.Planning.Pitching.impl.BatchPitchExportedService = ..GeefBatchPitchExportedServiceMock(..#BatchId, BatchPitchExportedLijst) #dim OrderMock As vhTest.Mock.DOM.VKP.Order = ##class(vhTest.Mock.DOM.VKP.Order).%New() Do OrderMock.VerwachtMethodCall("GeefAxSalesId").ExactAantalKeer(1).DanDoeNiks() @@ -353,7 +347,7 @@ Set LegacyPartijApiMock = ##class(vhTest.Mock.DOM.PARTIJ.LegacyPartijAPI).%New() Do LegacyPartijApiMock.VerwachtMethodCall("GeefKlantNummerVoorPartijID", "K||1234").ExactAantalKeer(1).DanReturn(KlantId) - Set DataVoorToeleveringGenerator = ##class(APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.HoofdDataGenerator.DataVoorToeleveringGenerator).%New(BatchPitchExportedServiceMock, OrderApiMock, PartijAPIMock, LegacyPartijApiMock) + Set DataVoorToeleveringGenerator = ##class(APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.HoofdDataGenerator.DataVoorToeleveringGenerator).%New(, OrderApiMock, PartijAPIMock, LegacyPartijApiMock) #dim BatchNaarObjectiveData As APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveData = DataVoorToeleveringGenerator.GenereerData(BatchMock, ToeleveringMock, ..#SequentieNummerToelevering, ..#AantalLades) If ($$$AssertTrue($IsObject(BatchNaarObjectiveData.GebruikersVelden))) { @@ -372,22 +366,9 @@ Do OrderMock.Verifieer() Do PartijAPIMock.Verifieer() Do LegacyPartijApiMock.Verifieer() - Do BatchPitchExportedServiceMock.Verifieer() ]]> - -BatchId:%String,BatchPitchExportedLijst:%ListOfObjects -1 -vhTest.Mock.APPS.Halux.Planning.Pitching.impl.BatchPitchExportedService - - - ToeleveringId:%String,AantalLades:%Integer,Horolog:%String,OrderId:%String,OorsprongKetting:%String="" 1