Index: APPS/Halux/Planning/impl/BatchService.cls.xml =================================================================== diff -u -r31164 -r31170 --- APPS/Halux/Planning/impl/BatchService.cls.xml (.../BatchService.cls.xml) (revision 31164) +++ APPS/Halux/Planning/impl/BatchService.cls.xml (.../BatchService.cls.xml) (revision 31170) @@ -485,7 +485,7 @@ Do ResultSet.Execute(VerplaatsNaarVolgnummer,Batch.GeefVolgnummer(),Batch.GeefGeplandOp(),Batch.GeefCategorie(),BatchID) While (ResultSet.Next()) { - Set TeWijzigenBatch = BatchService.GeefBatch(ResultSet.Data("ID")) + Set TeWijzigenBatch = ..BatchService.GeefBatch(ResultSet.Data("ID")) Do TeWijzigenBatch.ZetVolgnummer(TeWijzigenBatch.GeefVolgnummer()+1) Do TeWijzigenBatch.Save() Do BatchOverzicht.MaatwerkBatches.Insert(..GeefMaatwerkBatch(TeWijzigenBatch)) @@ -496,7 +496,7 @@ Do ResultSet.Execute(Batch.GeefVolgnummer(),VerplaatsNaarVolgnummer,Batch.GeefGeplandOp(),Batch.GeefCategorie(),BatchID) While (ResultSet.Next()) { - Set TeWijzigenBatch = BatchService.GeefBatch(ResultSet.Data("ID")) + Set TeWijzigenBatch = ..BatchService.GeefBatch(ResultSet.Data("ID")) Do TeWijzigenBatch.ZetVolgnummer(TeWijzigenBatch.GeefVolgnummer()-1) Do TeWijzigenBatch.Save() Do BatchOverzicht.MaatwerkBatches.Insert(..GeefMaatwerkBatch(TeWijzigenBatch))