$dbs_result->{LongReadLen} = 255;	# Anzahl Zeichen, die aus einem Memo-Feld eingelesen werden sollen; Default = 80; muss ein ungerader Wert sein
$dbs_result->{LongTruncOk} = 1;		# abschneiden nach {LongReadLen} Zeichen, sonst Error wenn Anzahl Zeichen > {LongReadLen}