× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



When I get the program activation list using MATAGPAT on V5R1, and the size
provided (pos 1-4) is less than the size available (pos 5-8), then MATAGPAT
destroys my operand 1 space pointer to the receiver template.

dcl dd     Receiver   auto char(64) bdry(16);
dcl dd     *          def(Receiver) pos(1) bin(64);
dcl spcptr ?Receiver  auto init(Receiver);

matagpat ?Receiver, GroupMark, X"02";

/* ?Receiver is now null */




dcl dd     Receiver   auto char(8192) bdry(16);
dcl dd     *          def(Receiver) pos(1) bin(8192)
dcl spcptr ?Receiver  auto init(Receiver);

matagpat ?Receiver, GroupMark, X"02";

/* ?Receiver remains okay */




As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:

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.