function comprueba() {
  var msg="";
  var nif_cl = document.f1.nif_cl.value;
  var nombre_cl = document.f1.nombre_cl.value;
  var apell_cl = document.f1.apell_cl.value;
  var cp_cl = document.f1.cp_cl.value;
  var dir_cl = document.f1.dir_cl.value;
  var pob_cl = document.f1.pob_cl.value;
  var prov_cl = document.f1.prov_cl.value;
  var tlf_cl = document.f1.tlf_cl.value;
  var movil_cl = document.f1.movil_cl.value;
  var fax_cl = document.f1.fax_cl.value;
  var mail_cl = document.f1.mail_cl.value;
  //var tipo_cl = document.f1.tipo_cl[document.f1.tipo_cl.selectedIndex].value;

  if( nif_cl == "" ) {
    msg += " - NIF \n";
  }

  if( nombre_cl == "" ) {
    msg += " - Nombre \n";
  }

  if( dir_cl == "" ) {
    msg += " - Dirección \n";
  }

  if( pob_cl == "" ) {
    msg += " - Población \n";
  }

  if( prov_cl == "" ) {
    msg += " - Provincia \n";
  }

  if( msg ) {
	alert( "Te ha faltado introducir:\n" + msg );
	return false;
  }

  msg += "NIF:" + nif_cl +
  "\nNombre:" + nombre_cl +
  "\nDirección:" + dir_cl +
  "\nPoblación:" + pob_cl +
  "\nProvincia:" + prov_cl +
  "\nTeléfono:" + tlf_cl;

  if (apell_cl != ""){
    msg += "\nApellidos:" + apell_cl;
  }
  if (cp_cl != ""){
    msg += "\nCódigo Postal:" + cp_cl;
  }
  if (movil_cl != ""){
    msg += "\nTeléfono Móvil:" + movil_cl;
  }
  if (fax_cl != ""){
    msg += "\nFax:" + fax_cl;
  }
  if (mail_cl != ""){
    msg += "\nE-mail:" + mail_cl;
  }
  "\n¿Es esto correcto?";
  return confirm( msg );
}

function pop(link){
  PopUpWindow = window.open(link,'','top=0, width=400, height=300, scrollbars=yes,resizable=yes, toolbar=no');
  PopUpWindow.focus();
}