DTR> DECLARE OP1 PIC 99999999 LONG .;
       DTR> DECLARE OP2 PIC 99999999 LONG .;
       DTR> OP1 = 128+64+32 ;
       DTR> OP2 = 32+8+4+1 ;
       DTR> PRINT FN$BIT_AND(OP1,OP2);

         FN$BIT
          AND

                32

       DTR>