It is possible to test, set, reset, and shift bits in COBOL by using the LE subroutines: http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/CEEA31B0/2.3
On Tue, Feb 25, 2014 at 2:11 PM, John Gilmore <jwgli...@gmail.com> wrote: > I think Ron Thomas has in mind the fact that Enterprise COBOL does not > [yet] support analogues of such PL/I constructions as > > declare byte aligned bit(8) based(bytep) ; > > declare bits8(8) bit based(bits8p) ; > > which provide immediate programmatic access to the individual bits in > a byte. They can be tested and set directly in PL/I and not in COBOL. > > Still, he can look at them in hex under ISPF and the like. > > If Ron really needs a PL/I declaratiuon for this record, I can provide > him with one as fast as I can type it out given the COBOL version. > > John Gilmore, Ashland, MA 01721 - USA > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > -- Wasn't there something about a PASCAL programmer knowing the value of everything and the Wirth of nothing? Maranatha! <>< John McKown ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN