my $sthH = $dbh->prepare("INSERT INTO Disease_types (Adapted_code)
SELECT ('A'+code) FROM Disease_types") or die "Couldn't prepare query: ".$dbh->errstr;
	
	$sthH->execute() or die "Couldn't execute query: ".$sthH->errstr;

##</code><code>##


DBD::ODBC::st execute failed: [Microsoft][ODBC SQL Server Driver][SQL Server]Str
ing or binary data would be truncated. (SQL-22001)
[Microsoft][ODBC SQL Server Driver][SQL Server]The statement has been terminated
. (SQL-01000)(DBD: st_execute/SQLExecute err=-1) at Creating_table.pl line 389
.


##</code><code>##

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/tsqlref/ts_operator_3qov.asp