Try the following:
Use Lely;
GO
Set Identity_Insert dbo.HemTransfer ON;
go
Insert into dbo.HemTransfer (TraTrtId,TraAniId,TraDate)
Select 2, HemAnimal.AniId, HemAnimal.AniBirthday from HemAnimal Where HemAnimal.AniUserNumber = 123456;
go
Set Identity_Insert dbo.HemTransfer OFF;
go