4999 REM BEISPIEL FUER DREI DATENFELDER DS$(1)-DS$(3)
5000 LE$="               ": REM LEERSTRING ZUM AUFFUELLEN
5010 DS$(1)=LEFT$(DS$(1)+LEFT$(LE$,ABS(15-LEN(DS$(1)))),15)
5020 DS$(2)=LEFT$(DS$(2)+LEFT$(LE$,ABS(15-LEN(DS$(2)))),15)
5030 DS$(3)=LEFT$(DS$(3)+LEFT$(LE$,ABS(15-LEN(DS$(3)))),15)
5040 RETURN