Convert from Hex to Binary....

Hi,

I receive some data from a industrial I/O box (Beckhoff BK9000) thru
Modbus protocol over TCP/IP in my socket client program (thanks Scott :)

One byte is the status of 8 input registres and is received in Hex from
x'00' to  x'FF'.

I need to change this value into a binary string.

An example.... I receive the value x'80' which should be converted to
'1000 0000' and end up in a data structure with 8 fields.

I've Googled around, but could only find the thing I want, doing it with
REXX and the function   X2B('C3')        ->  '11000011'

I want to do this inside my program.... any help out there ???

Best regards,
Leif