<%iddetprod=request.QueryString("iddetprod")
if iddetprod="" then
response.Redirect("fusion.asp")
end if
set ObjDetpro=new TBDetpro
sControl = ObjDetpro.opentabla
ObjDetpro.BuscaxIdDetPro(iddetprod)
if ObjDetpro.existeregistro then
ObjDetpro.asignacampos
else
response.Redirect("fusion.asp")
end if
%>
