× 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.



I could be wrong here (no, it's happened before, really), but isn't *ON nothing more than a '1'?

* Jerry C. Adams
*IBM System i Programmer/Analyst
B&W Wholesale Distributors, Inc.* *
voice
615.995.7024
fax
615.995.1201
email
jerry@xxxxxxxxxxxxxxx <mailto:jerry@xxxxxxxxxxxxxxx>



Aaron Bartell wrote:
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 thread ...

Follow-Ups:
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.