Contexto del PEArgumentos y contexto de ejecución no confirmados. No suponga que PARAMIXB contenga un array de títulos, importes o vencimientos; la estructura del ejemplo se creó exclusivamente para el ejercicio.
Guía AdvPLF060CPM()Permite tratar el cálculo del plazo medio en FINA060/FINA061. Ejemplo independiente de media ponderada y criterios para validar la integración.
El índice oficial Financeiro P12 asocia F060CPM a FINA060/FINA061 para calcular el plazo medio; la ficha específica sigue en construcción. (TOTVS, s.f., ref. 1) La documentación funcional sitúa estas rutinas en la generación y mantenimiento de borderós, incluidas opciones de transmisión por API. (TOTVS, 2023, ref. 2) Ese contexto no determina cuándo se ejecuta el PE ni qué recibe. F060CPM() identifica el punto de entrada; la llamada completa, el formato de PARAMIXB y el retorno no se confirmaron en las fuentes públicas localizadas. El ejemplo siguiente es un ejercicio editorial independiente: muestra una posible media ponderada por importe, sin afirmar que sea la fórmula de Protheus. Contenido en revisión, basado en evidencia indexada con acceso integral limitado.
F060CPM()Contexto del PEArgumentos y contexto de ejecución no confirmados. No suponga que PARAMIXB contenga un array de títulos, importes o vencimientos; la estructura del ejemplo se creó exclusivamente para el ejercicio.
Tipo, unidad y uso del retorno del PE no confirmados. El ejemplo no implementa F060CPM ni define el retorno requerido por el llamador.
#Include "Protheus.ch"
User Function ExF060CPM()
Local aCasos := {{1000, 30}, {3000, 60}}
Local nIndice := 0
Local nImporteTotal := 0
Local nTotalPonderado := 0
Local nPlazoMedio := Nil
// Cada fila del ejercicio contiene {importe ficticio, plazo en días}.
// El formato no representa PARAMIXB ni la fórmula del estándar.
For nIndice := 1 To Len(aCasos)
nImporteTotal += aCasos[nIndice][1]
nTotalPonderado += aCasos[nIndice][1] * aCasos[nIndice][2]
Next nIndice
// Sin una base positiva, cero no se trata como plazo calculado.
If nImporteTotal > 0
nPlazoMedio := nTotalPonderado / nImporteTotal
ConOut("Plazo medio del ejercicio: " + AllTrim(Str(nPlazoMedio, 10, 2)))
EndIf
Return
El conjunto ficticio resulta en 52,5 días: (1000 × 30 + 3000 × 60) ÷ 4000. La media simple sería 45 días; la diferencia ayuda a identificar hipótesis de ponderación distintas. El ejemplo no usa fechas reales, no graba borderós y no se ha 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.