Verhindern das weniger als 8 Stellen in einer Displayfile eingegeben werden

[Fuerchau]

Egal ob Numerisch oder Alpha:
%len(%trim(%char(Feld)))
Bei Zeichenfeldern gibts keine Wandlung, bei numerischen Feldern gibts Edit ohne Vornull.
Aber eine typgerechte Prüfung ist dem immer vorzuziehen.

[Pikachu]

D                 DS
DNUMMER                          8S 0 INZ(12345678)
DSTELLE1                         1A   OVERLAY(NUMMER)
D
C     STELLE1       IFNE      '0'
C                   ENDIF