substr(digits(datum8), 1, 4) ....