Habe zwar meine eigenen Routinen aber die gefallen mir fast noch besser ;-)

guckst Du:
Mod 10 check digit calculation