Procedimiento Calculo RFC

[amerika111]

ok lo probare para el nombre y fecha de nacimiento... gracias..

[amerika111]

Lo he probado pero sigo sin poder sacar la homoclave final... he checado el de sql pero no he logrado pasarlo a firebird

[roman]

Hola,

Hay una pequeña errata en el cálculo de la homonimia que puse anteriormente, quizá por ello no te sale...

El paso 3 dice:

3. Esta cadena se recorre de izquierda a derecha desde el primero hasta el penúltimo caracter. En la iteración i-ésima se multiplican los dígitos i e i+1.

Se suman todos los productos. En el ejemplo queda: 4756

En realidad, en cada iteración, lo que debe multiplicarse es el número formado por los dígitos i e i+1 por el dígito i. En pseudo-código:

FOR I := 1 TO LONGITUD(CADENA) - 1
  SUMA := SUMA + CADENA[i]CADENA[I+1] * CADENA[I+1];

// Saludos