%editc

[ILEMax]

Hi,
ich suche nach einer Erklährung für folgendes:

H DECEDIT('0,') DATEDIT(*DMY.)
D S_DLS_DT S 11
D P001DLS S 3 inz('XXX')
D HEUTEJ S 4S 0 INZ(2012)
D HEUTEM S 2S 0 INZ(05)
D HEUTET S 2S 0 INZ(18)
D STRING S 8
C EVAL S_DLS_DT = P001DLS + %EDITC(
C HEUTEJ*10000+HEUTEM*100+HEUTET:'X')
C EVAL STRING = %EDITC(
C HEUTEJ*10000+HEUTEM*100+HEUTET:'X')
C S_DLS_DT DSPLY
C STRING DSPLY
C SETON LR Erwartet hätte ich
XXX20120518 und
20120518

bekommen tu ich

DSPLY XXX00020120
DSPLY 00020120 Warum werden da noch 3 Nullen vor gestellt

Seh ich den Wald vor lauter Bäumen nicht?

Danke
Der ILEMax

[Fuerchau]

Weil der Compiler für die Berechnung von Zwischenergebnissen halt größere Felder anlegt und immer das mögliche Maximum berücksichtigt.
Wenn dein Ergebnis eine max. Größe nicht überschreitet, kannst du das wieder entsprechend verpacken:

%dec(Ergebnis:8:0)

[ILEMax]

ok, thx.
mit %editc(%dec(j*10000+m*100+t:8:0):'X')
geht es.

hatte es vorher mit %substr(%editc(j*10000+m*100+t:'X'):4) gelöst und hab mich gefragt woher ich in anderen fällen wissen kann wieviele nullen davor gestellt werden.

aber mit dem %dec geht es

Danke
ILEMax