function sacaCerosIzq()
{
   rut = document.frm.rut.value;
   rut = rut.toLowerCase();
   document.frm.rut.value = rut;
   digito0 = rut.charAt(0);
   if(digito0 == 0)
   {
     largo = rut.length;  
     verdadero = rut.substring(1,largo);
     document.frm.rut.value = verdadero;      
   }
}

            
function filtroComunas()
{
   var Region = document.frm.region.selectedIndex;
   var i=0;
   var Length = Len(Array_Comunas[Region]);
   
   if ( Region != 0 ) {
      document.frm.comuna.length = Length;
   }

   for (i=0; i < Length; i++)
   {   
          document.frm.comuna.options[i].text  = Array_Comunas[Region][i][1];
          document.frm.comuna.options[i].value  = Array_Comunas[Region][i][0];
   }
   document.frm.comuna.selectedIndex = 0;

}

function dimension (name_str, n0, n1, n2)
{
   var numDimens = dimension.arguments.length - 1;
   var code = name_str + " = new Array();";
     
   eval (code);

   for (var i = 0; i <  n0; i++) // first index is 0
   {
      var newName = name_str + "[" + i + "]";      
      if (numDimens > 1)
      {
         code = "dimension ('" + newName + "'";
         for (var j = 2; j <= numDimens; j++)
            code += ", " + dimension.arguments[j];
         code += ");";
         eval (code);
      }
   }  
}  

function Len(Arr)
{
   var i = 0;
   var Length = Arr.length;

   for (j=0; j < Length; j++)
   {
      var str = new String(Arr[j]);
      if (str.length != 0 ) {
         i += 1;
      }
   }
   return i ;
}


