Also ich ahbe es mit dieser
Code:
D MyData E Ds Extname(CXLAGPF)
D MyData2 E Ds Extname(artstamm)
 
Fetch Mycursor Into :Mydata, :mydata2;
Version hinbekommen. Das funktioneirt wunderbar.