Mike,

The layout of a VARY(*YES *INT2) parameter matches the layout of a VARYING field in RPG: length as a binary integer in the first 2 bytes and the value starting in byte 3. Just make sure you only use the parameter as input (if you would try to assign a different, longer value to it, you might overwrite other storage). If you define the entry parameters as PR/PI and define the parameters as CONST, you should have no problems.

Joep Beckeringh


Mike schreef:
I am taking this approach. How do I convert the length into something usable
in RPG? I see examples in CL, but nothing for RPG.

On 6/19/07, qsrvbas@xxxxxxxxxxxx <qsrvbas@xxxxxxxxxxxx> wrote:
Anyway, consider VARY(*YES *INT2) on your command definition and perhaps
[32767A VARYING] fields in your program. I don't think I've done this
with a *ENTRY PLIST, but I'd expect it to work with little effort.




As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.