T/TYPE/
T+1 I/   ONEORTWO = 1 .. 2 ;///
T/FUNCTION BITSTOREAL (/ TS/CASE TAG/ R/1 .. 2/ONEORTWO/
TELE