S390_RT1_YEAR
dt->dt_year = bcdtobin(bcd[S390_RT1_YEAR]) + 2000;
bcd[S390_RT1_YEAR] = bintobcd(dt->dt_year % 100);