Hallo, > -----Original Message----- > From: RA Stehmann [mailto:anw...@rechtsanwalt-stehmann.de]
> Das Hauptverfahren zur Berechnung der Prüfziffer der IBAN > kann übrigens > nicht in einem Starbasic-Makro umgesetzt werden, da der zu > bearbeitende > Integerwert zu viele Stellen hat. Man kann das als Stringberechnung implementieren. Ich bin zu faul es selbst hinzuschreiben, weswegen ich auf ein Beispiel in VBA verweise: http://www.ms-office-forum.net/forum/showthread.php?t=259499 Dort ist nur in der Zeile die eine Fehlermeldung wegen des Dateityps bringt ein VAL() zu ergänzen, aus: bytPrd = Mid$(strNo1, lngVar1, 1) * Mid$(strNo2, lngVar2, 1) + bytCarry Wird also: bytPrd = VAL(Mid$(strNo1, lngVar1, 1)) * VAL(Mid$(strNo2, lngVar2, 1)) + bytCarry Gruß Jörg --------------------------------------------------------------------- To unsubscribe, e-mail: users-de-unsubscr...@openoffice.apache.org For additional commands, e-mail: users-de-h...@openoffice.apache.org
