DSXXXX_DATE
dt->dt_day = bcdtobin(bcd[DSXXXX_DATE] & DSXXXX_DATE_MASK);
bcd[DSXXXX_DATE] = bintobcd(dt->dt_day);