Das Problem liegt daran, dass Array Datenstrukturen und Feldgruppen anders aufgebaut sind.
MoveA funktioniert auf keinen Fall.
Da in der Array-Datenstruktur nur ein Unterfeld definiert ist und angenommen das Datenstruktur-Unterfeld ist genau so definiert wie das Feldgruppen Element, könnte das Ganze wie folgt funktionieren.
Sollte dies nicht funktionieren, musst Du leider eine Schleife bauen:Code:D MyArrDS DS Dim(100) qualified D MyFld 10A D MyFGDS DS D MyFG 10A Dim(%Elem(MyArrDS)) /Free MyFGDS = MyArrDS; /End-Free
BirgittaCode:/Free For Index = 1 to %Elem(MyArrDS) MyFG(Index) = MyArrDS(Index).MyFld; EndFor; /End-Free
![[NEWSboard IBMi Forum]](images/duke/nblogo.gif)



Mit Zitat antworten
Bookmarks