FileMaker - Formula para la letra del DNI

Hola, por favor alguien me puede facilitar la formula correcta para obtener la letra del DNI cuando se meta en un campo los digitos de dicho DNI
y lo mismo con el INE (numero de identificación de extranjeros)
Gracias.

Esta es sólo para CIF/NIF:


Let (
[ letters = Filter ( codigoFiscal ; "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz" ) ; numbers = Filter ( codigoFiscal ; "0123456789" ) ] ;

Case ( IsEmpty ( letters ) and not IsEmpty ( numbers ) ;
numbers & "-" & Middle ( "TRWAGMYFPDXBNJZSQVHLCKE" ; Mod ( codigoFiscal ; 23 ) + 1 ; 1 ) ;
Length ( letters ) = 1 and Right ( codigoFiscal ; 1 ) = letters ;
Upper ( numbers & "-" & letters ) ;
Length ( letters ) = 1 and Left ( codigoFiscal ; 1 ) = letters ;
Upper ( letters & "-" & numbers ) ;
Length ( letters ) = 2 and Left ( codigoFiscal ; 1 ) = Left ( letters ; 1 ) and Right ( codigoFiscal ; 1 ) = Right ( letters ; 1 ) ;
Upper ( Left ( letters ; 1 ) & "-" & numbers & "-" & Right ( letters ; 1 ) ) ;
Upper ( codigoFiscal )
))

se me pasó decir que codigofiscal es el campo donde se introducen los numeros. Yo hice una función personalizada donde el parámetro es codigofiscal.

Muchas gracias Juan, esto me quitará trabajo de encima.

Con esta simple rutina partiendo del campo DNI obtienes la letra.
No es tan compleja como la anterior, pero funciona.

Middle("TRWAGMYFPDXBNJZSQVHLCKET"; (DNI - (Int(D.N.I. / 23)*23))+1; 1)

Saludos
LA

Gracias LA, una formula sencilla y util.