Foros del Web » Programando para Internet » Javascript »

les dejo código para Calcular CURP y RFC

 Estas en el tema de les dejo código para Calcular CURP y RFC en el foro de Javascript en Foros del Web. mucho tiempo busqué incluso aun me llegan notificaciones de un viejo post sobre como calcular la CURP aquí les dejo el código en Javascript que ...
  #1 (permalink)  
Antiguo 04/11/2009, 12:50
Avatar de akela  
Fecha de Ingreso: septiembre-2000
Ubicación: Frente a la compu
Mensajes: 660
Antigüedad: 24 años, 2 meses
Puntos: 2
De acuerdo les dejo código para Calcular CURP y RFC
mucho tiempo busqué incluso aun me llegan notificaciones de un viejo post sobre como calcular la CURP

aquí les dejo el código en Javascript que me encontré y he podido verificar que funciona! no es mio, yo no lo escribí sólo se los comparto.

saludos.

(les dejo el código en dos partes porque al parecer no cabe :P)


Código: 
function obtieneRFC(forma, pstRFC){
		with (forma) {
			var fecha = dsFechaNac.value;
			var sexo = idSexo.value;
			var estado = idEstadoNac.value;
			var nombre = dsNombre.value;
			var paterno = dsPaterno.value;
			var materno = dsMaterno.value;	
		}
		
		fecha = fecha.substring(6)+"-"+fecha.substring(3,5)+"-"+fecha.substring(0,2);
		
		if (sexo == 1){
			sexo = "H";
		} 
		if (sexo == 2){
			sexo = "M";
		}
		switch (estado){
			case "1":
			estado = "AS";
			break;
			case "2":
			estado = "BC";
			break;
			case "3":
			estado = "BS";
			break;
			case "4":
			estado = "CC";
			break;
			case "5":
			estado = "CS";
			break;
			case "6":
			estado = "CH";
			break;
			case "7":
			estado = "CL";
			break;
			case "8":
			estado = "CM";
			break;
			case "9":
			estado = "DF";
			break;
			case "10":
			estado = "DG";
			break;
			case "11":
			estado = "GT";
			break;
			case "12":
			estado = "GR";
			break;
			case "13":
			estado = "HG";
			break;
			case "14":
			estado = "JC";
			break;
			case "15":
			estado = "MC";
			break;
			case "16":
			estado = "MN";
			break;
			case "17":
			estado = "MS";
			break;
			case "18":
			estado = "NT";
			break;
			case "19":
			estado = "NL";
			break;
			case "20":
			estado = "OC";
			break;
			case "21":
			estado = "PL";
			break;
			case "22":
			estado = "QT";
			break;
			case "23":
			estado = "QR";
			break;
			case "24":
			estado = "SP";
			break;
			case "25":
			estado = "SL";
			break;
			case "26":
			estado = "SR";
			break;
			case "27":
			estado = "TC";
			break;
			case "28":
			estado = "TS";
			break;
			case "29":
			estado = "TL";
			break;
			case "30":
			estado = "VZ";
			break;
			
			
		}
		pstRFC.value = fnCalculaCURP( nombre, paterno, materno, fecha, sexo, estado ).substring(0,10);
	}
