|
I don't know how this one slipped by me (probably because I've never tried
it), but it appears you can pass a boolean value to a sub procedure that is
declared to receive characters, and it will implicitly convert it to a
string of ones (1) or zeros (0).
h dftactgrp(*no)
d subProc pr
d pStr1 65535a varying value
/free
subProc(*on);
*inlr = *on;
/end-free
p subProc b
d subProc pi
d pStr1 65535a varying value
p e
The above code compiles and executes successfully. Upon execution of
subProc, pStr1 is filled with ones or zeros.
Is this as designed?
Aaron Bartell
http://mowyourlawn.com
As an Amazon Associate we earn from qualifying purchases.
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.