Dateiabgleich in RPG

[B.Hauser]

@Fuerchau,

seit Release V5R2 kann man bei allen Lese-Operationen den Datensatz direkt in eine Datenstruktur ausgeben und auch aus einer Datenstruktur updaten oder schreiben.
Damit gibt es mit Dieters Lösung überhaupt keine Probleme.

 /Free
     Chain MyKey MyFileF1 MyDS1;
     Chain MyKey MyFileF2 MyDS2;
     Eval-Corr MyDS2 = MyDS1;
     Update MyFileF2 MyDS2;
 /End-Free