Re: How would you do this?

Bill Klein wrote:
to: comp.lang.cobol *and* IBM-MAIN

IBM has (relatively) recently created an LE callable service, CEE3INF,
that returns a "32-bit map" with information about what environment a program
is running in. See:

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/CEEA3170/2.2.
5.9

Now, my question is how various "experienced" COBOL programmers would
handle such information (either in an IBM mainframe environment OR in other
COBOL environments for those who see this note and don't work in IBM mainframe

environments - but do get "bit maps")

1) Call a non-COBOL program to decode this map (e.g.. Assembler, C, PL/I
or any other language that can easily handle "bits")

2) Do a "division" loop to figure out which bits are turned on?

3) Use 88-levels with hex literals to check for which bits were turned
on?

4) Use the LE (or comparable) "bit manipulation" routines?

5) Not use CEE3INF from COBOL?

6) Other?


Definitely number 3.

Probably break the word into individual bytes and
set up level 88's for the bits I cared about. Maybe
like this:

01 langs.
02 tier-1 pic x.
88 c-lang value x'80'.
88 cobol-lang value x'04'.
88 fortran-lang value x'01'.
88 c-and-cobol value x'84'.
88 c-and-fortran value x'81'.
88 c-and-cobol-and-fortran value x'85'.
88 cobol-and-fortran value x'05'.
02 tier-2 pic x.
88 pli-lang value x'20'.
88 enterprise-pli-lang value x'10'.
88 all-pli value x'30'.
02 pic xx.

Note: have not tested since have not been on a
z/OS 1.8 system yet.

Kind regards,

-Steve Comstock

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to listserv@xxxxxxxxxxx with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
.

Relevant Pages

  • Re: How would you do this?
    ... IBM has recently created an LE callable service, CEE3INF, ... returns a "32-bit map" with information about what environment a program ... my question is how various "experienced" COBOL programmers would ... Call a non-COBOL program to decode this map (e.g.. ...
    (bit.listserv.ibm-main)
  • How would you do this?
    ... IBM has recently created an LE callable service, CEE3INF, ... returns a "32-bit map" with information about what environment a program ... my question is how various "experienced" COBOL programmers would ... Call a non-COBOL program to decode this map (e.g.. ...
    (bit.listserv.ibm-main)
  • How would you do this?
    ... my question is how various "experienced" COBOL programmers would handle ... such information (either in an IBM mainframe environment OR in other COBOL ... Call a non-COBOL program to decode this map (e.g.. ...
    (comp.lang.cobol)
  • Re: How would you do this?
    ... Standard and IBM hasn't implemented USAGE BINARY-CHAR or any other BINARY-xxx ... The best way to do this in Enterprise COBOL is to say ... returns a "32-bit map" with information about what environment a program is ... Use the LE "bit manipulation" routines? ...
    (comp.lang.cobol)
  • Re: hello?
    ... of the brain's representation of the physical act. ... map that counts and indeed is all we have. ... internal "map" of the environment. ... chain of internal behaviors. ...
    (comp.ai.philosophy)