At my company the employment contract limits the company's liability if you're fired for harassment (this was standard at past places too). Executives probably have different contracts than mere rank-and-file employees though, in which case I hope we get a law that forbids companies from paying out "golden parachutes" if they conduct an investigation and find proof of sexual misconduct.