function obtieneCURP(forma, pstCURP){
		with (forma) {
			var fecha = dsFechaNac.value;
			var sexo = idSexo.value;
			var estado = idEstadoNac.value;
			var nombre = dsNombre.value;
			var paterno = dsPaterno.value;
			var materno = dsMaterno.value;	
		}
		
		fecha = fecha.substring(6)+"-"+fecha.substring(3,5)+"-"+fecha.substring(0,2);
		
		if (sexo == 1){
			sexo = "H";
		} 
		if (sexo == 2){
			sexo = "M";
		}
		switch (estado){
			case "1":
			estado = "AS";
			break;
			case "2":
			estado = "BC";
			break;
			case "3":
			estado = "BS";
			break;
			case "4":
			estado = "CC";
			break;
			case "5":
			estado = "CS";
			break;
			case "6":
			estado = "CH";
			break;
			case "7":
			estado = "CL";
			break;
			case "8":
			estado = "CM";
			break;
			case "9":
			estado = "DF";
			break;
			case "10":
			estado = "DG";
			break;
			case "11":
			estado = "GT";
			break;
			case "12":
			estado = "GR";
			break;
			case "13":
			estado = "HG";
			break;
			case "14":
			estado = "JC";
			break;
			case "15":
			estado = "MC";
			break;
			case "16":
			estado = "MN";
			break;
			case "17":
			estado = "MS";
			break;
			case "18":
			estado = "NT";
			break;
			case "19":
			estado = "NL";
			break;
			case "20":
			estado = "OC";
			break;
			case "21":
			estado = "PL";
			break;
			case "22":
			estado = "QT";
			break;
			case "23":
			estado = "QR";
			break;
			case "24":
			estado = "SP";
			break;
			case "25":
			estado = "SL";
			break;
			case "26":
			estado = "SR";
			break;
			case "27":
			estado = "TC";
			break;
			case "28":
			estado = "TS";
			break;
			case "29":
			estado = "TL";
			break;
			case "30":
			estado = "VZ";
			break;
			
			
		}
		pstCURP.value = fnCalculaCURP( nombre, paterno, materno, fecha, sexo, estado );
	}
	
