Display Satzformat als Parameter

[LS400]

Hallo zusammen,

ich möchte in RPG oder auch in RPGLE das Satzformat eines Bildschirms DSPF als Daten in einem Parameter an ein anderes Programm weitergeben. Habe bisher aber nicht gefunden wie und ob das überhaupt möglich ist.
In COBOL ist das ja ohne weiteres möglich.

Grüße

[Fuerchau]

In ILE/RPG ist das leider nicht möglich.
Der Unterschied zu COBOL ist der, dass der ILE/RPG-Compiler über den Formatnamen intern zusätzliche Move's zwischen den Variablen und dem Dateipuffer generieren muss.
Deshalb muss beim EXFMT/READ/WRITE auch ein Formatname als Konstante angegeben werden, damit der Compiler weiß, was zu generieren ist.

Deshalb gibts ja auch die Compiler-Fehler (OPM Stufe 40, ILE Stufe 20), welche Formate nicht verwendet wurden.

[ExAzubi]

Formatnamen als Parameter übergeben und um die Ausgaben einen SELECT-Block bauen und den Parameter abfragen.

SELECT
PARM WHENEQ FORM1
EXFMT FORM1
PARM WHENEQ FORM2
EXFMT FORM2
.
.
.
ENDSL

[Fuerchau]

Das würde aber bedeuten, dass ich in dem anderen Programm sämtliche benötigten DSPF's definieren und auch verwenden muss.

Ich denke, das gibt spätestens bei verschiedenen DSPF's mit gleichen Namen schon Compiler-Probleme.

Da schenke ich mir doch gleich so ein Programm in ILE/RPG und mach das doch lieber mit COBOL.