Algoritmos y dígitos de control

Hoy tengo el día tonto y no quiero hablar de problemas sino de matemáticas, aunque en el fondo, ¿Qué son las matemáticas sin problemas y los problemas sin matemáticas?

Bueno. Pues me puse a destripar los dígitos de control de la referencia catastral que nos aparece en los recibos del IBI, antes contribución. (El destripado del digito de control del DNI se puede encontrar en Internet con lo que no tenía ninguna gracia dedicarle tiempo).

Con la ayuda de ovc.catastro.meh.es para consultar diferentes parcelas y ver los dígitos calculados he llegado al siguiente algoritmo:

Para el primer digito de control tómese las 7 primeras posiciones de la referencia catastral y el numero de cargo sobre 4 posiciones justificado a la derecha (p. ej. 0027).

Para el segundo digito, tómese la segunda parte de la referencia (posiciones 8 a 14) y las 4 posiciones del cargo.

Remplácese en su caso las letras por números según la siguiente conversión:

A=1, B=2, C=3, D=4, E=5, F=6, G=7, H=8, I=9, J=10, K=11, L=12, M=13, N=14, Ñ=15, O=16, P=17, Q=18, R=19, S=20, T=21, U=22, V=23, W=24, X=25, Y=26 y Z=27

Multipliquese cada digito (o en su caso el valor correspondiente de la letra) por los siguientes valores según su posición:

1º=13, 2º=15, 3º=12, 4º=5, 5º=4, 6º=17, 7º=9, 8º=21, 9º=3, 10º=7, 11º=1

Súmense todos los valores obtenidos y divídase por 23, obteniendo un resto (entre 0 y 22).

Conviertase dicho resto a letra según la siguiente tabla:

0 =M, 1 =Q, 2 =W, 3= E, 4 =R, 5= T, 6 =Y, 7= U, 8= I, 9= O, 10= P, 11= A, 12= S, 13= D, 14= F, 15= G, 16= H, 17= J, 18= K, 19= L, 20= B, 21= Z, 22= X

Y ya lo tenemos. Otro dia me entretendre con alguna otra curiosidad.