Datenstruktur in eine Char Variable umwandeln /Packed werte machen Probleme

[Fuerchau]

Nein musst du nicht. Wenn du allerdings an die Feldinhalte willst, kannst du relativ simple Definitionen verwenden:

dcl-pi *n;
myds char(2000);
end-pi;

dcl-s pDS pointer;
dcl-ds MyDS likeds(xxxx) based(pDS);

pDS = %addr(myds); // Setzen Basispointer von Parameter

[BenderD]

... man beachte den feinsinnigen Humor der Compilerentwickler bei IBM! Datenstrukturen haben mit Struktur nichts zu tun, das sind blanke Binärdaten und können wie solche weitergegeben werden (mal von Alignment abgesehen). Wenn sie jemand interpretieren will, muss er den Aufbau der "Datenstruktur" kennen - am einfachsten geht das, wenn man das zur Compiletime weiß, dann macht das der Compiler für den Programmierer. Wenn man das zur Compiletime nicht weiß, braucht man Metadaten, die den Aufbau beschreiben, dann kann man sich das auch zur Laufzeit zusammenbauen oder auseinander klamüsern. Hierbei sollte man aber genau wissen, was man da tut - bei Fehlern gehts ab in den dunklen Wald!!!

D*B