apdoc = "Apdo. Correos: "

function nombre_apdo (){
	if (tdd[4]=="Reino Unido" || tdd[4]=="Estados Unidos") apdoc = "PO. Box: "
	if (tdd[4]=="Alemania" || tdd[4]=="Austria") apdoc = "Postfach: "
	if (tdd[4]=="Italia") apdoc = "Casella Postale: "
	}

texto_formateado = ""
comentarios = ""
COM=[]
COMA=[]

//DP =  ""
//CIU= ""
cambia=/\s+/g
function formatea_texto() {
	aten=0

empre=tdd[0]
empre=empre.toUpperCase()
//	texto_formateado="<div class='empresa' style='float:left;clear:both'>"+tdd[0]+"<\/div><div class='' style='float:left;clear:both'>"
	texto_formateado="<span class='empresa' >"+tdd[0].toUpperCase()+"<\/span>"

	if (tdd[5] != "") {	// si hay apartado...
		if (tdd[1] == "") {	// y no hay direccion...
			DP = tdd[2] + tdd[6]
			CIU= tdd[3] + tdd[7]
			
		if (DP != "" && CIU != "") {
			DPCIU = DP + "&nbsp;" + CIU
			} else {
			DPCIU = DP + CIU
			}
		if (DPCIU != "") {
			APTDO = apdoc + tdd[5] + ". " + DPCIU
			} else {
			APTDO = apdoc + tdd[5]			
			}
		if (tdd[4] != "") {
			texto_formateado += APTDO + ". " + tdd[4] + "<br>"
			} else {
//			texto_formateado += APTDO + "<br>"		
			texto_formateado += APTDO	
			}
//----------------------------------------------------------------------------------------------------------------------------
		} else {	// con apartado y direccion...
		if (tdd[2] != "" && tdd[6] != ""){	// si hay dos apartados, cada uno el suyo
			DPD=tdd[2]
			DPA=tdd[6]
			} else if (tdd[2] != ""){ // si solo esta el primero, se igualan
			DPD=tdd[2]
			DPA=tdd[2]
			} else if (tdd[6] != ""){ // si solo esta el segundo, se igualan tambien
			DPD=tdd[6]
			DPA=tdd[6]
			} else {	// si no hay ninguno, avisa
			DPD=tdd[2]
			DPA=tdd[6]
			}
// ----------- silimar con las ciudades 
			if (tdd[3] != "" && tdd[7] != ""){	// si hay dos ciudades, cada uno la suya
				CID=tdd[3]
				CIA=tdd[7]
				} else if (tdd[3] != ""){ // si solo esta la primera, se igualan
				CID=tdd[3]
				CIA=tdd[3]
				} else if (tdd[7] != ""){ // si solo esta la segunda, se igualan tambien
				CID=tdd[7]
				CIA=tdd[7]
				} else {	// si no hay ninguna, avisa
				CID=tdd[3]
				CIA=tdd[7]
				}
			if (DPD != "" && CID !="") {	// si hay distrito y ciudad para la direccion...
				DPCIUD = DPD + "&nbsp;" + CID
				} else { // si falta alguno no pone espacio
				DPCIUD = DPD + CID
				}
			if (DPA != "" && CIA !="") {	// si hay distrito y ciudad para el apartado...
				DPCIUA = DPA + "&nbsp;" + CIA
				} else { // si falta alguno no pone espacio
				DPCIUA = DPA + CIA
				}
			if (DPCIUD == DPCIUA) {	// si son iguales...
				if (DPCIUD != "") {	// y no esta vacio lo pone todo junto con punto. Igual esta condicion es redundante.
					 // y solo pone un conjunto distrito ciudad al final
					BDA = tdd[1] + ". " + apdoc + tdd[5] + ". " + DPCIUD	// Bloque Direccion Apartado
					} else { // si esta vacio, no pone punto
					BDA = tdd[1] + ". " + apdoc +  tdd[5]						
					}
				} else { // si son diferentes, cada uno con el suyo
				if (DPCIUD != "") {	// si no esta vacio lo pone con punto
					BD = tdd[1] + ". "  + DPCIUD	// Bloque Direccion
					} else {	// si esta vacio sin punto
					BD = tdd[1]	// Bloque Direccion
					}
				if (DPCIUA != "") {	// si no esta vacio lo pone con punto
					BA = apdoc +  tdd[5] + ". "  + DPCIUA	// Bloque Apartado
					} else {	// si esta vacio sin punto
					BA = apdoc +  tdd[5]	// Bloque Apartado
					}
				BDA = BD + ". " + BA
				}
			if (tdd[4] != ""){	// si hay pais...
				texto_formateado += BDA + ".&nbsp;" + tdd[4] + "<br>"
				} else { // si no hay pais, no pone punto
//				texto_formateado += BDA + "<br>"					
				texto_formateado += BDA					
				}
			}
		} else {	// si no hay apartado...
		if (tdd[1] != "" ){	// y hay direccion
			if (tdd[2] != "" && tdd[3] != ""){
				DPCIU = tdd[2] + "&nbsp;" + tdd[3]
				} else if (tdd[2] != "" || tdd[3] != "") {		// si el distrito o la ciudad no estan vacios no deja espacio
				DPCIU = tdd[2] + tdd[3]
				} else {	// si estan los dos vacios
				BD = tdd[1]
				DPCIU = ""
				}
			if (DPCIU != "") {
				BD = tdd[1] + ". " + DPCIU
				}
			if (tdd[4] != ""){	// si hay pais...
				texto_formateado += BD + ".&nbsp;" + tdd[4] + "<br>"
				} else { // si no hay pais, no pone punto
				texto_formateado += BD					
//				texto_formateado += BD + "<br>"					
				}
			} else {	// si no hay ni apartado ni direccion
//			restaura valores por si ha habido modificaciones previas
//			comienza formateo
			if (tdd[2] != "" && tdd[3] != "") {
				DPCIU = tdd[2] + "&nbsp;" + tdd[3]	// con espacio
				} else if (tdd[2] != "" || tdd[3] != "") {
				DPCIU = tdd[2] + tdd[3]	// sin espacio
				} else {
				DPCIU = ""				
				}
			if (DPCIU != ""){	// si hay distrito o direccion...
				if (tdd[4] != "") { // y hay pais
					texto_formateado += DPCIU + ".&nbsp;" + tdd[4]	+ "<br>"											
					} else {
					texto_formateado += DPCIU																	
//					texto_formateado += DPCIU + "<br>"																		
					}
				} else {	// si no hay distrito ni direccion pone el pais o solo un retorno
//				texto_formateado += tdd[4] + "<br>"																		
				texto_formateado += tdd[4] 																	
				}
			}
		} 
tdd[8]=tdd[8].replace(cambia,"&nbsp;")
tdd[9]=tdd[9].replace(cambia,"&nbsp;")
tdd[10]=tdd[10].replace(cambia,"&nbsp;")
tdd[11]=tdd[11].replace(cambia,"&nbsp;")

	if (tdd[8] !="" && tdd[9] !="") {	// si hay telefonos
		TEL = "Tel.:&nbsp;" + tdd[8] + "&nbsp; " + tdd[9]																		
		} else if (tdd[8] !="" || tdd[9] !="") {	// si hay solo uno
		TEL = "Tel.:&nbsp;" + tdd[8] + tdd[9]
		} else {	// si hay solo uno
		TEL = ""
		}
	if (tdd[10] !="" && tdd[11] !="") {	// si hay faxes
		FAX = "Fax:&nbsp;" + tdd[10] + "&nbsp;&nbsp;" + tdd[11]																		
		} else if (tdd[10] !="" || tdd[11] !="") {	// si hay solo uno
		FAX = "Fax:&nbsp;" + tdd[10] + tdd[11]
		} else {	// si hay solo uno
		FAX = ""
		}
	if (TEL !="" && FAX !="") {	// si hay telefonos y fax
		texto_formateado += TEL + "&nbsp; " + FAX+ "<br>"																
		} else if (TEL !="" || FAX !="") {	// si hay solo uno
		texto_formateado += TEL + FAX + "<br>"																
		} 
	if (tdd[12] !="" && tdd[13] !="") {	// Correos e
		texto_formateado += tdd[12] + "&nbsp;&nbsp; " + tdd[13] + " "																		
		} else if (tdd[12] !="" || tdd[13] !="") {	// si hay solo uno
		texto_formateado += tdd[12] + tdd[13] + " "
		}
	if (tdd[14] !="" && tdd[15] !="") {	// WEB
		texto_formateado +="<a href=\"javascript:abre('http:\/\/" + tdd[14] + "')\" class='dempresa'>" + tdd[14] + "<\/a> <a href=\"javascript:abre('http:\/\/" + tdd[15] + "')\" class='dempresa'>" + tdd[15] + "<\/a><br>"																		
		} else if (tdd[14] !="" || tdd[15] !="") {	// si hay solo uno
		texto_formateado +="<a href=\"javascript:abre('http:\/\/" + tdd[14] + tdd[15] + "')\" class='dempresa'>" + tdd[14] + tdd[15] + "<\/a><br>"
		}
	// --------------------------------------------------------------------		comentarios
	if (tdc == "") {	// Si no hay comentarios
		} else {	// Si hay comentarios
		// --------------------------------------------------------------------	formatea comentarios
		COM = tdc.split('\n')
		comentarios="<br>"
		for (i=0;i<COM.length;i++){
			COMA[i]="" + COM[i]
			comentarios+=reemplaza_por_numeros(COMA[i]) + "<\/span><\/div>"
			}
		}
	}	// Acaba la funcion 
		
		
		
		nuevoCOMEN =""
