PARAMIXBEl registro histórico no proporciona aquí una estructura completa de PARAMIXB. Compruebe la llamada efectiva antes de leer posiciones, usar aliases o considerar el mínimo recibido como argumento formal.
Guía AdvPLF040MIRF()Trata el importe mínimo de IRRF. Referencias de Financeiro P12, contexto histórico de FINA040 y plan de pruebas de frontera.
El índice oficial relaciona F040MIRF con MATXATU/FINXFIN para tratar el importe mínimo de IRRF, pero la ficha específica está en construcción. (TOTVS, s.f., ref. 2) El inventario histórico ya registrado en este sitio sitúa una llamada en F040CalcIr, dentro del flujo de FINA040 del 26/08/2019. (TOTVS, 2019, ref. 1) Son alcances documentales distintos: esa ubicación histórica no demuestra el contrato de FINXFIN en un release actual. F040MIRF() identifica el PE sin afirmar una lista completa de argumentos. La estructura de PARAMIXB y el uso del retorno requieren confirmación en el entorno utilizado. La investigación actual utilizó evidencia indexada; el acceso integral a la documentación pública fue limitado. La revisión editorial no equivale a validación en Protheus.
F040MIRF()PARAMIXBEl registro histórico no proporciona aquí una estructura completa de PARAMIXB. Compruebe la llamada efectiva antes de leer posiciones, usar aliases o considerar el mínimo recibido como argumento formal.
El inventario de 2019 describe un valor compatible con el mínimo de retención. Esto no confirma el tipo aceptado, la unidad, la precisión o el tratamiento de Nil en el FINXFIN actual. No use el retorno del ejemplo auxiliar como implementación de este PE.
#Include "Protheus.ch"
User Function ExMIRFLim()
Local nLimitePrueba := 10
Local aValores := {9.99, 10, 10.01}
Local nIndice := 0
Local cRelacion := ""
// Valores ficticios: el auxiliar no define limites legales ni reglas fiscales.
// Su nombre distinto evita sustituir F040MIRF en el RPO.
For nIndice := 1 To Len(aValores)
Do Case
Case aValores[nIndice] < nLimitePrueba
cRelacion := "debajo"
Case aValores[nIndice] == nLimitePrueba
cRelacion := "igual"
Otherwise
cRelacion := "encima"
EndCase
ConOut("Caso de prueba: " + cRelacion)
Next nIndice
Return
El auxiliar deberá registrar debajo, igual y encima, en ese orden. Solo organiza casos de frontera; no calcula IRRF ni determina si el límite es inclusivo. Use estos grupos al comparar el procesamiento estándar con la regla personalizada en pruebas. Ejemplo no compilado ni ejecutado en Protheus.
Desarrollado con Usina Docs · Alpha
© 2026 Usina.BR. Todos los derechos reservados. TOTVS, Protheus, Microsiga y sus respectivos logotipos son marcas de sus titulares. Guía AdvPL es independiente y utiliza citas limitadas, atribuidas y justificadas por fines educativos. Consulta los Términos de Uso. Términos de Uso
Comentarios
Todavía no hay comentarios aprobados.
Inicia sesión con Google o Microsoft para comentar.