====== Zahl mit führenden Nullen auffüllen ======

//Benanntes DOCUframe-Makro://

<code vb>
STRING GetNumber( INT Integer, INT Digits, STRING Praefix = "" )
  STRING Number;
  INT Length;

  Number = IntToStr( Integer, 10, LANGID_C );
  Length = StrGetLength( Number );
  StrFormatRight( Number, Digits, '0' );

RETURN( Praefix + Number );
</code>

Anwendungsbeispiel:

<code vb>
Number = GetNumber( 25, 3, "A" );
</code>

Die Variable "Number" hat jetzt den Wert "A025".