awk -F";" '
function sacap(txt) { tx="";for (i=1;i<=length(txt);i++) if(substr(txt,i,1)!=".")tx=tx""substr(txt,i,1) ; return (tx) }
FILENAME==ARGV[1] { r[$2]=$4 ; f[$2]=$7; mail[$2]=$10; con[$2]=$6; next } 
{
rut=sacap(substr($1,1,12))
printf "%262.262s",$0
if(mail[rut]!="") printf "%-40.40s",mail[rut]
else printf "%-40.40s",substr($0,263) 
printf "%52.52s",substr($0,303) 
printf "%-6.6s%10.10s%10.10s%s%6s\n",r[rut],f[rut],"",substr($0,355),con[rut]
if(r[rut]!="") r[rut]=""
}
END {

for ( i in r) if (r[i]!="") print i, r[i] >"/dev/tty"

   } ' *csv HEAD0 >HEAD
exit
NOMBRE ;RUT;PROFESIN;N DE REGISTRO NACIONAL;ZONA;CDIGO DE COMUNA;FECHA DE INGRESO;FECHA DE EGRESO;TELFONO;CORREO ELECTRONICO;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
DEBORA FERNANDEZ IBACACHE;11422003-5;enfermera;86557;LA CALERA;5504;15/04/2019;;;deborafernandez@telemed-chile.cl;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
VALESKA GATICA MORALES;12790833-8;enfermera;142541;LINARES;7301;10/12/2019;;;valeskagaticaenfermera@gmail.com;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
MARILUZ DEL PILAR RETAMAL ARRIAGADA;13506141-7;enfermera;165072;TALCA;;;;;mretamalarriagada993@gmail.com;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
ANA MARIA CONTRERAS ALVAREZ;14119035-0;enfermera;98286;OVALLE;;;;;amcontre@uc.cl;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
IVONNE CONSUELO GARCIA VERGARA;14398431-1;enfermera;66836;CODEGUA;;;;;enfermeraivonnegarcia@gmail.com;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

# |  1 H00 codigo 12 07   0 | 2 H01 identi 40 00  12 | 3 H02 nombre 40 00  52 |
# |  4 H03 patern 40 00  92 | 5 H04 matern 40 00 132 | 6 H05 direcc 40 00 172 |
# |  7 H06 comuna 25 00 212 | 8 H07 ciudad 25 00 237 | 9 H08 correo 40 00 262 |
# | 10 H09 telefo 50 00 302 |11 H10 especi 02 51 352 |12 H11 regist 06 01 354 |
# | 13 H12 fechai 10 00 360 |14 H13 fechae 10 00 370 |15 H14 zonas  03 53 380 |
# | 16 H15 status 02 52 383 |

