Попробуй брать код каждого символа через ASC().
Потом прогонять его через n_cst_numerical.of_binary(Long)

Открой эту функцию, скопируй код, напиши свою.

Он вылядит так. Decimal al_decimal - входной аргумент

integer li_remainder
string ls_binary=''

//Check parameters
If IsNull(al_decimal) or al_decimal< 0 Then
string ls_null
SetNull(ls_null)
Return ls_null
End If

If al_decimal = 0 Then
Return '0'
End If

Do Until al_decimal= 0
li_remainder = mod(al_decimal, 2)
al_decimal = al_decimal /2

//Build binary string
ls_binary = string(li_remainder) + ls_binary
Loop
Return ls_binary