registar fecha y hora de 2 tablas ala vez

[sabao]

Hola tengo una base de datos de equipos informatico lo que necesito es guarda en en la tabla historial todo los sucesso del equipo , creacion , modificacion.




tabla equipo

id_equipo automerico primary key
fecha datetime
mac varchar
cpu
.. etc

tabla historial_equipo

id_historial autonumerico primary key
fecha datetime
suceso varchar
diagnostico varchar
id_equipo int foreign key

tengo un formulario que ingresar los datos del pc
quiero que la mismo tiempo en la tabla historial _equipo , se agrege la fecha de creacion

hice un procedimento

Código:

create proc ingresa_equipo
@fecha datetime
,@nombre varchar (50)
,@ip varchar (15)
,@mac varchar (17)
,@cpu varchar(50)
,@memoria varchar(50)
,@disco varchar(50)
,@placa varchar(50)
,@optico varchar(50)
,@red varchar(50)
,@video varchar(50)
,@monitor varchar(50)
,@teclado varchar(50)
,@mouse varchar(50)
 as begin
select @fecha=getdate()
from equipos
end
begin
 insert into equipos
(fecha,nombre,ip,mac,cpu,memoria,disco,placa,u_optica,red,video,monitor,teclado,mouse)
values (@fecha,@nombre,@ip,@mac,@cpu,@memoria,@disco,@placa,@optico,@red,@video,
@monitor,@teclado,@mouse )
end
begin
declare @id_equipo int
select @id_equipo=equipos.id_equipo
from equipos,historial_equipo
where equipos.id_equipo=historial_equipo.id_equipo 
end
begin
insert into historial_equipo(id_equipo,fecha)
values(@id_equipo,@fecha)
end

solo me guarda los datos en la tabla equipo y no en el historial_equipos
me gustaria que me dieran una mano para arreilar este procedimento :)