[Bug 8047] BOM: DateSerial (VB function) gives 19xx for 2 digit years, but should provide 20xx for years below 30