Sfl-Satz löschen, declare global temporary table im SQL

[B.Hauser]

Global Temporary Tables sind Tabellen die auf Job-Ebene (deshalb global!) gelten und nicht nur auf Programm-Ebene.
Im Prinzip nichts anderes als eine Tabelle in der QTEMP, nur halt in der "SQL"-Welt. Im SQL-Standard ist die QTEMP unbekannt. Global Temporary Tables werden mit SESSION qualifiziert.
Der Unterschied liegt m.E. nur darin, dass beim Erstellen von Global Temporary Tables nicht versucht wird die Tabelle in irgendeinem Journal zu registrieren.

Birgitta

[dschroeder]

Vielen Dank Birgitta. Genauso habe ich es mir gedacht (bzw. befürchtet). Nochmal eine kurze Frage: Ich versuche gerade, eine mit likerec deklarierte Struktur in einen langen String zu schieben:
dcl-f bvsjse1d workstn handler('PROFOUNDUI(HANDLER)') alias qualified
sfile(sfl1:f1.s1_satznr);

dcl-ds s1 likerec(bvsjse1d.sfl1:*all); // Alle Felder von sfl1
dcl-s daten char(32000);
daten = s1;

Es sieht für mich so aus, als würde nur das erste Unterfeld von s1 übertragen.

Muss ich extra eine weitere Struktur definieren, in der ich s1 als Unterfeld habe?


Dieter

[ExAzubi]

Warum machst du es nicht so...

dcl-ds   s1 likerec(bvsjse1d.sfl1:*all);       // Alle Felder von sfl1
dcl-ds   save1 likerec(bvsjse1d.sfl1:*all);
 
save1 = s1;

[dschroeder]

Warum machst du es nicht so...

dcl-ds   s1 likerec(bvsjse1d.sfl1:*all);       // Alle Felder von sfl1
dcl-ds   save1 likerec(bvsjse1d.sfl1:*all);
 
save1 = s1;

Weil save1 in ein Datenbankfeld in meiner temporären Tabelle geschoben werden muss. Ich will mir ja gerade ersparen, alle SFL-Felder einzeln in einer Datenbanktabelle zu definieren. Ich möchte stattdessen, den gesamten Datensatz aus der Subfile in einem langen Feld der Datenbanktabelle speichern. Wenn ich das so definiere, wie du vorschlägst, haben ich ja wieder eine (qualifizierte) Struktur.

Dieter

[dschroeder]

Im Moment komme ich nicht so recht weiter. Mein Problem lässt sich jetzt auf folgende Fragestellung reduzieren:
Ich habe eine qualifizierte Datenstruktur s1. Diese möchte ich "am Stück" in ein langes Stringfeld schieben. Weiß jemand, wie das im free format geht?

Dieter

[ExAzubi]

Sorry Fehler meinerseits...

Um zwei qualifizierte Datenstrukturen "gleichzusetzen" kann du den Befehl "eval-corr" benutzen

Sollte eigentlich für deine zwecke zu gebrauchen sein

Hier der Link zur Beschreibung
http://www-01.ibm.com/support/knowle...0925086758.htm

[dschroeder]

Sorry Fehler meinerseits...

Um zwei qualifizierte Datenstrukturen "gleichzusetzen" kann du den Befehl "eval-corr" benutzen

Sollte eigentlich für deine zwecke zu gebrauchen sein

Hier der Link zur Beschreibung
http://www-01.ibm.com/support/knowle...0925086758.htm

Nein, leider nicht. Ich will ja gerade NICHT 2 qualifizierte Datenstrukturen gleichsetzen. Ich will eine qualifizierte Datenstruktur in ein Alphafeld char(32000) schieben!

Dieter

[dschroeder]

So, ich konnte mein Problem jetzt folgendermaßen lösen:

dcl-ds datenDS;
tempStr char(32000) pos(1);
tempDS like(s1) pos(1);
end-ds;

chain i bvsjse1d.sfl1 s1;
tempDS = s1;

==> Danach steht in tempStr der volle String mit allen Daten von s1.

Danke an alle für die Tipps.

Dieter