Chain im Free-Format

[woki]

Hallo,
ich befasse mich in den letzten Tagen ein wenig mit dem Free-Format-RPG.
Allerding weiß ich nicht so recht wie ich einen Chain über eine Datei machen soll, bzw. die ich den Key definiere, der aus 3 Feldern besteht.
Gibt es hier eine Alternatiove zu KLIST und KFLD?

[Fuerchau]

chain format (key1:key2:...);
if %found();

[sim]

anders rum, oder ?

chain(n) (key1: key2: key3) format;
if %found;
...
...

[B.Hauser]

Eine andere Alternative ist die Schlüssel-Liste als Datenstruktur zu definieren.
1. Auflistung von Subfeldern
2. Über Schlüsselwort LikeRec(FileFmt: *KEY)
3. Über Schlüsselwort ExtName(File: *KEY)

Der Zugriff erfolgt unter Verwendung der Built-in-Function %KDS:

/Free
   Chain %KDS(MyKeyDS) MyFileFmt;

   //Mit TeilSchlüssel:
   Chain %KDS(MyKeyDS: 3) MyFileFmt; 

Falls übrigens mit nur einem Feld auf eine Datei zugegriffen wird, muss das Schlüssel-Feld in runden Klammern () angegeben werden:

Chain (RRN) MyFileFmt; 

Birgitta

[Fuerchau]

Jo, aber ich hab das Handbuch halt nicht im Kopf.
Ausserdem kann man KLIST's nun auch im D-Format definieren, eine %-Funktion gibts da auch noch usw.usw.
Manchmal genügt halt einfach ein Blick ins Handbuch:
http://publib.boulder.ibm.com/infoce...e/launcher.htm

Da gibts eigentlich alles was man braucht.

[woki]

Super, ihr habt mir geholfen!!
Kann ich irgenwo im Internet eine Einführung in Free-RPG oder die Grundlagen finden?

[mk]

Hallo zusammen,


im WDSC ist auch das Produkt Code400 und Visual Age for RPG
enthalten.

Im Code 400 kann man einen Editor öffnen .
Wenn Du dann deine RPG Quelle geöffnet hast
kannst Du einfach alles in das Free Formart
umsetzten lassen.


Dann erklärt sich fast alles von selbst.

Probier es einfach aus.

Gruss
Michael

[B.Hauser]

im WDSC ist auch das Produkt Code400 und Visual Age for RPG
enthalten.

Im Code 400 kann man einen Editor öffnen .
Wenn Du dann deine RPG Quelle geöffnet hast
kannst Du einfach alles in das Free Formart
umsetzten lassen.

Das geht seit Version V5.1.2 auch im WDSc direkt!

Birgitta

[woki]

Wir haben die WDSC-Version 5.1.0.3 -> hier habe ich es leider nicht gefunden....
Na ja, vielleicht gibts das dann nach dem Update - aber danke für die Hilfe!

[B.Hauser]

Klar!

Version 5.1.0.3 ist auch älter als Version 5.1.2
Übrigens die aktuelle Version ist Version V6.

Näheres dazu in der iNN - eNews 11/2005:
WDSc Tipps und Tricks - Teil I

Birgitta

[mk]

Hallo Birgitta, hallo Woki,


da stimmt. Es geht natürlich auch im WDSC/Rational.

Aber wenn man damit anfängt verhäddert man sich
vielleicht am Anfang . Zumindest ging es mir so.

Außerdem sind die beiden Produkte Code 400
und IBM VARPG doch wesentlich schlanker.

Woki: Vieleicht sind in deiner Version die Produkte ja enthalten.

Gruss
Michael

[woki]

Code400 und VisualAge gibt es wohl, damit arbeite ich auch - dort habe ich aber nichts mit dem Free-Format gesehen, außer in der Hilfe
Demnächst bekommen wir das Update auf 6.0 - dann wird´s wohl funktionieren.