function reemplaza_por_numeros(COMEN){
nuevoCOMEN =""
	v1="<div class='doss'>DOSSIER "
	re=/Dossier nș (\d+)/
		if (COMEN.match(/Dossier nș uno/)) nuevoCOMEN = COMEN.replace(/Dossier nș uno/,v1 + " 1<span class='dirs'>")
		else if (COMEN.match(/Dossier nș dos/)) nuevoCOMEN = COMEN.replace(/Dossier nș dos/,v1 + " 2<span class='dirs'>")
		else if (COMEN.match(/Dossier nș tres/)) nuevoCOMEN = COMEN.replace(/Dossier nș tres/,v1 + " 3<span class='dirs'>")
		else if (COMEN.match(/Dossier nș cuatro/)) nuevoCOMEN = COMEN.replace(/Dossier nș cuatro/,v1 + " 4<span class='dirs'>")
		else if (COMEN.match(/Dossier nș cinco/)) nuevoCOMEN = COMEN.replace(/Dossier nș cinco/,v1 + " 5<span class='dirs'>")
		else if (COMEN.match(/Dossier nș seis/)) nuevoCOMEN = COMEN.replace(/Dossier nș seis/,v1 + " 6<span class='dirs'>")
		else if (COMEN.match(/Dossier nș siete/))nuevoCOMEN = COMEN.replace(/Dossier nș siete/,v1 + " 7<span class='dirs'>")
		else if (COMEN.match(/Dossier nș ocho/))nuevoCOMEN = COMEN.replace(/Dossier nș ocho/,v1 + " 8<span class='dirs'>")
		else if (COMEN.match(/Dossier nș nueve/))nuevoCOMEN = COMEN.replace(/Dossier nș nueve/,v1 + " 9<span class='dirs'>")
		else if (COMEN.match(/Dossier nș diez/))nuevoCOMEN = COMEN.replace(/Dossier nș diez/,v1 + "10<span class='dirs'>")
		else if (COMEN.match(/Dossier nș once/))nuevoCOMEN = COMEN.replace(/Dossier nș once/,v1 + "11<span class='dirs'>")
		else if (COMEN.match(/Dossier nș doce/))nuevoCOMEN = COMEN.replace(/Dossier nș doce/,v1 + "12<span class='dirs'>")
		else if (COMEN.match(/Dossier nș trece/))nuevoCOMEN = COMEN.replace(/Dossier nș trece/,v1 + "13<span class='dirs'>")
		else if (COMEN.match(/Dossier nș catorce/))nuevoCOMEN = COMEN.replace(/Dossier nș catorce/,v1 + "14<span class='dirs'>")
		else if (COMEN.match(/Dossier nș quince/))nuevoCOMEN = COMEN.replace(/Dossier nș quince/,v1 + "15<span class='dirs'>")
		else if (COMEN.match(/Dossier nș dieciséis/))	nuevoCOMEN = COMEN.replace(/Dossier nș dieciséis/,v1 + "16<span class='dirs'>")
		else if (COMEN.match(/Dossier nș diecisiete/))nuevoCOMEN = COMEN.replace(/Dossier nș diecisiete/,v1 + "17<span class='dirs'>")
		else if (COMEN.match(/Dossier nș dieciocho/))nuevoCOMEN = COMEN.replace(/Dossier nș dieciocho/,v1 + "18<span class='dirs'>")
		else if (COMEN.match(/Dossier nș diecinueve/))nuevoCOMEN = COMEN.replace(/Dossier nș diecinueve/,v1 + "19<span class='dirs'>")
		else if (COMEN.match(/Dossier nș veinte/))nuevoCOMEN = COMEN.replace(/Dossier nș veinte/,v1 + "20<span class='dirs'>")
		else if (COMEN.match(/Dossier nș veintiuno/))nuevoCOMEN = COMEN.replace(/Dossier nș veintiuno/,v1 + "21<span class='dirs'>")
		else if (COMEN.match(/Dossier nș veintidós/))nuevoCOMEN = COMEN.replace(/Dossier nș veintidós/,v1 + "22<span class='dirs'>")
		else if (COMEN.match(/Dossier nș veintitrés/))nuevoCOMEN = COMEN.replace(/Dossier nș veintitrés/,v1 + "23<span class='dirs'>")
		else if (COMEN.match(/Dossier nș veinticuatro/))nuevoCOMEN = COMEN.replace(/Dossier nș veinticuatro/,v1 + "24<span class='dirs'>")
		else if (COMEN.match(/Dossier nș veinticinco/))nuevoCOMEN = COMEN.replace(/Dossier nș veinticinco/,v1 + "25<span class='dirs'>")
		else if (COMEN.match(/Dossier nș veintiséis/))nuevoCOMEN = COMEN.replace(/Dossier nș veintiséis/,v1 + "26<span class='dirs'>")
		else if (COMEN.match(/Dossier nș veintisiete/))nuevoCOMEN = COMEN.replace(/Dossier nș veintisiete/,v1 + "27<span class='dirs'>")
		else if (COMEN.match(/Dossier nș veintiocho/))nuevoCOMEN = COMEN.replace(/Dossier nș veintiocho/,v1 + "28<span class='dirs'>")
		else if (COMEN.match(/Dossier nș veintinueve/))nuevoCOMEN = COMEN.replace(/Dossier nș veintinueve/,v1 + "29<span class='dirs'>")
		else if (COMEN.match(/Dossier nș treinta/))nuevoCOMEN = COMEN.replace(/Dossier nș treinta/,v1 + "30<span class='dirs'>")
		else if (COMEN.match(re)) nuevoCOMEN = COMEN.replace(re,v1 + RegExp.$1 + "<span class='dirs'>")
		else if (COMEN.match(/Dossier./))nuevoCOMEN = COMEN.replace(/Dossier./,"")
		else nuevoCOMEN = COMEN
	return 	nuevoCOMEN
	}