Factuurnummers 2009 aanpassen

Een klant wil de factuurnummers van alle verkoopfacturen gemaakt in 2009 aanpassen...

Voorbeeld:
Oud nummer : 09000010
Moet worden : 090010 (posities 3+4 verwijderen)

Ik heb een report geschreven met onderstaande code:



Sales Invoice Header - OnPreDataItem()"
Sales Invoice Header".SETFILTER("Document Date",'%1..%2',AbpDatDocDatumVanaf,AbpDatDocDatumTm);

Sales Invoice Header - OnAfterGetRecord()
AbpCodNieuwFactuurnr:=COPYSTR("Sales Invoice Header"."No.",1,2)+COPYSTR("Sales Invoice Header"."No.",5,15);

IF NOT AbpBooTestrun THEN BEGIN
"Sales Invoice Header"."Factuurnr. oud":="Sales Invoice Header"."No.";
"Sales Invoice Header".MODIFY;
AbpRecFactuur:="Sales Invoice Header";
RENAME("Sales Invoice Header"."No.",AbpCodNieuwFactuurnr);
"Sales Invoice Header":=AbpRecFactuur;
END;


Ik krijg telkens weer de foutmelding 'Er zijn te veel sleutelvelden gedefinieerd, zodat Verkoopfactuur niet kon worden opgehaald. Het aantal velden in de primaire sleutel is 1'. Ik heb in de tabel 'Sales invoice header' alleen de primaire sleutel (=No.) aanstaan, andere keys zijn disabled!

Wat doe ik verkeerd?????