Hallo,

wie Du in meinem Beispiel ersehen kannst, gehe ich wie folgt vor:

DCL VAR(&PDATV) TYPE(*CHAR) LEN(8) +
VALUE('20120822') -> Übergabeparameter
DCL VAR(&PDATV_N) TYPE(*DEC) LEN(8 0)

Umsetzung von Character in numerisch
CHGVAR VAR(&PDATV_N) VALUE(&PDATV)

Das Feld IWIDDT aus Datei DIW7PF ist definiert mit S 8 0 (=gezont), da ich doch ansonsten nicht anders vergleichen kann?!?!

OPNQRYF FILE((DIW7PF)) QRYSLT('IWIDDT *EQ PDATV_N') +
MAPFLD((PDATV_N IWIDDT *DEC 8 0))

Funktioniert so nicht - weshalb nicht?!?!