Re: Retrieve variable value
Gene_Gaunt-GDFlLPZ4eRKEK/[email protected]
| Newsgroups | gmane.comp.lang.as400.mi |
|---|---|
| Message-ID | <[email protected]> |
>> It doesn't work to base a variable on a data pointer. >> You base the variable in PROGRAM-B on a space pointer, >> as usual, and then set that space pointer to the data >> pointer's value: >> >> SetSppFp Space-Pointer, Data-Pointer; True but even simpler use the resolved data pointer variable in operand 2 in a CPY*** instruction for example: dcl dtaptr MyDtaPtr; dcl dd Packed92 pkd(9,2); rslvdp MyDtaPtr, "MY_PKD92_VARIABLE_NAME", ProgramA; cpynv Packed92, MyDtaPtr; _______________________________________________ This is the MI Programming on the AS400 / iSeries (MI400) mailing list To post a message email: MI400-Zwy7GipZuJhWk0Htik3J/[email protected] To subscribe, unsubscribe, or change list options, visit: http://lists.midrange.com/mailman/listinfo/mi400 or email: MI400-request-Zwy7GipZuJhWk0Htik3J/[email protected] Before posting, please take a moment to review the archives at http://archive.midrange.com/mi400.