Non-working version of bcd_set_random