On Tue, 2 Aug 2022 07:43:17 -0500, Dale R. Smith wrote: >On Tue, 2 Aug 2022 06:50:10 -0500, Lionel B. Dyck wrote: >> >>If substr(x2b(c2x(flag1)),6,1) = 1 then say 'got it' >> Some say "= 1" is superfluous, pleonasm. However:
o Others say it adds clarity. o Others insist on maintaining the notional distinction between boolean and other types. >Assuming flag1 is a one byte field: >If BitAnd(flag1,'40'x) == '40 × Then Say 'got it' > >Make sure you use exactly equal (==) especially when testing for hex 40! > I'm more comfortable with "\== '00'x", especially when emulating TM. -- gil ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN