Hi, *all

bei folgendem Coding zu dem o.a. API bekomme ich den Ausführungsfehler :

Der für das Argument angegebene Wert ist nicht Korrekt.

Der Returncode (RC) ist 3021

* Prototype IFS Objektattribute ermitteln -
D IFSGETATTR PR 10I 0 EXTPROC('Qp0lGetAttr')
D * VALUE
D * VALUE
D * VALUE OPTIONS(*STRING)
D 10U 0 VALUE
D * VALUE
D * VALUE
D 10U 0 VALUE


* ------------------------------------------
* FUNKTIONSVARIABLEN(LOOCAL)
* -----------------------------------------
D PFAD_DS dS
D PFAD_CCSID 4B 0 INZ
D PFAD_CNTRY 2A INZ(X'0000')
D PFAD_LANGU 3A INZ(X'000000')
D PFAD_RES0 3A INZ(X'000000')
D PFAD_PTYP 4B 0 INZ
D PFAD_PLEN 4B 0 INZ
D PFAD_PDEL 2A INZ('/')
D PFAD_RES1 10A INZ
(X'00000000000000000000')
D PFAD_PFAD_ *
D PFAD_DS_ S * INZ(%ADDR(PFAD_DS))

* --- Hole Objektattribute ---
C EVAL RC = IFSGETATTR (PFAD_DS_ :
C ATTRTYPLST_ :
C RT_DS_ :
C BUFSIZEPR : (10U 0)
C BUFSIZERQ_ : (*1)
C NUMBYTERT_ : (*1)
C FLWSYMLNK ) (10U 0)

*1: beides Pointer auf 10U 0 Felder
RT_DS_ ist Pointer auf 500Byte alpha Feld

Woher weiß ich auf welchen Parameter sich die Fehlermeldung bezieht bzw. was ist falsch?

Danke, Astrid


[Dieser Beitrag wurde von Robi am 06. Juni 2003 editiert.]