Führende Leerzeichen löschen

C     Diese Routine löscht führende Leerzeichen im Text der Variable.

C     

C     Aufruf:

C     CALL P2H026 (TEXTVAR,IRET)

C     

C     Folgende Variable muss zuvor festgelegt werden:

C     

C     TEXTVAR : Variable mit dem zu ändernden Text. Nach Aufruf der

C               Routine enthält die Variable den korrigierten Text

C     

C     HINWEIS: Die Textvariable TEXTVAR muss im Programmkopf

C              deklariert werden!

C     CHARACTER *80 TEXTVAR

C     

C     Beispiel:

C     ----------------------------

C     Führende Leerzeichen löschen

C     ----------------------------

      TEXTVAR = "    Beispiel"

C     

      CALL P2H026 (TEXTVAR,IRET)

C     

C     Der Inhalt der Variable TEXTVAR ist jetzt "Beispiel"