dimension ('Array_Comunas',14, 128,2);
var region=1;
var j=0;


   if (region != 1) { j=0; }
   Array_Comunas[1][j][0] = '0';
   Array_Comunas[1][j][1] = '(Seleccione Comuna)';
   region=1;
   j = j+1;

   if (region != 1) { j=0; }
   Array_Comunas[1][j][0] = '0101';
   Array_Comunas[1][j][1] = 'ARICA';
   region=1;
   j = j+1;

   if (region != 1) { j=0; }
   Array_Comunas[1][j][0] = '0103';
   Array_Comunas[1][j][1] = 'CAMARONES';
   region=1;
   j = j+1;

   if (region != 1) { j=0; }
   Array_Comunas[1][j][0] = '0107';
   Array_Comunas[1][j][1] = 'CAMIÑA';
   region=1;
   j = j+1;

   if (region != 1) { j=0; }
   Array_Comunas[1][j][0] = '0108';
   Array_Comunas[1][j][1] = 'COLCHANE';
   region=1;
   j = j+1;

   if (region != 1) { j=0; }
   Array_Comunas[1][j][0] = '0105';
   Array_Comunas[1][j][1] = 'GRAL.LAGOS';
   region=1;
   j = j+1;

   if (region != 1) { j=0; }
   Array_Comunas[1][j][0] = '0106';
   Array_Comunas[1][j][1] = 'HUARA';
   region=1;
   j = j+1;

   if (region != 1) { j=0; }
   Array_Comunas[1][j][0] = '0102';
   Array_Comunas[1][j][1] = 'IQUIQUE';
   region=1;
   j = j+1;

   if (region != 1) { j=0; }
   Array_Comunas[1][j][0] = '0109';
   Array_Comunas[1][j][1] = 'PICA';
   region=1;
   j = j+1;

   if (region != 1) { j=0; }
   Array_Comunas[1][j][0] = '0110';
   Array_Comunas[1][j][1] = 'POZO ALMONTE';
   region=1;
   j = j+1;

   if (region != 1) { j=0; }
   Array_Comunas[1][j][0] = '0104';
   Array_Comunas[1][j][1] = 'PUTRE';
   region=1;
   j = j+1;

   if (region != 2) { j=0; }
   Array_Comunas[2][j][0] = '0';
   Array_Comunas[2][j][1] = '(Seleccione Comuna)';
   region=2;
   j = j+1;

   if (region != 2) { j=0; }
   Array_Comunas[2][j][0] = '0201';
   Array_Comunas[2][j][1] = 'ANTOFAGASTA';
   region=2;
   j = j+1;

   if (region != 2) { j=0; }
   Array_Comunas[2][j][0] = '0210';
   Array_Comunas[2][j][1] = 'BAQUEDANO';
   region=2;
   j = j+1;

   if (region != 2) { j=0; }
   Array_Comunas[2][j][0] = '0204';
   Array_Comunas[2][j][1] = 'CALAMA';
   region=2;
   j = j+1;

   if (region != 2) { j=0; }
   Array_Comunas[2][j][0] = '0211';
   Array_Comunas[2][j][1] = 'CHUQUICAMATA';
   region=2;
   j = j+1;

   if (region != 2) { j=0; }
   Array_Comunas[2][j][0] = '0203';
   Array_Comunas[2][j][1] = 'MARIA ELENA';
   region=2;
   j = j+1;

   if (region != 2) { j=0; }
   Array_Comunas[2][j][0] = '0207';
   Array_Comunas[2][j][1] = 'MEJILLONES';
   region=2;
   j = j+1;

   if (region != 2) { j=0; }
   Array_Comunas[2][j][0] = '0205';
   Array_Comunas[2][j][1] = 'OLLAGUE';
   region=2;
   j = j+1;

   if (region != 2) { j=0; }
   Array_Comunas[2][j][0] = '0206';
   Array_Comunas[2][j][1] = 'S.P.ATACAMA';
   region=2;
   j = j+1;

   if (region != 2) { j=0; }
   Array_Comunas[2][j][0] = '0208';
   Array_Comunas[2][j][1] = 'SIER.GORDA';
   region=2;
   j = j+1;

   if (region != 2) { j=0; }
   Array_Comunas[2][j][0] = '0209';
   Array_Comunas[2][j][1] = 'TALTAL';
   region=2;
   j = j+1;

   if (region != 2) { j=0; }
   Array_Comunas[2][j][0] = '0202';
   Array_Comunas[2][j][1] = 'TOCOPILLA';
   region=2;
   j = j+1;

   if (region != 3) { j=0; }
   Array_Comunas[3][j][0] = '0';
   Array_Comunas[3][j][1] = '(Seleccione Comuna)';
   region=3;
   j = j+1;

   if (region != 3) { j=0; }
   Array_Comunas[3][j][0] = '0309';
   Array_Comunas[3][j][1] = 'A.D.CARMEN';
   region=3;
   j = j+1;

   if (region != 3) { j=0; }
   Array_Comunas[3][j][0] = '0304';
   Array_Comunas[3][j][1] = 'CALDERA';
   region=3;
   j = j+1;

   if (region != 3) { j=0; }
   Array_Comunas[3][j][0] = '0302';
   Array_Comunas[3][j][1] = 'CHAÑARAL';
   region=3;
   j = j+1;

   if (region != 3) { j=0; }
   Array_Comunas[3][j][0] = '0301';
   Array_Comunas[3][j][1] = 'COPIAPO';
   region=3;
   j = j+1;

   if (region != 3) { j=0; }
   Array_Comunas[3][j][0] = '0303';
   Array_Comunas[3][j][1] = 'DGO.ALMAGRO';
   region=3;
   j = j+1;

   if (region != 3) { j=0; }
   Array_Comunas[3][j][0] = '0307';
   Array_Comunas[3][j][1] = 'FREIRINA';
   region=3;
   j = j+1;

   if (region != 3) { j=0; }
   Array_Comunas[3][j][0] = '0308';
   Array_Comunas[3][j][1] = 'HUASCO';
   region=3;
   j = j+1;

   if (region != 3) { j=0; }
   Array_Comunas[3][j][0] = '0305';
   Array_Comunas[3][j][1] = 'TI.AMARILLA';
   region=3;
   j = j+1;

   if (region != 3) { j=0; }
   Array_Comunas[3][j][0] = '0306';
   Array_Comunas[3][j][1] = 'VALLENAR';
   region=3;
   j = j+1;

   if (region != 4) { j=0; }
   Array_Comunas[4][j][0] = '0';
   Array_Comunas[4][j][1] = '(Seleccione Comuna)';
   region=4;
   j = j+1;

   if (region != 4) { j=0; }
   Array_Comunas[4][j][0] = '0405';
   Array_Comunas[4][j][1] = 'ANDACOLLO';
   region=4;
   j = j+1;

   if (region != 4) { j=0; }
   Array_Comunas[4][j][0] = '0411';
   Array_Comunas[4][j][1] = 'COMBARBALA';
   region=4;
   j = j+1;

   if (region != 4) { j=0; }
   Array_Comunas[4][j][0] = '0404';
   Array_Comunas[4][j][1] = 'COQUIMBO';
   region=4;
   j = j+1;

   if (region != 4) { j=0; }
   Array_Comunas[4][j][0] = '0413';
   Array_Comunas[4][j][1] = 'ILLAPEL';
   region=4;
   j = j+1;

   if (region != 4) { j=0; }
   Array_Comunas[4][j][0] = '0401';
   Array_Comunas[4][j][1] = 'IV REGION';
   region=4;
   j = j+1;

   if (region != 4) { j=0; }
   Array_Comunas[4][j][0] = '0403';
   Array_Comunas[4][j][1] = 'LA HIGUERA';
   region=4;
   j = j+1;

   if (region != 4) { j=0; }
   Array_Comunas[4][j][0] = '0402';
   Array_Comunas[4][j][1] = 'LA SERENA';
   region=4;
   j = j+1;

   if (region != 4) { j=0; }
   Array_Comunas[4][j][0] = '0415';
   Array_Comunas[4][j][1] = 'LOS VILOS';
   region=4;
   j = j+1;

   if (region != 4) { j=0; }
   Array_Comunas[4][j][0] = '0416';
   Array_Comunas[4][j][1] = 'MINCHA';
   region=4;
   j = j+1;

   if (region != 4) { j=0; }
   Array_Comunas[4][j][0] = '0410';
   Array_Comunas[4][j][1] = 'MONTE PATRIA';
   region=4;
   j = j+1;

   if (region != 4) { j=0; }
   Array_Comunas[4][j][0] = '0408';
   Array_Comunas[4][j][1] = 'OVALLE';
   region=4;
   j = j+1;

   if (region != 4) { j=0; }
   Array_Comunas[4][j][0] = '0407';
   Array_Comunas[4][j][1] = 'PAIGUANO';
   region=4;
   j = j+1;

   if (region != 4) { j=0; }
   Array_Comunas[4][j][0] = '0412';
   Array_Comunas[4][j][1] = 'PUNITAQUI';
   region=4;
   j = j+1;

   if (region != 4) { j=0; }
   Array_Comunas[4][j][0] = '0409';
   Array_Comunas[4][j][1] = 'RIO HURTADO';
   region=4;
   j = j+1;

   if (region != 4) { j=0; }
   Array_Comunas[4][j][0] = '0414';
   Array_Comunas[4][j][1] = 'SALAMANCA';
   region=4;
   j = j+1;

   if (region != 4) { j=0; }
   Array_Comunas[4][j][0] = '0406';
   Array_Comunas[4][j][1] = 'VICUÑA';
   region=4;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0';
   Array_Comunas[5][j][1] = '(Seleccione Comuna)';
   region=5;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0536';
   Array_Comunas[5][j][1] = 'ALGARROBO';
   region=5;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0509';
   Array_Comunas[5][j][1] = 'CABILDO';
   region=5;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0521';
   Array_Comunas[5][j][1] = 'CALERA';
   region=5;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0513';
   Array_Comunas[5][j][1] = 'CALLE LARGA';
   region=5;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0533';
   Array_Comunas[5][j][1] = 'CARTAGENA';
   region=5;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0502';
   Array_Comunas[5][j][1] = 'CASABLANCA';
   region=5;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0518';
   Array_Comunas[5][j][1] = 'CATEMU';
   region=5;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0539';
   Array_Comunas[5][j][1] = 'CON-CON';
   region=5;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0535';
   Array_Comunas[5][j][1] = 'EL QUISCO';
   region=5;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0534';
   Array_Comunas[5][j][1] = 'EL TABO';
   region=5;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0523';
   Array_Comunas[5][j][1] = 'HIJUELAS';
   region=5;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0538';
   Array_Comunas[5][j][1] = 'I.DE PASCUA';
   region=5;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0531';
   Array_Comunas[5][j][1] = 'JUAN FERNANDEZ';
   region=5;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0520';
   Array_Comunas[5][j][1] = 'LA CRUZ';
   region=5;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0507';
   Array_Comunas[5][j][1] = 'LA LIGUA';
   region=5;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0504';
   Array_Comunas[5][j][1] = 'LIMACHE';
   region=5;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0503';
   Array_Comunas[5][j][1] = 'LLAY LLAY';
   region=5;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0501';
   Array_Comunas[5][j][1] = 'LOS ANDES';
   region=5;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0522';
   Array_Comunas[5][j][1] = 'NOGALES';
   region=5;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0524';
   Array_Comunas[5][j][1] = 'OLMUE';
   region=5;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0517';
   Array_Comunas[5][j][1] = 'PANQUEHUE';
   region=5;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0511';
   Array_Comunas[5][j][1] = 'PAPUDO';
   region=5;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0508';
   Array_Comunas[5][j][1] = 'PETORCA';
   region=5;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0528';
   Array_Comunas[5][j][1] = 'PUCHUNCAVI';
   region=5;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0515';
   Array_Comunas[5][j][1] = 'PUTAENDO';
   region=5;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0519';
   Array_Comunas[5][j][1] = 'QUILLOTA';
   region=5;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0529';
   Array_Comunas[5][j][1] = 'QUILPUE';
   region=5;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0527';
   Array_Comunas[5][j][1] = 'QUINTERO';
   region=5;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0514';
   Array_Comunas[5][j][1] = 'RINCONADA';
   region=5;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0532';
   Array_Comunas[5][j][1] = 'SAN ANTONIO';
   region=5;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0512';
   Array_Comunas[5][j][1] = 'SAN ESTEBAN';
   region=5;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0506';
   Array_Comunas[5][j][1] = 'SAN FELIPE';
   region=5;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0516';
   Array_Comunas[5][j][1] = 'SANTA MARIA';
   region=5;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0537';
   Array_Comunas[5][j][1] = 'SANTO DGO.';
   region=5;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0525';
   Array_Comunas[5][j][1] = 'VALPARAISO';
   region=5;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0530';
   Array_Comunas[5][j][1] = 'VILLA ALEMANA';
   region=5;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0526';
   Array_Comunas[5][j][1] = 'VIÑA DEL MAR';
   region=5;
   j = j+1;

   if (region != 5) { j=0; }
   Array_Comunas[5][j][0] = '0510';
   Array_Comunas[5][j][1] = 'ZAPALLAR';
   region=5;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0';
   Array_Comunas[6][j][1] = '(Seleccione Comuna)';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0622';
   Array_Comunas[6][j][1] = 'CHEPICA';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0619';
   Array_Comunas[6][j][1] = 'CHIMBARONGO';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0604';
   Array_Comunas[6][j][1] = 'CODEGUA';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0615';
   Array_Comunas[6][j][1] = 'COINCO';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0614';
   Array_Comunas[6][j][1] = 'COLTAUCO';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0634';
   Array_Comunas[6][j][1] = 'COYA';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0616';
   Array_Comunas[6][j][1] = 'DOÑIHUE';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0602';
   Array_Comunas[6][j][1] = 'GRANEROS';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0631';
   Array_Comunas[6][j][1] = 'LA ESTRELLA';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0617';
   Array_Comunas[6][j][1] = 'LAS CABRAS';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0630';
   Array_Comunas[6][j][1] = 'LITUECHE';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0638';
   Array_Comunas[6][j][1] = 'LO MIRANDA';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0624';
   Array_Comunas[6][j][1] = 'LOLOL';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0635';
   Array_Comunas[6][j][1] = 'LOS LIRIOS';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0605';
   Array_Comunas[6][j][1] = 'MACHALI';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0609';
   Array_Comunas[6][j][1] = 'MALLOA';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0632';
   Array_Comunas[6][j][1] = 'MARCHIGUE';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0603';
   Array_Comunas[6][j][1] = 'MOSTAZAL';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0621';
   Array_Comunas[6][j][1] = 'NANCAGUA';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0629';
   Array_Comunas[6][j][1] = 'NAVIDAD';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0606';
   Array_Comunas[6][j][1] = 'OLIVAR';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0626';
   Array_Comunas[6][j][1] = 'PALMILLA';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0633';
   Array_Comunas[6][j][1] = 'PAREDONES';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0637';
   Array_Comunas[6][j][1] = 'PELEQUEN';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0627';
   Array_Comunas[6][j][1] = 'PERALILLO';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0613';
   Array_Comunas[6][j][1] = 'PEUMO';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0612';
   Array_Comunas[6][j][1] = 'PICHIDEGUA';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0628';
   Array_Comunas[6][j][1] = 'PICHILEMU';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0620';
   Array_Comunas[6][j][1] = 'PLACILLA';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0625';
   Array_Comunas[6][j][1] = 'PUMANQUE';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0610';
   Array_Comunas[6][j][1] = 'QTA.TILCOCO';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0601';
   Array_Comunas[6][j][1] = 'RANCAGUA';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0639';
   Array_Comunas[6][j][1] = 'RAPEL';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0608';
   Array_Comunas[6][j][1] = 'RENGO';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0607';
   Array_Comunas[6][j][1] = 'REQUINOA';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0636';
   Array_Comunas[6][j][1] = 'ROSARIO';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0618';
   Array_Comunas[6][j][1] = 'SAN FERNANDO';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0611';
   Array_Comunas[6][j][1] = 'SAN VICENTE';
   region=6;
   j = j+1;

   if (region != 6) { j=0; }
   Array_Comunas[6][j][0] = '0623';
   Array_Comunas[6][j][1] = 'SANTA CRUZ';
   region=6;
   j = j+1;

   if (region != 7) { j=0; }
   Array_Comunas[7][j][0] = '0';
   Array_Comunas[7][j][1] = '(Seleccione Comuna)';
   region=7;
   j = j+1;

   if (region != 7) { j=0; }
   Array_Comunas[7][j][0] = '0727';
   Array_Comunas[7][j][1] = 'CAUQUENES';
   region=7;
   j = j+1;

   if (region != 7) { j=0; }
   Array_Comunas[7][j][0] = '0729';
   Array_Comunas[7][j][1] = 'CHANCO';
   region=7;
   j = j+1;

   if (region != 7) { j=0; }
   Array_Comunas[7][j][0] = '0721';
   Array_Comunas[7][j][1] = 'COLBUN';
   region=7;
   j = j+1;

   if (region != 7) { j=0; }
   Array_Comunas[7][j][0] = '0717';
   Array_Comunas[7][j][1] = 'CONSTITUCIO';
   region=7;
   j = j+1;

   if (region != 7) { j=0; }
   Array_Comunas[7][j][0] = '0718';
   Array_Comunas[7][j][1] = 'CUREPTO';
   region=7;
   j = j+1;

   if (region != 7) { j=0; }
   Array_Comunas[7][j][0] = '0701';
   Array_Comunas[7][j][1] = 'CURICO';
   region=7;
   j = j+1;

   if (region != 7) { j=0; }
   Array_Comunas[7][j][0] = '0715';
   Array_Comunas[7][j][1] = 'EMPEDRADO';
   region=7;
   j = j+1;

   if (region != 7) { j=0; }
   Array_Comunas[7][j][0] = '0706';
   Array_Comunas[7][j][1] = 'HUALAÑE';
   region=7;
   j = j+1;

   if (region != 7) { j=0; }
   Array_Comunas[7][j][0] = '0707';
   Array_Comunas[7][j][1] = 'LICANTEN';
   region=7;
   j = j+1;

   if (region != 7) { j=0; }
   Array_Comunas[7][j][0] = '0719';
   Array_Comunas[7][j][1] = 'LINARES';
   region=7;
   j = j+1;

   if (region != 7) { j=0; }
   Array_Comunas[7][j][0] = '0722';
   Array_Comunas[7][j][1] = 'LONGAVI';
   region=7;
   j = j+1;

   if (region != 7) { j=0; }
   Array_Comunas[7][j][0] = '0714';
   Array_Comunas[7][j][1] = 'MAULE';
   region=7;
   j = j+1;

   if (region != 7) { j=0; }
   Array_Comunas[7][j][0] = '0704';
   Array_Comunas[7][j][1] = 'MOLINA';
   region=7;
   j = j+1;

   if (region != 7) { j=0; }
   Array_Comunas[7][j][0] = '0723';
   Array_Comunas[7][j][1] = 'PARRAL';
   region=7;
   j = j+1;

   if (region != 7) { j=0; }
   Array_Comunas[7][j][0] = '0711';
   Array_Comunas[7][j][1] = 'PELARCO';
   region=7;
   j = j+1;

   if (region != 7) { j=0; }
   Array_Comunas[7][j][0] = '0728';
   Array_Comunas[7][j][1] = 'PELLUHUE';
   region=7;
   j = j+1;

   if (region != 7) { j=0; }
   Array_Comunas[7][j][0] = '0716';
   Array_Comunas[7][j][1] = 'PENCAHUE';
   region=7;
   j = j+1;

   if (region != 7) { j=0; }
   Array_Comunas[7][j][0] = '0709';
   Array_Comunas[7][j][1] = 'RAUCO';
   region=7;
   j = j+1;

   if (region != 7) { j=0; }
   Array_Comunas[7][j][0] = '0724';
   Array_Comunas[7][j][1] = 'RETIRO';
   region=7;
   j = j+1;

   if (region != 7) { j=0; }
   Array_Comunas[7][j][0] = '0712';
   Array_Comunas[7][j][1] = 'RIO CLARO';
   region=7;
   j = j+1;

   if (region != 7) { j=0; }
   Array_Comunas[7][j][0] = '0703';
   Array_Comunas[7][j][1] = 'ROMERAL';
   region=7;
   j = j+1;

   if (region != 7) { j=0; }
   Array_Comunas[7][j][0] = '0705';
   Array_Comunas[7][j][1] = 'SAG.FAMILIA';
   region=7;
   j = j+1;

   if (region != 7) { j=0; }
   Array_Comunas[7][j][0] = '0726';
   Array_Comunas[7][j][1] = 'SAN JAVIER';
   region=7;
   j = j+1;

   if (region != 7) { j=0; }
   Array_Comunas[7][j][0] = '0730';
   Array_Comunas[7][j][1] = 'SAN RAFAEL';
   region=7;
   j = j+1;

   if (region != 7) { j=0; }
   Array_Comunas[7][j][0] = '0713';
   Array_Comunas[7][j][1] = 'SN.CLEMENTE';
   region=7;
   j = j+1;

   if (region != 7) { j=0; }
   Array_Comunas[7][j][0] = '0710';
   Array_Comunas[7][j][1] = 'TALCA';
   region=7;
   j = j+1;

   if (region != 7) { j=0; }
   Array_Comunas[7][j][0] = '0702';
   Array_Comunas[7][j][1] = 'TENO';
   region=7;
   j = j+1;

   if (region != 7) { j=0; }
   Array_Comunas[7][j][0] = '0708';
   Array_Comunas[7][j][1] = 'VICHUQUEN';
   region=7;
   j = j+1;

   if (region != 7) { j=0; }
   Array_Comunas[7][j][0] = '0725';
   Array_Comunas[7][j][1] = 'VILLA ALEGRE';
   region=7;
   j = j+1;

   if (region != 7) { j=0; }
   Array_Comunas[7][j][0] = '0720';
   Array_Comunas[7][j][1] = 'YERBAS BUENAS';
   region=7;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0';
   Array_Comunas[8][j][1] = '(Seleccione Comuna)';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0831';
   Array_Comunas[8][j][1] = 'ANTUCO';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0810';
   Array_Comunas[8][j][1] = 'ARAUCO';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0828';
   Array_Comunas[8][j][1] = 'BULNES';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0812';
   Array_Comunas[8][j][1] = 'CABRERO';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0819';
   Array_Comunas[8][j][1] = 'CAÑETE';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0851';
   Array_Comunas[8][j][1] = 'CHIGUAYANTE';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0811';
   Array_Comunas[8][j][1] = 'CHILLAN';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0850';
   Array_Comunas[8][j][1] = 'CHILLAN VJO';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0846';
   Array_Comunas[8][j][1] = 'COBQUECURA';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0827';
   Array_Comunas[8][j][1] = 'COELEMU';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0839';
   Array_Comunas[8][j][1] = 'COIHUECO';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0801';
   Array_Comunas[8][j][1] = 'CONCEPCION';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0835';
   Array_Comunas[8][j][1] = 'CONTULMO';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0805';
   Array_Comunas[8][j][1] = 'CORONEL';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0818';
   Array_Comunas[8][j][1] = 'CURANILAHUE';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0842';
   Array_Comunas[8][j][1] = 'EL CARMEN';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0808';
   Array_Comunas[8][j][1] = 'FLORIDA';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0807';
   Array_Comunas[8][j][1] = 'HUALQUI';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0815';
   Array_Comunas[8][j][1] = 'LAJA';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0822';
   Array_Comunas[8][j][1] = 'LEBU';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0816';
   Array_Comunas[8][j][1] = 'LOS ALAMOS';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0814';
   Array_Comunas[8][j][1] = 'LOS ANGELES';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0806';
   Array_Comunas[8][j][1] = 'LOTA';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0823';
   Array_Comunas[8][j][1] = 'MULCHEN';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0824';
   Array_Comunas[8][j][1] = 'NACIMIENTO';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0832';
   Array_Comunas[8][j][1] = 'NEGRETE';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0847';
   Array_Comunas[8][j][1] = 'NINHUE';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0837';
   Array_Comunas[8][j][1] = 'NIQUEN';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0843';
   Array_Comunas[8][j][1] = 'PEMUCO';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0803';
   Array_Comunas[8][j][1] = 'PENCO';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0840';
   Array_Comunas[8][j][1] = 'PINTO';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0844';
   Array_Comunas[8][j][1] = 'PORTEZUELO';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0849';
   Array_Comunas[8][j][1] = 'QUILACO';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0813';
   Array_Comunas[8][j][1] = 'QUILLECO';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0826';
   Array_Comunas[8][j][1] = 'QUILLON';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0833';
   Array_Comunas[8][j][1] = 'QUIRIHUE';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0821';
   Array_Comunas[8][j][1] = 'RANQUIL';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0890';
   Array_Comunas[8][j][1] = 'RETIRA CONCENCION';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0825';
   Array_Comunas[8][j][1] = 'SAN CARLOS';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0838';
   Array_Comunas[8][j][1] = 'SAN FABIAN';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0841';
   Array_Comunas[8][j][1] = 'SAN IGNACIO';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0848';
   Array_Comunas[8][j][1] = 'SAN NICOLAS';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0817';
   Array_Comunas[8][j][1] = 'SAN ROSENDO';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0852';
   Array_Comunas[8][j][1] = 'SP D LA PAZ';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0809';
   Array_Comunas[8][j][1] = 'STA. JUANA';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0836';
   Array_Comunas[8][j][1] = 'STA.BARBARA';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0802';
   Array_Comunas[8][j][1] = 'TALCAHUANO';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0834';
   Array_Comunas[8][j][1] = 'TIRUA';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0804';
   Array_Comunas[8][j][1] = 'TOME';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0845';
   Array_Comunas[8][j][1] = 'TREHUACO';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0830';
   Array_Comunas[8][j][1] = 'TUCAPEL';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0820';
   Array_Comunas[8][j][1] = 'YUMBEL';
   region=8;
   j = j+1;

   if (region != 8) { j=0; }
   Array_Comunas[8][j][0] = '0829';
   Array_Comunas[8][j][1] = 'YUNGAY';
   region=8;
   j = j+1;

   if (region != 9) { j=0; }
   Array_Comunas[9][j][0] = '0';
   Array_Comunas[9][j][1] = '(Seleccione Comuna)';
   region=9;
   j = j+1;

   if (region != 9) { j=0; }
   Array_Comunas[9][j][0] = '0901';
   Array_Comunas[9][j][1] = 'ANGOL';
   region=9;
   j = j+1;

   if (region != 9) { j=0; }
   Array_Comunas[9][j][0] = '0927';
   Array_Comunas[9][j][1] = 'CARAHUE';
   region=9;
   j = j+1;

   if (region != 9) { j=0; }
   Array_Comunas[9][j][0] = '0903';
   Array_Comunas[9][j][1] = 'COLLIPULLI';
   region=9;
   j = j+1;

   if (region != 9) { j=0; }
   Array_Comunas[9][j][0] = '0915';
   Array_Comunas[9][j][1] = 'CUNCO';
   region=9;
   j = j+1;

   if (region != 9) { j=0; }
   Array_Comunas[9][j][0] = '0905';
   Array_Comunas[9][j][1] = 'CURACAUTIN';
   region=9;
   j = j+1;

   if (region != 9) { j=0; }
   Array_Comunas[9][j][0] = '0917';
   Array_Comunas[9][j][1] = 'CURARREHUE';
   region=9;
   j = j+1;

   if (region != 9) { j=0; }
   Array_Comunas[9][j][0] = '0906';
   Array_Comunas[9][j][1] = 'ERCILLA';
   region=9;
   j = j+1;

   if (region != 9) { j=0; }
   Array_Comunas[9][j][0] = '0920';
   Array_Comunas[9][j][1] = 'FREIRE';
   region=9;
   j = j+1;

   if (region != 9) { j=0; }
   Array_Comunas[9][j][0] = '0929';
   Array_Comunas[9][j][1] = 'GALVARINO';
   region=9;
   j = j+1;

   if (region != 9) { j=0; }
   Array_Comunas[9][j][0] = '0922';
   Array_Comunas[9][j][1] = 'GORBEA';
   region=9;
   j = j+1;

   if (region != 9) { j=0; }
   Array_Comunas[9][j][0] = '0912';
   Array_Comunas[9][j][1] = 'LAUTARO';
   region=9;
   j = j+1;

   if (region != 9) { j=0; }
   Array_Comunas[9][j][0] = '0923';
   Array_Comunas[9][j][1] = 'LONCOCHE';
   region=9;
   j = j+1;

   if (region != 9) { j=0; }
   Array_Comunas[9][j][0] = '0904';
   Array_Comunas[9][j][1] = 'LONQUIMAY';
   region=9;
   j = j+1;

   if (region != 9) { j=0; }
   Array_Comunas[9][j][0] = '0911';
   Array_Comunas[9][j][1] = 'LOS SAUCES';
   region=9;
   j = j+1;

   if (region != 9) { j=0; }
   Array_Comunas[9][j][0] = '0909';
   Array_Comunas[9][j][1] = 'LUMACO';
   region=9;
   j = j+1;

   if (region != 9) { j=0; }
   Array_Comunas[9][j][0] = '0916';
   Array_Comunas[9][j][1] = 'MELIPEUCO';
   region=9;
   j = j+1;

   if (region != 9) { j=0; }
   Array_Comunas[9][j][0] = '0928';
   Array_Comunas[9][j][1] = 'NV.IMPERIAL';
   region=9;
   j = j+1;

   if (region != 9) { j=0; }
   Array_Comunas[9][j][0] = '0931';
   Array_Comunas[9][j][1] = 'P.LAS CASAS';
   region=9;
   j = j+1;

   if (region != 9) { j=0; }
   Array_Comunas[9][j][0] = '0913';
   Array_Comunas[9][j][1] = 'PERQUENCO';
   region=9;
   j = j+1;

   if (region != 9) { j=0; }
   Array_Comunas[9][j][0] = '0921';
   Array_Comunas[9][j][1] = 'PITRUFQUEN';
   region=9;
   j = j+1;

   if (region != 9) { j=0; }
   Array_Comunas[9][j][0] = '0918';
   Array_Comunas[9][j][1] = 'PUCON';
   region=9;
   j = j+1;

   if (region != 9) { j=0; }
   Array_Comunas[9][j][0] = '0910';
   Array_Comunas[9][j][1] = 'PUREN';
   region=9;
   j = j+1;

   if (region != 9) { j=0; }
   Array_Comunas[9][j][0] = '0902';
   Array_Comunas[9][j][1] = 'RENAICO';
   region=9;
   j = j+1;

   if (region != 9) { j=0; }
   Array_Comunas[9][j][0] = '0926';
   Array_Comunas[9][j][1] = 'SAAVEDRA';
   region=9;
   j = j+1;

   if (region != 9) { j=0; }
   Array_Comunas[9][j][0] = '0930';
   Array_Comunas[9][j][1] = 'TEMUCO';
   region=9;
   j = j+1;

   if (region != 9) { j=0; }
   Array_Comunas[9][j][0] = '0925';
   Array_Comunas[9][j][1] = 'TEO.SCHMIDT';
   region=9;
   j = j+1;

   if (region != 9) { j=0; }
   Array_Comunas[9][j][0] = '0924';
   Array_Comunas[9][j][1] = 'TOLTEN';
   region=9;
   j = j+1;

   if (region != 9) { j=0; }
   Array_Comunas[9][j][0] = '0908';
   Array_Comunas[9][j][1] = 'TRAIGUEN';
   region=9;
   j = j+1;

   if (region != 9) { j=0; }
   Array_Comunas[9][j][0] = '0907';
   Array_Comunas[9][j][1] = 'VICTORIA';
   region=9;
   j = j+1;

   if (region != 9) { j=0; }
   Array_Comunas[9][j][0] = '0914';
   Array_Comunas[9][j][1] = 'VILCUN';
   region=9;
   j = j+1;

   if (region != 9) { j=0; }
   Array_Comunas[9][j][0] = '0919';
   Array_Comunas[9][j][1] = 'VILLARICA';
   region=9;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '0';
   Array_Comunas[10][j][1] = '(Seleccione Comuna)';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1030';
   Array_Comunas[10][j][1] = 'ANCUD';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1033';
   Array_Comunas[10][j][1] = 'C. DE VELEZ';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1023';
   Array_Comunas[10][j][1] = 'CALBUCO';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1029';
   Array_Comunas[10][j][1] = 'CASTRO';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1039';
   Array_Comunas[10][j][1] = 'CHAITEN';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1036';
   Array_Comunas[10][j][1] = 'CHONCHI';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1022';
   Array_Comunas[10][j][1] = 'COCHAMO';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1010';
   Array_Comunas[10][j][1] = 'CORRAL';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1032';
   Array_Comunas[10][j][1] = 'DALCAHUE';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1017';
   Array_Comunas[10][j][1] = 'ENTRE LAGOS';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1026';
   Array_Comunas[10][j][1] = 'FRESIA';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1028';
   Array_Comunas[10][j][1] = 'FRUTILLAR';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1041';
   Array_Comunas[10][j][1] = 'FUTALEUFU';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1009';
   Array_Comunas[10][j][1] = 'FUTRONO';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1040';
   Array_Comunas[10][j][1] = 'HUALAIHUE';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1002';
   Array_Comunas[10][j][1] = 'LA UNION';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1015';
   Array_Comunas[10][j][1] = 'LAGO RANCO';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1007';
   Array_Comunas[10][j][1] = 'LANCO';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1027';
   Array_Comunas[10][j][1] = 'LLANQUIHUE';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1008';
   Array_Comunas[10][j][1] = 'LOS LAGOS';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1025';
   Array_Comunas[10][j][1] = 'LOS MUERMOS';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1011';
   Array_Comunas[10][j][1] = 'MAFIL';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1006';
   Array_Comunas[10][j][1] = 'MARIQUINA';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1024';
   Array_Comunas[10][j][1] = 'MAULLIN';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1003';
   Array_Comunas[10][j][1] = 'OSORNO';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1013';
   Array_Comunas[10][j][1] = 'PAILLACO';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1042';
   Array_Comunas[10][j][1] = 'PALENA';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1012';
   Array_Comunas[10][j][1] = 'PANGUIPULLI';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1018';
   Array_Comunas[10][j][1] = 'PTO. OCTAY';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1004';
   Array_Comunas[10][j][1] = 'PTO.MONTT';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1005';
   Array_Comunas[10][j][1] = 'PTO.VARAS';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1035';
   Array_Comunas[10][j][1] = 'PUQUELDON';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1019';
   Array_Comunas[10][j][1] = 'PURRANQUE';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1037';
   Array_Comunas[10][j][1] = 'QUEILEN';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1038';
   Array_Comunas[10][j][1] = 'QUELLON';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1031';
   Array_Comunas[10][j][1] = 'QUEMCHI';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1034';
   Array_Comunas[10][j][1] = 'QUINCHAO';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1014';
   Array_Comunas[10][j][1] = 'RIO BUENO';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1020';
   Array_Comunas[10][j][1] = 'RIO NEGRO';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1016';
   Array_Comunas[10][j][1] = 'SAN PABLO';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1021';
   Array_Comunas[10][j][1] = 'SN.J. COSTA';
   region=10;
   j = j+1;

   if (region != 10) { j=0; }
   Array_Comunas[10][j][0] = '1001';
   Array_Comunas[10][j][1] = 'VALDIVIA';
   region=10;
   j = j+1;

   if (region != 11) { j=0; }
   Array_Comunas[11][j][0] = '0';
   Array_Comunas[11][j][1] = '(Seleccione Comuna)';
   region=11;
   j = j+1;

   if (region != 11) { j=0; }
   Array_Comunas[11][j][0] = '1102';
   Array_Comunas[11][j][1] = 'AISEN';
   region=11;
   j = j+1;

   if (region != 11) { j=0; }
   Array_Comunas[11][j][0] = '1106';
   Array_Comunas[11][j][1] = 'CHILE CHICO';
   region=11;
   j = j+1;

   if (region != 11) { j=0; }
   Array_Comunas[11][j][0] = '1104';
   Array_Comunas[11][j][1] = 'CISNES';
   region=11;
   j = j+1;

   if (region != 11) { j=0; }
   Array_Comunas[11][j][0] = '1108';
   Array_Comunas[11][j][1] = 'COCHRANE';
   region=11;
   j = j+1;

   if (region != 11) { j=0; }
   Array_Comunas[11][j][0] = '1101';
   Array_Comunas[11][j][1] = 'COYHAIQUE';
   region=11;
   j = j+1;

   if (region != 11) { j=0; }
   Array_Comunas[11][j][0] = '1105';
   Array_Comunas[11][j][1] = 'GUAITECAS';
   region=11;
   j = j+1;

   if (region != 11) { j=0; }
   Array_Comunas[11][j][0] = '1103';
   Array_Comunas[11][j][1] = 'LAGO VERDE';
   region=11;
   j = j+1;

   if (region != 11) { j=0; }
   Array_Comunas[11][j][0] = '1109';
   Array_Comunas[11][j][1] = 'OHIGGINS';
   region=11;
   j = j+1;

   if (region != 11) { j=0; }
   Array_Comunas[11][j][0] = '1107';
   Array_Comunas[11][j][1] = 'RIO IBAÑEZ';
   region=11;
   j = j+1;

   if (region != 11) { j=0; }
   Array_Comunas[11][j][0] = '1110';
   Array_Comunas[11][j][1] = 'TORTEL';
   region=11;
   j = j+1;

   if (region != 12) { j=0; }
   Array_Comunas[12][j][0] = '0';
   Array_Comunas[12][j][1] = '(Seleccione Comuna)';
   region=12;
   j = j+1;

   if (region != 12) { j=0; }
   Array_Comunas[12][j][0] = '1211';
   Array_Comunas[12][j][1] = 'ANTARTICA';
   region=12;
   j = j+1;

   if (region != 12) { j=0; }
   Array_Comunas[12][j][0] = '1205';
   Array_Comunas[12][j][1] = 'LAG. BLANCA';
   region=12;
   j = j+1;

   if (region != 12) { j=0; }
   Array_Comunas[12][j][0] = '1202';
   Array_Comunas[12][j][1] = 'NATALES';
   region=12;
   j = j+1;

   if (region != 12) { j=0; }
   Array_Comunas[12][j][0] = '1210';
   Array_Comunas[12][j][1] = 'NAVARINO';
   region=12;
   j = j+1;

   if (region != 12) { j=0; }
   Array_Comunas[12][j][0] = '1207';
   Array_Comunas[12][j][1] = 'PORVENIR';
   region=12;
   j = j+1;

   if (region != 12) { j=0; }
   Array_Comunas[12][j][0] = '1208';
   Array_Comunas[12][j][1] = 'PRIMAVERA';
   region=12;
   j = j+1;

   if (region != 12) { j=0; }
   Array_Comunas[12][j][0] = '1201';
   Array_Comunas[12][j][1] = 'PTA.ARENAS';
   region=12;
   j = j+1;

   if (region != 12) { j=0; }
   Array_Comunas[12][j][0] = '1204';
   Array_Comunas[12][j][1] = 'RIO VERDE';
   region=12;
   j = j+1;

   if (region != 12) { j=0; }
   Array_Comunas[12][j][0] = '1206';
   Array_Comunas[12][j][1] = 'SN.GREGORIO';
   region=12;
   j = j+1;

   if (region != 12) { j=0; }
   Array_Comunas[12][j][0] = '1203';
   Array_Comunas[12][j][1] = 'T.DEL PAINE';
   region=12;
   j = j+1;

   if (region != 12) { j=0; }
   Array_Comunas[12][j][0] = '1209';
   Array_Comunas[12][j][1] = 'TIMAUKEL';
   region=12;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '0';
   Array_Comunas[13][j][1] = '(Seleccione Comuna)';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1362';
   Array_Comunas[13][j][1] = 'ALHUE';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1348';
   Array_Comunas[13][j][1] = 'BATUCO';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1333';
   Array_Comunas[13][j][1] = 'BUIN';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1338';
   Array_Comunas[13][j][1] = 'C. DE TANGO';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1352';
   Array_Comunas[13][j][1] = 'C.DEL MAIPO';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1325';
   Array_Comunas[13][j][1] = 'CERRILLOS';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1329';
   Array_Comunas[13][j][1] = 'CERRO NAVIA';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1334';
   Array_Comunas[13][j][1] = 'COLINA';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1308';
   Array_Comunas[13][j][1] = 'CONCHALI';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1340';
   Array_Comunas[13][j][1] = 'CURACAVI';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1321';
   Array_Comunas[13][j][1] = 'EL BOSQUE';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1341';
   Array_Comunas[13][j][1] = 'EL MONTE';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1324';
   Array_Comunas[13][j][1] = 'EST.CENTRAL';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1351';
   Array_Comunas[13][j][1] = 'HOSPITAL';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1304';
   Array_Comunas[13][j][1] = 'HUECHURABA';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1360';
   Array_Comunas[13][j][1] = 'I. DE MAIPO';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1356';
   Array_Comunas[13][j][1] = 'INDEPENDENCIA';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1314';
   Array_Comunas[13][j][1] = 'LA CISTERNA';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1317';
   Array_Comunas[13][j][1] = 'LA FLORIDA';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1315';
   Array_Comunas[13][j][1] = 'LA GRANJA';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1327';
   Array_Comunas[13][j][1] = 'LA PINTANA';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1312';
   Array_Comunas[13][j][1] = 'LA REINA';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1347';
   Array_Comunas[13][j][1] = 'LAMPA';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1310';
   Array_Comunas[13][j][1] = 'LAS CONDES';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1343';
   Array_Comunas[13][j][1] = 'LINDEROS';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1319';
   Array_Comunas[13][j][1] = 'LO BARNECHE';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1323';
   Array_Comunas[13][j][1] = 'LO ESPEJO';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1328';
   Array_Comunas[13][j][1] = 'LO PRADO';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1320';
   Array_Comunas[13][j][1] = 'MACUL';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1337';
   Array_Comunas[13][j][1] = 'MAIPO';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1316';
   Array_Comunas[13][j][1] = 'MAIPU';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1359';
   Array_Comunas[13][j][1] = 'MALLOCO';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1358';
   Array_Comunas[13][j][1] = 'MARIA PINTO';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1339';
   Array_Comunas[13][j][1] = 'MELIPILLA';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1354';
   Array_Comunas[13][j][1] = 'NOS';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1311';
   Array_Comunas[13][j][1] = 'NUNOA';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1342';
   Array_Comunas[13][j][1] = 'P. HURTADO';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1322';
   Array_Comunas[13][j][1] = 'P.A.CERDA';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1346';
   Array_Comunas[13][j][1] = 'PAINE';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1336';
   Array_Comunas[13][j][1] = 'PEÑAFLOR';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1344';
   Array_Comunas[13][j][1] = 'PEÑALOLEN';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1355';
   Array_Comunas[13][j][1] = 'PIRQUE';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1350';
   Array_Comunas[13][j][1] = 'POLPAICO';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1349';
   Array_Comunas[13][j][1] = 'POTRERILLOS';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1309';
   Array_Comunas[13][j][1] = 'PROVIDENCIA';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1326';
   Array_Comunas[13][j][1] = 'PROVINCIA';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1306';
   Array_Comunas[13][j][1] = 'PUDAHUEL';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1331';
   Array_Comunas[13][j][1] = 'PUENTE ALTO';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1305';
   Array_Comunas[13][j][1] = 'QTA. NORMAL';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1332';
   Array_Comunas[13][j][1] = 'QUILICURA';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1302';
   Array_Comunas[13][j][1] = 'RECOLETA';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1307';
   Array_Comunas[13][j][1] = 'RENCA';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1357';
   Array_Comunas[13][j][1] = 'SAN JOAQUIN';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1313';
   Array_Comunas[13][j][1] = 'SAN MIGUEL';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1363';
   Array_Comunas[13][j][1] = 'SAN PEDRO';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1318';
   Array_Comunas[13][j][1] = 'SAN RAMON';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1301';
   Array_Comunas[13][j][1] = 'SANTIAGO';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1330';
   Array_Comunas[13][j][1] = 'SN.BERNARDO';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1353';
   Array_Comunas[13][j][1] = 'SN.J.MAIPO';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1335';
   Array_Comunas[13][j][1] = 'TALAGANTE';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1345';
   Array_Comunas[13][j][1] = 'TIL TIL';
   region=13;
   j = j+1;

   if (region != 13) { j=0; }
   Array_Comunas[13][j][0] = '1303';
   Array_Comunas[13][j][1] = 'VITACURA';
   region=13;
   j = j+1;