Procedure Modules › Interpreting Bit Settings (CULLUS35) › Helpful Hints

Helpful Hints

CULLUS35 displays bit settings by listing the positions of the ON bits.

For example, the bit settings shown below are represented by the display 01,03,04,05.

1st Bit  2nd Bit  3rd Bit  4th Bit  5th Bit  6th Bit  7th Bit  8th Bit
(00)     (01)     (02)     (03)     (04)     (05)     (06)     (07)
OFF      ON       OFF      ON       ON       ON       OFF      OFF

Example

This example interprets the bit settings of an asterisk (*).

The following code:

• Defines 23-byte alphanumeric work fields (RESULT0, RESULT1) to receive the bit settings
• Defines a work field (FIELD) to contain the hexadecimal value X'F8'
• Issues calls to CULLUS35 from type 7 logic to interpret the bit settings in each bit-count format

   IN 80 F 80
   REC ASTERISK 1  1
   020 RESULT0 '                      '
   020 RESULT1 '                      '
   020 FIELD X'F8' 
   023CULLUS35
   0251*005 FIELD    HH 'FIELD'
   0251*010 RESULT0  HH 'BINARY REPRESENTATION' 'USING BINARY COUNT 0'
   0251*015 RESULT1  HH 'BINARY REPRESENTATION' 'USING BINARY COUNT 1'
   027010 CALL US35 (FIELD 1 RESULT0 2 0) 
   027020 CALL US35 (FIELD 1 RESULT1 2 0 1)
  

REPORT NO. 02             CULLUS35      mm/dd/yy PAGE     1
         BINARY REPRESENTATION    BINARY REPRESENTATION
 FIELD    USING BINARY COUNT 0     USING BINARY COUNT 1

   8    00,01,02,03,04           01,02,03,04,05