ENTRY-PLIST und PCML-Definition für REST-WebService

[B.Hauser]

Versuche mal anstatt der Mehrfach-Datenstruktur (MOD mit Schlüssel-wort OCCURS) eine Array Datenstruktur (DIM) in der DS-Zeile zu definieren.
Arbeite anstatt der *ENTRY-PLIST mit Prototyping (Procedure Interface und Prototype)

Birgitta

[Fuerchau]

Die *ENTRY-Definition verweist grundsätzlich nur auf einfache Typen. Eine DS mit OCCURS/DIM ist dann eben nur ein Zeichenfeld entspechender Größe.
Bei Prototyp-Definitionen können eben auch komplexerer und geschachtelte Definitionen verwendet werden.
Wobei folgendes zu beachten ist:
Eine "LIKE(MYDS)" erstellt wieder nur eine einfache Zeichenvariable, ein "LIKEDS(MYDS)" übernimmt auch die Strukturdefinitionen.
Ggf. kommt daher der PCML-Generator besser damit zurecht.

Noch was grundsätzliches zu OCCURS:
In ILERPG macht dies nur noch wenig Sinn, da die Zugriffe hier nicht einfach per Indexvariable erfolgen kann und der Zustand jederzeit geändert sein kann. Vor dem Zugriff auf eine Occurs-Struktur sollte man sich eben sicher sein, dass die korrekte Ebene im Zugriff steht.
Der einzige Vorteil ist, dass ein Set von Variablen mehrfach vorkommen kann. Aber bei Verwendung von "qualified" erübrigt sich das auch.
Die besserer Alternative (und Lesbarkeit) ist eben ein DIM, dass auch auf DS-Ebene vorkommen kann.
Wichtig ist bei der Umstellung von OCCURS auf DIM bei Prozeduraufrufen die Ausrichtung der jeweiligen Dimension auf 16-Byte-Grenze was aber mit ALIGN auf dem 1.Feld berichtigt werden kann.

[Peet]

Hallo Fuerchau,
deine Infos sind leider nur "halb" richtig, die DS mit OCCUR wird nicht als einfaches Zeichenfeld erkannt.
Denn die OCCUR-DS wurde von Anfang an als "struct" erkannt, das war nicht das Problem.

[Peet]

Hallo Birgitta,
vielen Dank für deine Unterstützung, was wäre die AS400-Welt ohne dich :=)

Es funktioniert auch mit OCCUR und *ENTRY-PLIST !
(aber auch mit DIM !)
Die Lösung liegt in einem kleinen Häkchen während der Einrichtung des WebService durch den Assistenten !

Im Schritt 4/9 werden die Felder des zuvor angegebenen Programms angezeigt, dort wählt man aus welche Felder Input und welche Felder Output sind.
Über dieser Aufstellung der Felder befindet sich eine Checkbox mit der Beschriftung "Detect length fileds" !
Diese Checkbox muss man deaktivieren und dann kommt in der Aufstellung der Felder auch die zusätzliche Spalte "Anzahl", in der ich dann bei dem Feld für die OCCUR-DS auch das zugehörige Feld mit der Anzahl der "verwendeten" DS auswählen kann !
(leider kriege ich es leider nicht hin, hier einen Screenshot einzufügen)

Nochmals vielen Dank für deine Unterstützung !