La función Módulo11() se utiliza para devolver el dígito verificador do Nuestro número en la generación del código de barras y/o instrucciones de cobranzas bancarias (CNAB). La función utiliza un método matemático para devolución del dígito verificador.
Importante
Debido a la particularidad de cada institución bancaria en la generación del dígito verificador, la adecuación y utilización de la función Módulo11() debe ser analizada y encuadrada a la regla de negocio necesaria.
#INCLUDE "protheus.ch"
#INCLUDE "TBICONN.ch"
#INCLUDE "PARMTYPE.ch"
User Function Mod11()
Local cRest := ""
cRest := Modulo11("19" + "00000000001",2, 7)
If !Empty(cRest) .And. cRest == "0" .And. SEE->EE_CODIGO == '237'
cRest := "P"
EndIf
Return cRest