Hallo zusammen !

Ich habe ein VARPG-Programm, welches eine Datei auf der AS400 pflegt.
Auf der AS400 habe 2 RPG-Programme .

1. PGM1 Ein Programm, das einen Datensatz per Chain auf der Iseries
liest und in einer Datenstruktur (1 Feld - 512 Alpha) bereitstellt.

2. PGM2 Ein Programm, dass einen Datensatz in der Iseries Datei
schreibt(Write) oder aktualiisert (Update).
Die Daten werden jeweils per Datenstruktur geliefert.

Jetzt das Problem :
Bei mir (V5R3) funktioniert das auch .
Auf unsere V4R4M0 AS400 geht es nicht.
Dort bekomme ich die Meldung : CPF5032
Der Satz ist schon gesperrt ...

Der Ablauf ist eigentlich folgender :
Es wird zuerst pgm1(AS400) aufgerufen, und die Daten in ein Fenster geladen.
Klickt man dann auf speichern(VARPG PC), dann wird pgm2(AS400) aufgerufen.
PGM2(AS400) bekommt dann per Paramter wieder die Daten und macht dann einen
Update, bzw. soll einen Update machen.
Vor dem Update wird allerdings nochmal ein Chain gemacht, damit auch
der richtige Datensatz geladen ist.

Das Problem ist wahrscheinlich, das erst ein Chain von pgm1 gemacht
wird, und dann von pgm2 und das auf die gleiche Datei.
Aber wie gesagt, auf der neuen ISeries läuft das ja.


Jemand ne idee

Gruss sarge