Index: vhTest/Integratie/Productie/Planning/Batches/AutoBatch/TestKaderdeuren.cls.xml =================================================================== diff -u -r29059 -r56852 --- vhTest/Integratie/Productie/Planning/Batches/AutoBatch/TestKaderdeuren.cls.xml (.../TestKaderdeuren.cls.xml) (revision 29059) +++ vhTest/Integratie/Productie/Planning/Batches/AutoBatch/TestKaderdeuren.cls.xml (.../TestKaderdeuren.cls.xml) (revision 56852) @@ -91,6 +91,7 @@ do ..ToeleveringLevenCyclusService.VoegToeProductVoorLeverancier(Toelevering,..HaluxID,..KaderdeurTestDataBuilder.MaakKaderdeurBreedRecht(),1) do Toelevering.ZetDueOutTime(##class(TECH.DateTime).DateToTimeStamp(..ReferentieDatum)) do Toelevering.ZetAanmaakDatum(..ReferentieDatum) + do Toelevering.ZetOrderID(1000) do Toelevering.Save() do ..Toeleveringen.Insert(Toelevering.GeefID()) ]]> @@ -105,6 +106,7 @@ do ..ToeleveringLevenCyclusService.VoegToeProductVoorLeverancier(Toelevering,..HaluxID,..KaderdeurTestDataBuilder.MaakKaderdeurSmalVierkant(),1) do Toelevering.ZetDueOutTime(##class(TECH.DateTime).DateToTimeStamp(..ReferentieDatum)) do Toelevering.ZetAanmaakDatum(..ReferentieDatum) + do Toelevering.ZetOrderID(1000) do Toelevering.Save() do ..Toeleveringen.Insert(Toelevering.GeefID()) ]]> @@ -119,6 +121,7 @@ do ..ToeleveringLevenCyclusService.VoegToeProductVoorLeverancier(Toelevering,..HaluxID,..KaderdeurTestDataBuilder.MaakKaderdeurNietFreesbaar(),2) do Toelevering.ZetDueOutTime(##class(TECH.DateTime).DateToTimeStamp(..ReferentieDatum)) do Toelevering.ZetAanmaakDatum(..ReferentieDatum) + do Toelevering.ZetOrderID(1000) do Toelevering.Save() do ..Toeleveringen.Insert(Toelevering.GeefID()) ]]>