// montant : montant de l'achat
	// locabien : localisation du bien ->
	//				france
	//				la reunion
	//				guadeloupe/martinique
	//				guyane
	// typebien : logement neuf ou logement ancien
	// nblog : nombre de logement si logement neuf
	// frais : tableau contenant les frais en fct(locabien,typebien) ->
	//				TVA
	//				MAJORATION
	//				EMOLUMENT_FORMALITE
	//				Taxe de publicité foncière
	//				Salaire du conservateur
	//				Droit départemental d'enregistrement
	//				Taxe communale
	//				frais d'assiette
	//				Droit au profit de l'Etat
	// taux_base_emolument : serie S1 pour emolument notaire
	// coeff_taux_neuf : coeff a utiliser sur taux_base_emolument pour le neuf et en fonction du nb. de logement
	// frais, taux_base_emolument, coeff_taux_neuf en variable globale
	function calcul_frais_notaire(montant,locabien,typebien,nblog)
	{
		emolument_notaire_ht		= 0;
		emolument_notaire_tva		= 0;
		emolument_notaire_maj		= 0;
		emolument_notaire_ttc		= 0;
		droits_taxes		  		= 0;
		emolument_formalite			= 0;
		total						= 0;
		
		key_mem 	= 0;
		coeff		= (typebien=='NEUF')?eval('coeff_taux_neuf['+nblog+']'):1;
		i=0;
		while((taux=taux_base_emolument[i]) != null)
		{
			if(montant>taux[0])
			{
				calcul = (taux[0] - key_mem) * ((taux[1] * coeff)/ 100);
				emolument_notaire_ht += calcul;
				key_mem = taux[0];
			}
			else
			{
				calcul = (montant - key_mem) * ((taux[1] * coeff) / 100);
				emolument_notaire_ht 	+= calcul;
				break;
			}
			i++;
		}
		i=0;
		while(eval('(fr=frais["'+locabien+'"]["'+typebien+'"]["DT"]['+i+']) != null'))
		{
			if(fr)
			{
				cal = montant * (fr /100);
				droits_taxes += cal;
			}
			i++;
		}
		emolument_notaire_maj = eval('emolument_notaire_ht * (frais["'+locabien+'"]["'+typebien+'"]["MAJORATION"] / 100)');
		emolument_notaire_tva = eval('(emolument_notaire_ht + emolument_notaire_maj) * (frais["'+locabien+'"]["'+typebien+'"]["TVA"] / 100)');
		emolument_notaire_ttc = emolument_notaire_tva + emolument_notaire_maj + emolument_notaire_ht;
		emolument_formalite = eval('frais["'+locabien+'"]["'+typebien+'"]["EMOLUMENT_FORMALITE"]');
		total = emolument_formalite + emolument_notaire_ttc + droits_taxes;
		return total;
	}