Index: APPS/AKP/Zending/impl/ZendingService.cls.xml =================================================================== diff -u -r38096 -r39498 --- APPS/AKP/Zending/impl/ZendingService.cls.xml (.../ZendingService.cls.xml) (revision 38096) +++ APPS/AKP/Zending/impl/ZendingService.cls.xml (.../ZendingService.cls.xml) (revision 39498) @@ -131,7 +131,7 @@ While ((index '= "")){ set rec = @..#Global(BlumLevNr,"D",ZendingId,"999999",index) if (($Piece(rec,"\",..#VervFaktuurLijnToeleveringInfo) = ToeleveringInfo) && ($Piece(rec,"\",..#VervFaktuurLijnAantalGefaktureerd) = AantalGefaktureerd)){ - set nieuweindex = $Order(@..#Global(BlumLevNr,"D",ZendingId,BlumFaktuurNr,100),-1) + 1 + set nieuweindex = $Order(@..#Global(BlumLevNr,"D",ZendingId,BlumFaktuurNr,999),-1) + 1 Merge @..#Global(BlumLevNr,"D",ZendingId,BlumFaktuurNr,nieuweindex) = @..#Global(BlumLevNr,"D",ZendingId,"999999",index) kill @..#Global(BlumLevNr,"D",ZendingId,"999999",index) // als manuele toelevering met lege referentie is er toch geen lijn om te verplaatsen