Re: Calling a procedure in a service program that returns a char(6) value

Jon Paris <[email protected]> Wed, 13 May 2026 14:16:02 -0400
Newsgroups gmane.comp.lang.as400.java
Message-ID <[email protected]>
WW91IGhhdmVuJ3Qgc2hvd24gdXMgaG93IHlvdSBhcmUgY2FsbGluZyB0aGUgc3VicHJvY2VkdXJl
IGZyb20gSmF2YS4gV2l0aG91dCB0aGF0IHdlJ3JlIGp1c3QgZ3Vlc3NpbmcsCgoKSm9uIFBhcmlz
Ckpvbi5QYXJpc0BwYXJ0bmVyNDAwLmNvbQoKCgo+IE9uIE1heSAxMywgMjAyNiwgYXQgMjowM+KA
r1BNLCBMdWNhIEdpYW1tYXR0ZWkgPGx1Y2EuZ2lhbW1hdHRlaUBnbWFpbC5jb20+IHdyb3RlOgo+
IAo+IEhpIGV2ZXJ5b25lLCBJJ20gc3R1Y2sgd2l0aCB3aGF0IEkgdGhvdWdodCB3YXMgYSBzbWFs
bCBwcm9ibGVtIGJ1dCBjYW4ndAo+IHNlZW0gdG8gcmVzb2x2ZS4KPiBGcm9tIGEgSmF2YSBjbGFz
cyBydW5uaW5nIG9uIGEgV2luZG93cyBzZXJ2ZXIsIEkgbmVlZCB0bzoKPiAxLiBjb25uZWN0IHRv
IGEgY2VydGFpbiBJQk0gaSBwb3dlciBzZXJ2ZXI7IChkb25lKQo+IDIuIHNldCBhIHNwZWNpZmlj
IGxpYnJhcnkgbGlzdCB3aXRoIGEgZ2l2ZW4gY3VzdG9tIGNvbW1hbmQ7IChkb25lKQo+IDMuIGNh
bGwgYSBzZXJ2aWNlIHByb2dyYW0gcHJvY2VkdXJlIHRoYXQgcmV0dXJucyBhIGNoYXIoNikgdmFs
dWUuIChBbmQgaGVyZQo+IEknbSBzdHVjay4pCj4gRGVzcGl0ZSBzZXZlcmFsIGF0dGVtcHRzLCB0
aGUgcHJvY2VkdXJlLCBhc3N1bWluZyBpdCdzIGFjdHVhbGx5IGV4ZWN1dGVkLAo+IGRvZXNuJ3Qg
cHJvZHVjZSBhbnkgcmVzdWx0cy4KPiBUaGlzIGlzIHRoZSBSUEcgcHJvdG90eXBlIG9mIHRoZSBw
cm9jZWR1cmU6Cj4gZGNsLXByIFJ0dlN1cHBsaWVyQ29kZSBDaGFyKDYpIEVYVFBST0MoJ1J0dlN1
cHBsaWVyQ29kZScpOwo+IGNvZE1lYyB6b25lZCg3OjApIGNvbnN0IG9wdGlvbnMoKm9taXQ6Km5v
cGFzcyk7Cj4gdmF0Q29kZSBjaGFyKDE2KSBjb25zdCBvcHRpb25zKCpvbWl0Oipub3Bhc3MpOwo+
IGlkQ29sQ29kZSBwYWNrZWQoMTM6MCkgY29uc3Qgb3B0aW9ucygqb21pdDoqbm9wYXNzKTsKPiBl
bmQtcHI7Cj4gCj4gVGhlIHJldHVybmVkIGNoYXIoNikgZmllbGQgbWF5IGFsc28gYmUgZW1wdHku
Cj4gVGhlIHRocmVlIHBhcmFtZXRlcnMgYXJlIGFsdGVybmF0aXZlOyB0aG9zZSBub3QgcGFzc2Vk
IG11c3QgYmUgbWFya2VkIHdpdGgKPiB0aGUgKk9NSVQgcGxhY2Vob2xkZXIuIFRoZSBwb3NzaWJs
ZSB2YWx1ZXMgZm9yIHRoZSB0ZXN0IGFyZToKPiBjb2RNZWM9c29tZSBudW1iZXJzIG9yIHZhdENv
ZGU9c29tZSBudW1iZXJzIGJ1dCBhcyBhIHN0cmluZyBvcgo+IGlkQ29sQ29kZT1hZ2FpbiBzb21l
IG51bWJlcnMKPiAKPiBOb3JtYWxseSwgdGhlIGNhbGwgaW4gcnBnaWxlIHdvdWxkIGJlCj4gc3Vw
cGxpZXJDb2RlID0gUnR2U3VwcGxpZXJDb2RlKDEyMzY1NDcgOiAqb21pdCA6ICpvbWl0KTsKPiBz
dXBwbGllckNvZGUgPSBSdHZTdXBwbGllckNvZGUgKCpvbWl0IDogJzEyMzQ1Njc4OTAxMjM0NScg
OiAqb21pdCk7Cj4gc3VwcGxpZXJDb2RlID0gUnR2U3VwcGxpZXJDb2RlICgqb21pdCA6ICpvbWl0
IDogMTIzNDUpOwo+IAo+IE5vdyBvbiBteSBjbGFzcyBJdCBqdXN0IGRvZXNuJ3Qgc2VlbSB0byB3
b3JrLgo+IAo+IEhhcyBhbnlvbmUgZXZlciB1c2VkIHRoaXMgY2FsbD8KPiBEb2VzIGFueW9uZSBo
YXZlIGFueSB3b3JraW5nIGNvZGUgZXhhbXBsZXMgSSBjYW4gdHJ5Pwo+IFRoYW5rcyBpbiBhZHZh
bmNlIGZvciB5b3VyIGF0dGVudGlvbi4KPiAtLSAKPiBUaGlzIGlzIHRoZSBKYXZhIFByb2dyYW1t
aW5nIG9uIGFuZCBhcm91bmQgdGhlIElCTSBpIChKQVZBNDAwLUwpIG1haWxpbmcgbGlzdAo+IFRv
IHBvc3QgYSBtZXNzYWdlIGVtYWlsOiBKQVZBNDAwLUxAbGlzdHMubWlkcmFuZ2UuY29tCj4gVG8g
c3Vic2NyaWJlLCB1bnN1YnNjcmliZSwgb3IgY2hhbmdlIGxpc3Qgb3B0aW9ucywKPiB2aXNpdDog
aHR0cHM6Ly9saXN0cy5taWRyYW5nZS5jb20vbWFpbG1hbi9saXN0aW5mby9qYXZhNDAwLWwKPiBv
ciBlbWFpbDogSkFWQTQwMC1MLXJlcXVlc3RAbGlzdHMubWlkcmFuZ2UuY29tCj4gQmVmb3JlIHBv
c3RpbmcsIHBsZWFzZSB0YWtlIGEgbW9tZW50IHRvIHJldmlldyB0aGUgYXJjaGl2ZXMKPiBhdCBo
dHRwczovL2FyY2hpdmUubWlkcmFuZ2UuY29tL2phdmE0MDAtbC4KCi0tIApUaGlzIGlzIHRoZSBK
YXZhIFByb2dyYW1taW5nIG9uIGFuZCBhcm91bmQgdGhlIElCTSBpIChKQVZBNDAwLUwpIG1haWxp
bmcgbGlzdApUbyBwb3N0IGEgbWVzc2FnZSBlbWFpbDogSkFWQTQwMC1MQGxpc3RzLm1pZHJhbmdl
LmNvbQpUbyBzdWJzY3JpYmUsIHVuc3Vic2NyaWJlLCBvciBjaGFuZ2UgbGlzdCBvcHRpb25zLAp2
aXNpdDogaHR0cHM6Ly9saXN0cy5taWRyYW5nZS5jb20vbWFpbG1hbi9saXN0aW5mby9qYXZhNDAw
LWwKb3IgZW1haWw6IEpBVkE0MDAtTC1yZXF1ZXN0QGxpc3RzLm1pZHJhbmdlLmNvbQpCZWZvcmUg
cG9zdGluZywgcGxlYXNlIHRha2UgYSBtb21lbnQgdG8gcmV2aWV3IHRoZSBhcmNoaXZlcwphdCBo
dHRwczovL2FyY2hpdmUubWlkcmFuZ2UuY29tL2phdmE0MDAtbC4K