Hallo,

mein Problem ist das ich trotz *Change oder *ALL Berechtigung
einer bestimmten Datei auf der iSeries keine Sätze anfügen kann.

Auf die Bibliothek in der die Datei enthalten ist, habe ich ebenfalls
*Change-Berechtigung.

Code :

Set rDB = OpenDatabase(Name, dbDriverComplete, False, "ODBC;DSN=Name")
Set rRS = rDB.OpenRecordset("SELECT * FROM PO;", dbOpenDynaset)
. . .
rRS.AddNew <- hier wird spätestens der Fehler abgefangen
----------------------------------------------------------------------------
Laufzeitfehler 3027
Aktualisieren nicht möglich, Datenbank oder Objekt ist schreibgeschützt
----------------------------------------------------------------------------

Wenn ich nun direkt dahinter die Updateable-Eigenschaft lese, erhalte ich
für rDB den Wert "Wahr" und für rRS "Falsch".

Auf andere Dateien in derselben Bibliothek mit denselben Berechtigungen ist ein
anfügen problemlos möglich. Auch wird bei diesen Dateien das Updateable-Eigenschaft mit "Wahr" zurückgegeben.

Lösungsversuche :

1. Anfügen über verknüpfte Tabelle in Access -> nicht möglich
2. Neuerstellen der Datei auf der iSeries -> keine Änderung
3. Kopieren der Datei in eine andere Bibliothek -> keine Änderung
4. Anfügen über SQL-Statement -> nicht möglich
5. Berechtigungen geändert auf *ALL und zurück auf *CHANGE -> keine Änderung

System-Infos :
iSeries 170 - V4R4M0
Client Access ODBC V4R5M0
DAO 3.60
MS ACCESS 2003 (neueste Patches)
WinXP SP2 (auch mit WinXP SP1 getestet)

Nun die Frage : Woran kann das Problem noch liegen ?