Hallo,
Ich habe auf der AS/400 einen WebService, basierend auf einem WWS-System für einen Onlineshop zur Verfügung gestellt, welcher Daten zu den Bestellpositionen liefert.

Technisch funktioniert alles.
Aufruf sieht ungefähr so aus:

DPos DS qualified
D PosNo 5s 0
D PosTxt 30a
D PosAmt 11s 2
*
D inOutData DS qualified
D InvoiceNo 11a
D InfoiceTxT 30a
D Position likeds(Pos) dim(50)
D FootTxT 30a
*
D outErrData DS qualified
D ok_Flag 1A
D ok_Msg 80A

C *entry plist
C parm inOutData
C parm outErrData


Da ich bis jetzt noch keine Möglichkeit gefunden habe den Eingabeparameter variabel zu gestalten, habe ich die Positionen auf 50 (über-)Dimensioniert.

Und das ist mein Problem, bei dim(1), braucht der Webservice ca. eine halbe Sekunde, bei dim(10) 4 Sekunden und bei dim(50) 15-18 Sekunden.

Nach einigen Versuchen scheint der Flaschenhals das füllen aller nicht übergebenen Werte mit Standartwerten durch den Webservice zu sein.

Kennt irgendwer eine Möglichkeit hier variabel zu arbeiten, gegebenenfalls auch mit NULL-Werten, ohne die Webserviceschnittstelle nach außen zu Ändern, da der Shop schon steht.
Oder eine andere Möglichkeit.

Danke im Voraus

Thomas