Re: Trying to get data area content with QWCRDTAA

Chris Hird <chrish-lbwoW8fqX/[email protected]> Fri, 5 Sep 2025 16:05:21 +0000
Newsgroups gmane.comp.lang.as400.c
Message-ID <YQBPR01MB106574EBDC6D6C19DE58D8418BF03A@YQBPR01MB10657.CANPRD01.PROD.OUTLOOK.COM>
SGVyZSBpcyBzb21lIHNhbXBsZSBjb2RlIEkgdXNlZCB0byB0ZXN0IGJlZm9yZQ0KDQojaW5jbHVk
ZSA8c3RkaW8uaD4NCiNpbmNsdWRlIDxzdGRsaWIuaD4NCiNpbmNsdWRlIDxzdHJpbmcuaD4NCiNp
bmNsdWRlIDxxdXNlYy5oPg0KI2luY2x1ZGUgPGRlY2ltYWwuaD4NCiNpbmNsdWRlIDxxd2NyZHRh
YS5oPg0KDQoNCnR5cGVkZWYgX1BhY2tlZCBzdHJ1Y3QgREFfY29udGVudF94IHsNCiAgICAgICAg
ICAgICAgICAgICAgICAgUXdjX1JkdGFhX0RhdGFfUmV0dXJuZWRfdCBoZHI7DQogICAgICAgICAg
ICAgICAgICAgICAgIGNoYXIgZGF0YVs4MTkyXTsNCiAgICAgICAgICAgICAgICAgICAgICAgfSBE
QV9jb250ZW50X3Q7DQoNCmludCBtYWluKGludCBhcmdjLCBjaGFyICoqYXJndikgew0KaW50IGJ5
dGVzID0gMDsgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgLy8g
Ynl0ZXMgdG8gcmVhZA0KREFfY29udGVudF90IER0YV9Db250ZW50OyAgICAgICAgICAgICAgICAg
ICAgICAgICAgICAgICAgICAgLy8gZGF0YSBhcmVhIGNvbnRlbnQNCmNoYXIgdGVzdF9idWZbODE5
Ml07ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIC8vIFRFU1QgQlVGRkVS
DQpjaGFyICp0bXA7ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg
ICAgICAvLyB0ZW1wIHB0cg0KUXdjX1JkdGFhX0RhdGFfUmV0dXJuZWRfdCAqcHRyOyAgICAgICAg
ICAgICAgICAgICAgICAgICAgICAgLy8gYnVmZmVyIHB0cg0KUXVzX0VDX3QgRXJyb3JfQ29kZSA9
IHswfTsgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgLy8gZXJyb3IgY29kZSBzdHJ1
Y3QNCg0KRXJyb3JfQ29kZS5CeXRlc19Qcm92aWRlZCA9IHNpemVvZihFcnJvcl9Db2RlKTsNCmJ5
dGVzID0gKihpbnQgKilhcmd2WzJdOw0KcHJpbnRmKCJieXRlcyAlZFxuIixieXRlcyk7DQpRV0NS
RFRBQSh0ZXN0X2J1ZiwNCiAgICAgICAgIDgxOTIsDQogICAgICAgICBhcmd2WzFdLA0KICAgICAg
ICAgMSwNCiAgICAgICAgIGJ5dGVzLA0KICAgICAgICAgJkVycm9yX0NvZGUpOw0KaWYoRXJyb3Jf
Q29kZS5CeXRlc19BdmFpbGFibGUgPiAwKSB7DQogICAvLyBkbyBzb21ldGhpbmcgYWJvdXQgdGhl
IGVycm9yDQogICBwcmludGYoIkVycm9yIHJlY2VpdmVkICUuN3NcbiIsRXJyb3JfQ29kZS5FeGNl
cHRpb25fSWQpOw0KICAgcmV0dXJuIC0xOw0KICAgfQ0KcHRyID0gKFF3Y19SZHRhYV9EYXRhX1Jl
dHVybmVkX3QgKil0ZXN0X2J1ZjsNCnByaW50ZigiQXZhaWxhYmxlID0gJWRcbiIscHRyLT5CeXRl
c19BdmFpbGFibGUpOw0KcHJpbnRmKCJSZXR1cm5lZCA9ICVkXG4iLHB0ci0+Qnl0ZXNfUmV0dXJu
ZWQpOw0KcHJpbnRmKCJUeXBlID0gJS4xMHNcbiIscHRyLT5UeXBlX1ZhbHVlX1JldHVybmVkKTsN
CnByaW50ZigiTGVuZ3RoID0gJS4xMHNcbiIscHRyLT5MZW5ndGhfVmFsdWVfUmV0dXJuZWQpOw0K
cHJpbnRmKCJEZWNpbWFsIHBvcyA9ICVkXG4iLHB0ci0+TnVtYmVyX0RlY2ltYWxfUG9zaXRpb25z
KTsNCnRtcCA9IHRlc3RfYnVmOw0KdG1wICs9IHNpemVvZihfUGFja2VkIHN0cnVjdCBRd2NfUmR0
YWFfRGF0YV9SZXR1cm5lZCk7DQptZW1zZXQoJnRtcFtieXRlc10sJ1wwJywxKTsNCnByaW50Zigi
Q29udGVudCA9ICVzXG4iLHRtcCk7DQpyZXR1cm4gMTsNCn0NCg0KDQpDaHJpcyBIaXJkDQpEaXJl
Y3RvciBhdCBTaGllbGQgQWR2YW5jZWQgU29sdXRpb25zIEx0ZC4NCg0KUGhvbmU6IDUxOS05NDAt
MTE5MiDCoA0KTW9iaWxlOiA2NDctMjM0LTY1MzkNCkVtYWlsOiBjaHJpc2hAc2hpZWxkYWR2YW5j
ZWQuY29tDQoNCjc1IEZpcnN0IFN0cmVldCBTdWl0ZSAyMDYNCk9yYW5nZXZpbGxlLCBPTiBMOVcg
NUI2DQoNCmh0dHBzOi8vd3d3LnNoaWVsZGFkdmFuY2VkLmNvbQ0KDQoNCg0KDQoNCi0tLS0tT3Jp
Z2luYWwgTWVzc2FnZS0tLS0tDQpGcm9tOiBDNDAwLUwgPGM0MDAtbC1ib3VuY2VzQGxpc3RzLm1p
ZHJhbmdlLmNvbT4gT24gQmVoYWxmIE9mIFBhdHJpayBTY2hpbmRsZXINClNlbnQ6IFNlcHRlbWJl
ciA1LCAyMDI1IDc6MjkgQU0NClRvOiBCYXJlIE1ldGFsIFByb2dyYW1taW5nIElCTSBpIChBUy80
MDAgYW5kIGlTZXJpZXMpIDxjNDAwLWxAbGlzdHMubWlkcmFuZ2UuY29tPg0KU3ViamVjdDogW0M0
MDAtTF0gVHJ5aW5nIHRvIGdldCBkYXRhIGFyZWEgY29udGVudCB3aXRoIFFXQ1JEVEFBDQoNCkhl
bGxvLA0KDQpJJ20gdHJ5aW5nIHRvIHJldHJpZXZlIHRoZSBjb250ZW50IG9mIGEgZGF0YSBhcmVh
IHdpdGggdGhlIFFXQ1JEVEFBIEFQSS4gSXQncyBtZWFudCB0byBjb250YWluIGEgaHR0cCBwcm94
eSBVUkkgc3RyaW5nIGZvciBub24tUEFTRSBhcHBsaWNhdGlvbnMuIEkndmUgY3JlYXRlZCBpdCBs
aWtlIHRoaXM6DQoNCmNydGR0YWFyYSBkdGFhcmEocXVzcnN5cy9odHRwcHJveHkpIHR5cGUoKmNo
YXIpIGxlbigzMikgdmFsdWUoJ2h0dHA6Ly9sZWVsYS5wb2NuZXQubmV0OjMxMjgnKSBhdXQoKnVz
ZSkNCg0KDQpUaGlzIGlzIHRoZSBkb2N1bWVudGF0aW9uIEkgd2FzIHVzaW5nOg0KDQpodHRwczov
L3d3dy5pYm0uY29tL2RvY3MvZW4vaS83LjQuMD90b3BpYz1zc3dfaWJtX2lfNzQvYXBpcy9xd2Ny
ZHRhYS5odG1sDQoNCg0KSSdtIGNvbXBpbGluZyBpdCB3aXRoIHRoZSBkZWZhdWx0cy4gUERNIG9w
dGlvbiAxNCwgcGx1cyBvdXRwdXQoKnByaW50KSBkYmd2aWV3KCphbGwpLg0KDQpXaGVuIHJ1bm5p
bmcgdGhlIHByb2dyYW0gaW4gcXVlc3Rpb24sIEknbSBnZXR0aW5nIGJhY2sgZ2FyYmFnZSwgc3Vj
aCBhczoNCg0KKnJlY2VpdmVyOmMgNTAgPSAnICAgw6AgICAgKkNIQVIgICAgIFFVU1JTWVMgICAg
ICAgw5ggICAgICAgw5TCvMK3dcK0ICDDuH4gJw0KDQowMDAwMCAgICAgMDAwMDAwNDQgMDAwMDAw
MjAgNUNDM0M4QzEgRDk0MDQwNDAgICAtIC4uLsOgLi4uLipDSEFSICAgDQowMDAxMCAgICAgNDA0
MEQ4RTQgRTJEOUUyRTggRTI0MDQwNDAgMDAwMDAwMjAgICAtICAgUVVTUlNZUyAgIC4uLi4NCjAw
MDIwICAgICA4MDAwMDAwMCAwMDAwMDAwMCBFQkI3QjNBNCBCRTAwMTA3MCAgIC0gw5guLi4uLi4u
w5TCvMK3dcK0Li7DuA0KMDAwMzAgICAgIEExMDAuLi4uIC4uLi4uLi4uIC4uLi4uLi4uIC4uLi4u
Li4uICAgLSDDny4uLi4uLi4uLi4uLi4uLg0KDQpUaGlzIGNoYW5nZXMgYmV0d2VlbiBwcm9ncmFt
IGNhbGxzLg0KDQplcnJvcl9jb2RlLmVjX2ZpZWxkcy5FeGNlcHRpb25fSWQgYW5kIGVycm9yX2Nv
ZGUuZXhjZXB0aW9uZGF0YSBpcyBqdXN0IGJsYW5rcy4NCg0KSSB1bmRlcnN0YW5kIHRoYXQgdGhl
IHJlY2VpdmVyIHZhcmlhYmxlIChleHBlY3RlZCB0byBiZSBhIHN0cmluZykgaXMgcmVhbGx5IGEg
c3RydWN0LiBTbywgcGFydCBvZiB0aGUgcmVzdWx0IEknbSBnZXR0aW5nIGJhY2sgbG9va3MgYWN0
dWFsbHkgdmFsaWQuIEJ1dCBJIGZhaWwgdG8gdW5kZXJzdGFuZCB3aHkgdGhlIHByb3h5IFVSTCBp
c24ndCBjb3BpZWQgaW50byB0aGUgcmVjZWl2ZXIgdmFyaWFibGUuDQoNCkhlbHAgYW5kIGhpbnRz
IGFyZSB2ZXJ5IGFwcHJlY2lhdGVkIQ0KDQoNCllvdSBjYW4gZmluZCB0aGUgYWN0dWFsIGNvZGUg
SSdtIHRyeWluZyBoZXJlOg0KDQpodHRwczovL2xlZWxhLnBvY25ldC5uZXQvfnBvYy9nZXRwcm94
eS5jDQoNCkJlc2lkZXMgdGhlIGRhdGEgYXJlYSBzaG93biBhdCB0aGlzIG1lc3NhZ2UncyB0b3As
IHRoZXJlIGlzIG5vIGV4dGVybmFsIGRlcGVuZGVuY3kuDQoNCk5vdGUgdGhlcmUgaXMgYSBsb3Qg
b2YgdW51c2VkL2NvbW1lbnRlZCBjb2RlLCBhbmQgZnVuY3Rpb25zIG5vdCBiZWluZyBmaW5hbGx5
IGNhcnZlZCBvdXQsIHlldC4gQWxzbywgdGhlcmUgbWlnaHQgYmUgb2ZmLWJ5LW9uZSBlcnJvcnMg
aW4gZmllbGQgbGVuZ3RocyBmb3IgdGhlIGFkZGl0aW9uYWwgdGVybWluYXRpbmcgemVybyBieXRl
LiBXaWxsIGZpeCB0aGF0IHdoZW4gSSBldmVudHVhbGx5IHNlZSB0aGUgcHJveHkgVVJJIGluIHRo
ZSBkZWJ1Z2dlci4NCg0KOndxISBQb0MNCg0KLS0NClRoaXMgaXMgdGhlIEJhcmUgTWV0YWwgUHJv
Z3JhbW1pbmcgSUJNIGkgKEFTLzQwMCBhbmQgaVNlcmllcykgKEM0MDAtTCkgbWFpbGluZyBsaXN0
IFRvIHBvc3QgYSBtZXNzYWdlIGVtYWlsOiBDNDAwLUxAbGlzdHMubWlkcmFuZ2UuY29tIFRvIHN1
YnNjcmliZSwgdW5zdWJzY3JpYmUsIG9yIGNoYW5nZSBsaXN0IG9wdGlvbnMsDQp2aXNpdDogaHR0
cHM6Ly9saXN0cy5taWRyYW5nZS5jb20vbWFpbG1hbi9saXN0aW5mby9jNDAwLWwNCm9yIGVtYWls
OiBDNDAwLUwtcmVxdWVzdEBsaXN0cy5taWRyYW5nZS5jb20gQmVmb3JlIHBvc3RpbmcsIHBsZWFz
ZSB0YWtlIGEgbW9tZW50IHRvIHJldmlldyB0aGUgYXJjaGl2ZXMgYXQgaHR0cHM6Ly9hcmNoaXZl
Lm1pZHJhbmdlLmNvbS9jNDAwLWwuDQotLSAKVGhpcyBpcyB0aGUgQmFyZSBNZXRhbCBQcm9ncmFt
bWluZyBJQk0gaSAoQVMvNDAwIGFuZCBpU2VyaWVzKSAoQzQwMC1MKSBtYWlsaW5nIGxpc3QKVG8g
cG9zdCBhIG1lc3NhZ2UgZW1haWw6IEM0MDAtTEBsaXN0cy5taWRyYW5nZS5jb20KVG8gc3Vic2Ny
aWJlLCB1bnN1YnNjcmliZSwgb3IgY2hhbmdlIGxpc3Qgb3B0aW9ucywKdmlzaXQ6IGh0dHBzOi8v
bGlzdHMubWlkcmFuZ2UuY29tL21haWxtYW4vbGlzdGluZm8vYzQwMC1sCm9yIGVtYWlsOiBDNDAw
LUwtcmVxdWVzdEBsaXN0cy5taWRyYW5nZS5jb20KQmVmb3JlIHBvc3RpbmcsIHBsZWFzZSB0YWtl
IGEgbW9tZW50IHRvIHJldmlldyB0aGUgYXJjaGl2ZXMKYXQgaHR0cHM6Ly9hcmNoaXZlLm1pZHJh
bmdlLmNvbS9jNDAwLWwuCg==