function fnCalculaCURP( pstNombre, pstPaterno, pstMaterno, dfecha, pstSexo, pnuCveEntidad ) {  
/*
pstNombre="MARIA TERESITA DEL NIÑO JESUS";
pstPaterno="AGUERREBERE";
pstMaterno="BARROSO";
dfecha="1937-11-22";
pstSexo = "M";
pnuCveEntidad ="DF";

pstNombre="ROCIO";
pstPaterno="URIBARREN";
pstMaterno="AGUERREBERE";
dfecha="1969-02-03";
pstSexo = "M";
pnuCveEntidad ="DF";


pstNombre="AINHOA";
pstPaterno="ESTURAU";
pstMaterno="URIBARREN";
dfecha="2003-03-05";
pstSexo = "M";
pnuCveEntidad ="QR";




pstNombre="MARIO";
pstPaterno="PIÑA";
pstMaterno="FLORES";
dfecha="1968-03-30";
pstSexo = "H";
pnuCveEntidad ="DF";
*/

pstCURP   ="";
pstDigVer ="";
contador  =0;
contador1 =0;
pstCom	  ="";
numVer    =0.00;
valor     =0;
sumatoria =0;



// se declaran las varibale que se van a utilizar para ontener la CURP

NOMBRES  ="";
APATERNO ="";
AMATERNO ="";
T_NOMTOT ="";
NOMBRE1  =""; //PRIMER NOMBRE
NOMBRE2  =""; //DEMAS NOMBRES
NOMBRES_LONGITUD =0; //LONGITUD DE TODOS @NOMBRES
var NOMBRE1_LONGITUD =0; //LONGITUD DEL PRIMER NOMBRE(MAS UNO,EL QUE SOBRA ES UN ESPACIO EN BLANCO)
APATERNO1 =""; //PRIMER NOMBRE
APATERNO2 =""; //DEMAS NOMBRES
APATERNO_LONGITUD =0; //LONGITUD DE TODOS @NOMBRES
APATERNO1_LONGITUD =0; //LONGITUD DEL PRIMER NOMBRE(MAS UNO,EL QUE SOBRA ES UN ESPACIO EN BLANCO)
AMATERNO1 =""; //PRIMER NOMBRE
AMATERNO2 =""; //DEMAS NOMBRES
AMATERNO_LONGITUD =0; //LONGITUD DE TODOS @NOMBRES
AMATERNO1_LONGITUD =0; //LONGITUD DEL PRIMER NOMBRE(MAS UNO,EL QUE SOBRA ES UN ESPACIO EN BLANCO)
VARLOOPS =0; //VARIABLE PARA LOS LOOPS, SE INICIALIZA AL INICIR UN LOOP


// Se inicializan las variables para obtener la primera parte de la CURP


NOMBRES  = pstNombre.replace(/^\s+|\s+$/g,"");
APATERNO = pstPaterno.replace(/^\s+|\s+$/g,"");
AMATERNO = pstMaterno.replace(/^\s+|\s+$/g,"");

T_NOMTOT = APATERNO + ' '+ AMATERNO + ' '+ NOMBRES;



// Se procesan los nombres de pila


VARLOOPS = 0;

while (VARLOOPS != 1)
	{

		NOMBRES_LONGITUD = NOMBRES.length

		var splitNombres = NOMBRES.split(" ");
		var splitNombre1 = splitNombres[0];
		
		NOMBRE1_LONGITUD = splitNombre1.length;
//		NOMBRE1_LONGITUD = PATINDEX('% %',@NOMBRES)

		if (NOMBRE1_LONGITUD = 0)
		   {
		    NOMBRE1_LONGITUD = NOMBRES_LONGITUD;
		   }
		    NOMBRE1 =  NOMBRES.substring(0,splitNombre1.length);
		    NOMBRE2 =  NOMBRES.substring(splitNombre1.length + 1, NOMBRES.length);


// Se quitan los nombres de JOSE, MARIA,MA,MA.
/*
if (NOMBRE1 IN ('JOSE','MARIA','MA.','MA','DE','LA','LAS','MC','VON','DEL','LOS','Y','MAC','VAN') && NOMBRE2 != '')
{
		NOMBRES = NOMBRE2
}
else
{
		VARLOOPS = 1
}
*/

if (NOMBRE1 == 'JOSE' && NOMBRE2 != '')
{
		NOMBRES = NOMBRE2;
}
else
{
		VARLOOPS = 1;
}

if (NOMBRE1 == 'MARIA' && NOMBRE2 != '')
{
		NOMBRES = NOMBRE2;
}
else
{
		VARLOOPS = 1;
}

if (NOMBRE1 == 'MA.' && NOMBRE2 != '')
{
		NOMBRES = NOMBRE2;
}
else
{
		VARLOOPS = 1;
}

if (NOMBRE1 == 'MA' && NOMBRE2 != '')
{
		NOMBRES = NOMBRE2;
}
else
{
		VARLOOPS = 1;
}

if (NOMBRE1 == 'DE' && NOMBRE2 != '')
{
		NOMBRES = NOMBRE2;
}
else
{
		VARLOOPS = 1;
}

if (NOMBRE1 == 'LA' && NOMBRE2 != '')
{
		NOMBRES = NOMBRE2;
}
else
{
		VARLOOPS = 1;
}

if (NOMBRE1 == 'LAS' && NOMBRE2 != '')
{
		NOMBRES = NOMBRE2;
}
else
{
		VARLOOPS = 1;
}


if (NOMBRE1 == 'MC' && NOMBRE2 != '')
{
		NOMBRES = NOMBRE2;
}
else
{
		VARLOOPS = 1;
}

if (NOMBRE1 == 'VON' && NOMBRE2 != '')
{
		NOMBRES = NOMBRE2;
}
else
{
		VARLOOPS = 1;
}


if (NOMBRE1 == 'DEL' && NOMBRE2 != '')
{
		NOMBRES = NOMBRE2;
}
else
{
		VARLOOPS = 1;
}


if (NOMBRE1 == 'LOS' && NOMBRE2 != '')
{
		NOMBRES = NOMBRE2;
}
else
{
		VARLOOPS = 1;
}

if (NOMBRE1 == 'Y' && NOMBRE2 != '')
{
		NOMBRES = NOMBRE2;
}
else
{
		VARLOOPS = 1;
}

if (NOMBRE1 == 'MAC' && NOMBRE2 != '')
{
		NOMBRES = NOMBRE2;
}
else
{
		VARLOOPS = 1;
}

if (NOMBRE1 == 'VAN' && NOMBRE2 != '')
{
		NOMBRES = NOMBRE2;
}
else
{
		VARLOOPS = 1;
}

} // fin varloops <> 1


// Se procesan los APELLIDOS, PATERNO EN UN LOOP

VARLOOPS = 0;

while (VARLOOPS != 1)
{

		//SET @APATERNO_LONGITUD = LEN(@APATERNO)
		APATERNO_LONGITUD = APATERNO.length;		
		
		//SET @APATERNO1_LONGITUD = PATINDEX('% %',@APATERNO)
		var splitPaterno = APATERNO.split(" ");
		var splitPaterno1 = splitPaterno[0];
		APATERNO1_LONGITUD = splitPaterno1.length;

		if (APATERNO1_LONGITUD = 0)
		   {
		     APATERNO1_LONGITUD = APATERNO_LONGITUD;
		   }
//		APATERNO1 = RTRIM(LEFT(@APATERNO,@APATERNO1_LONGITUD))
//		APATERNO2 = LTRIM(RIGHT(@APATERNO,@APATERNO_LONGITUD - @APATERNO1_LONGITUD))

		APATERNO1 =  APATERNO.substring(0,splitPaterno1.length);
		APATERNO2 =  APATERNO.substring(splitPaterno1.length + 1, APATERNO.length);
__________________
Si quieres que las cosas sucédan

provocalas!
  #2 (permalink)  
Antiguo 04/11/2009, 12:51
Avatar de akela  
Fecha de Ingreso: septiembre-2000
Ubicación: Frente a la compu
Mensajes: 660
Antigüedad: 24 años, 2 meses
Puntos: 2
Respuesta: les dejo código para Calcular CURP y RFC
Continuación del código

Código: 
// Se quitan los sufijos

/*
IF @APATERNO1 IN ('DE','LA','LAS','MC','VON','DEL','LOS','Y','MAC','VAN') AND @APATERNO2 <> ''
	BEGIN
		SET @APATERNO = @APATERNO2
	END 
ELSE
	BEGIN
		SET @VARLOOPS = 1
	END
}
*/

if ( APATERNO1 == 'DE' && APATERNO2 != '')
	{
		APATERNO = APATERNO2;
	}
else
	{
		VARLOOPS = 1;
	}


if ( APATERNO1 == 'LA' && APATERNO2 != '')
	{
		APATERNO = APATERNO2;
	}
else
	{
		VARLOOPS = 1;
	}



if ( APATERNO1 == 'LAS' && APATERNO2 != '')
	{
		APATERNO = APATERNO2;
	}
else
	{
		VARLOOPS = 1;
	}

if ( APATERNO1 == 'MC' && APATERNO2 != '')
	{
		APATERNO = APATERNO2;
	}
else
	{
		VARLOOPS = 1;
	}

if ( APATERNO1 == 'VON' && APATERNO2 != '')
	{
		APATERNO = APATERNO2;
	}
else
	{
		VARLOOPS = 1;
	}

if ( APATERNO1 == 'DEL' && APATERNO2 != '')
	{
		APATERNO = APATERNO2;
	}
else
	{
		VARLOOPS = 1;
	}


if ( APATERNO1 == 'LOS' && APATERNO2 != '')
	{
		APATERNO = APATERNO2;
	}
else
	{
		VARLOOPS = 1;
	}

if ( APATERNO1 == 'Y' && APATERNO2 != '')
	{
		APATERNO = APATERNO2;
	}
else
	{
		VARLOOPS = 1;
	}

if ( APATERNO1 == 'MAC' && APATERNO2 != '')
	{
		APATERNO = APATERNO2;
	}
else
	{
		VARLOOPS = 1;
	}

if ( APATERNO1 == 'VAN' && APATERNO2 != '')
	{
		APATERNO = APATERNO2;
	}
else
	{
		VARLOOPS = 1;
	}

} // fin varloops


// Faltan: )


// Se procesan los APELLIDOS, MATERNO EN UN LOOP

VARLOOPS = 0;

while (VARLOOPS != 1)
{

		//SET @APATERNO_LONGITUD = LEN(@APATERNO)
		AMATERNO_LONGITUD = AMATERNO.length;		
		
		//SET @APATERNO1_LONGITUD = PATINDEX('% %',@APATERNO)
		var splitMaterno = AMATERNO.split(" ");
		var splitMaterno1 = splitMaterno[0];
		AMATERNO1_LONGITUD = splitMaterno1.length;

		if (AMATERNO1_LONGITUD = 0)
		   {
		     AMATERNO1_LONGITUD = AMATERNO_LONGITUD;
		   }

		AMATERNO1 =  AMATERNO.substring(0,splitMaterno1.length);
		AMATERNO2 =  AMATERNO.substring(splitMaterno1.length + 1, AMATERNO.length);

// Se quitan los sufijos


/*
IF @APATERNO1 IN ('DE','LA','LAS','MC','VON','DEL','LOS','Y','MAC','VAN') AND @APATERNO2 <> ''
	BEGIN
		SET @APATERNO = @APATERNO2
	END 
ELSE
	BEGIN
		SET @VARLOOPS = 1
	END
}
*/

if ( AMATERNO1 == 'DE' && AMATERNO2 != '')
	{
		AMATERNO = AMATERNO2;
	}
else
	{
		VARLOOPS = 1;
	}


if ( AMATERNO1 == 'LA' && AMATERNO2 != '')
	{
		AMATERNO = AMATERNO2;
	}
else
	{
		VARLOOPS = 1;
	}


if ( AMATERNO1 == 'LAS' && AMATERNO2 != '')
	{
		AMATERNO = AMATERNO2;
	}
else
	{
		VARLOOPS = 1;
	}

if ( AMATERNO1 == 'MC' && AMATERNO2 != '')
	{
		AMATERNO = AMATERNO2;
	}
else
	{
		VARLOOPS = 1;
	}

if ( AMATERNO1 == 'VON' && AMATERNO2 != '')
	{
		AMATERNO = AMATERNO2;
	}
else
	{
		VARLOOPS = 1;
	}

if ( AMATERNO1 == 'DEL' && AMATERNO2 != '')
	{
		AMATERNO = AMATERNO2;
	}
else
	{
		VARLOOPS = 1;
	}

if ( AMATERNO1 == 'LOS' && AMATERNO2 != '')
	{
		AMATERNO = AMATERNO2;
	}
else
	{
		VARLOOPS = 1;
	}

if ( AMATERNO1 == 'Y' && AMATERNO2 != '')
	{
		AMATERNO = AMATERNO2;
	}
else
	{
		VARLOOPS = 1;
	}

if ( AMATERNO1 == 'MAC' && AMATERNO2 != '')
	{
		AMATERNO = AMATERNO2;
	}
else
	{
		VARLOOPS = 1;
	}

if ( AMATERNO1 == 'VAN' && AMATERNO2 != '')
	{
		AMATERNO = AMATERNO2;
	}
else
	{
		VARLOOPS = 1;
	}



} // fin varloops




// Se obtiene del primer apellido la primer letra y la primer vocal interna

pstCURP = APATERNO1.substring(0,1);

APATERNO1_LONGITUD= APATERNO1.length;
VARLOOPS = 0 // EMPIEZA EN UNO POR LA PRIMERA LETRA SE LA VA A SALTAR

while (APATERNO1_LONGITUD > VARLOOPS)
	{
		VARLOOPS = VARLOOPS + 1;

		// if SUBSTRING(@APATERNO1,@VARLOOPS,1) IN ('A','E','I','O','U')
		var compara = APATERNO1.substr(parseInt(VARLOOPS),1);

		if (compara == 'A')
		   {
			pstCURP = pstCURP + compara;
			VARLOOPS = APATERNO1_LONGITUD;
		   }
		if (compara == 'E')
		   {
			pstCURP = pstCURP + compara;
			VARLOOPS = APATERNO1_LONGITUD;
		   }
		if (compara == 'I')
		   {
			pstCURP = pstCURP + compara;
			VARLOOPS = APATERNO1_LONGITUD;
		   }
		if (compara == 'O')
		   {
			pstCURP = pstCURP + compara;
			VARLOOPS = APATERNO1_LONGITUD;
		   }
		if (compara == 'U')
		   {
		   
			pstCURP = pstCURP + compara;
			VARLOOPS = APATERNO1_LONGITUD;
		   }

	}




// Se obtiene la primer letra del apellido materno 

pstCURP = pstCURP + AMATERNO1.substring(0,1);

// Se le agrega la primer letra del nombre

pstCURP = pstCURP + NOMBRES.substring(0,1);



// Se agrega la fecha de nacimiento, clave del sexo y clave de la entidad

var splitFecha = dfecha.split("-");
var splitAnio  = splitFecha[0].substr(2,2);
var splitMes   = splitFecha[1];
var splitDia   = splitFecha[2];


pstCURP = pstCURP + splitAnio + splitMes + splitDia + pstSexo + pnuCveEntidad



// Se obtiene la primera consonante interna del apellido paterno


VARLOOPS = 0;

while (splitPaterno1.length > VARLOOPS)
      {
	VARLOOPS = VARLOOPS + 1
	var compara = APATERNO1.substr(parseInt(VARLOOPS),1);

	if (compara != 'A' && compara != 'E' && compara != 'I' && compara != 'O' && compara != 'U')
	   {
	    if ( compara == 'Ñ')
		{
	    	 pstCURP = pstCURP + 'X';
		}
	    else
		{
		 pstCURP = pstCURP + compara;
		}

	    VARLOOPS = splitPaterno1.length;
	   }
      }


// Se obtiene la primera consonante interna del apellido materno

VARLOOPS = 0;

while (splitMaterno1.length > VARLOOPS)
      {

	VARLOOPS = VARLOOPS + 1;
	var compara = AMATERNO1.substr(parseInt(VARLOOPS),1);

	if (compara != 'A' && compara != 'E' && compara != 'I' && compara != 'O' && compara != 'U')
	   {
	    if ( compara == 'Ñ')
		{	    
		 pstCURP = pstCURP + 'X';
		}
            else
		{
		 pstCURP = pstCURP + compara;
		}
		
	    VARLOOPS = splitMaterno1.length;
	   }
      }


// Se obtiene la primera consonante interna del nombre

VARLOOPS = 0;

while (splitNombre1.length > VARLOOPS)
      {

	VARLOOPS = VARLOOPS + 1;
	var compara = NOMBRE1.substr(parseInt(VARLOOPS),1);

	if (compara != 'A' && compara != 'E' && compara != 'I' && compara != 'O' && compara != 'U')
	   {
	    if (compara=='Ñ')	    
		{
		 pstCURP = pstCURP + 'X';
		}
	    else
		{
		 pstCURP = pstCURP + compara;
		}

	    VARLOOPS = splitNombre1.length;
	   }
      }


// Se obtiene el digito verificador



var contador = 18;
var contador1 = 0;
var valor = 0;
var sumatoria = 0;


while (contador1 <= 15)
	{

        //pstCom = SUBSTRING(@pstCURP,@contador1,1)
	var pstCom = pstCURP.substr(parseInt(contador1),1);
     
		if (pstCom == '0') 
			{
			 valor = 0 * contador ;
			}
		if (pstCom == '1') 
			{
			 valor = 1 * contador;
			}
		if (pstCom == '2') 
			{
			 valor = 2 * contador;
			}
		if (pstCom == '3') 
			{
			 valor = 3 * contador;
			}
		if (pstCom == '4') 
			{
			 valor = 4 * contador;
			}
		if (pstCom == '5') 
			{
			 valor = 5 * contador;
			}
		if (pstCom == '6') 
			{
			 valor = 6 * contador;
			}
		if (pstCom == '7') 
			{
			 valor = 7 * contador;
			}
		if (pstCom == '8') 
			{
			 valor = 8 * contador;
			}
		if (pstCom == '9') 
			{
			 valor = 9 * contador;
			}
		if (pstCom == 'A') 
			{
			 valor = 10 * contador;
			}
		if (pstCom == 'B') 
			{
			 valor = 11 * contador;
			}
		if (pstCom == 'C') 
			{
			 valor = 12 * contador;
			}
		if (pstCom == 'D') 
			{
			 valor = 13 * contador;
			}
		if (pstCom == 'E') 
			{
			 valor = 14 * contador;
			}
		if (pstCom == 'F') 
			{
			 valor = 15 * contador;
			}
		if (pstCom == 'G') 
			{
			 valor = 16 * contador;
			}
		if (pstCom == 'H') 
			{
			 valor = 17 * contador;
			}
		if (pstCom == 'I') 
			{
			 valor = 18 * contador;
			}
		if (pstCom == 'J') 
			{
			 valor = 19 * contador;
			}
		if (pstCom == 'K') 
			{
			 valor = 20 * contador;
			}
		if (pstCom == 'L') 
			{
			 valor = 21 * contador;
			}
		if (pstCom == 'M') 
			{
			 valor = 22 * contador;
			}
		if (pstCom == 'N') 
			{
			 valor = 23 * contador;
			}
		if (pstCom == 'Ñ') 
			{
			 valor = 24 * contador;
			}
		if (pstCom == 'O') 
			{
			 valor = 25 * contador;
			}
		if (pstCom == 'P') 
			{
			 valor = 26 * contador;
			}
		if (pstCom == 'Q') 
			{
			 valor = 27 * contador;
			}
		if (pstCom == 'R') 
			{
			 valor = 28 * contador;
			}
		if (pstCom == 'S') 
			{
			 valor = 29 * contador;
			}
		if (pstCom == 'T') 
			{
			 valor = 30 * contador;
			}
		if (pstCom == 'U') 
			{
			 valor = 31 * contador;
			}
		if (pstCom == 'V') 
			{
			 valor = 32 * contador;
			}
		if (pstCom == 'W') 
			{
			 valor = 33 * contador;
			}
		if (pstCom == 'X') 
			{
			 valor = 34 * contador;
			}
		if (pstCom == 'Y') 
			{
			 valor = 35 * contador;
			}

		if (pstCom == 'Z') 
			{
 			 valor = 36 * contador;
			}

		contador  = contador - 1;
		contador1 = contador1 + 1;
		sumatoria = sumatoria + valor;

	}

numVer  = sumatoria % 10;
numVer  = Math.abs(10 - numVer);
anio = splitFecha[0];


if (numVer == 10)
	{
	 numVer = 0;
	}


if (anio < 2000)
	{
	 pstDigVer = '0' + '' + numVer;
	}
if (anio >= 2000)
	{
	 pstDigVer = 'A' + '' + numVer;
	}

pstCURP = pstCURP + pstDigVer;


	return pstCURP
} // End if
__________________
Si quieres que las cosas sucédan

provocalas!
  #3 (permalink)  
Antiguo 26/03/2011, 14:58
Avatar de danielugalde  
Fecha de Ingreso: marzo-2011
Ubicación: mexico
Mensajes: 45
Antigüedad: 13 años, 8 meses
Puntos: 3
Respuesta: les dejo código para Calcular CURP y RFC
Ok i como sabes que funciona ??
  #4 (permalink)  
Antiguo 12/06/2015, 10:46
Avatar de emilio_viguri  
Fecha de Ingreso: junio-2011
Ubicación: Mexico
Mensajes: 117
Antigüedad: 13 años, 5 meses
Puntos: 3
Pregunta Respuesta: les dejo código para Calcular CURP y RFC
pero como lo echas andar falta de donde toma los parámetros...

como vez pues lo principiante sale a flote
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta


« Tema Anterior | Próximo Tema »


La zona horaria es GMT -6. Ahora son las 18:41.