Configuraciones Previas,Flujo de prueba,Punto de entrada,Ejemplo de uso
ids
paso01,paso02,paso03,paso04
Totvs custom tabs box items
default
yes
referencia
paso01
Compilar el punto de entrada "F850URET".
Contar con registros de documentos para utilizar en la rutina de Orden de Pago Modelo II. Ejemplo: NF, NCP, NDP
Totvs custom tabs box items
default
no
referencia
paso02
A través de la rutina deOrden de Pago Modelo II(FINA847) que se encuentra en el menú perteneciente al módulo deFinanciero - SIGAFIN(Actualizaciones | Archivos).
Dar clic en el botón “+Pago automático”.
Indicar los parámetros.
En el botón de“Otras acciones”dar clic en opción de“Leyenda”.
Validar que los registros de documentos se muestren según las reglas indicadas en el punto de entrada
Totvs custom tabs box items
default
no
referencia
paso03
Descripción
Permite manipular las reglas de la leyenda.
Programa Fuente:
FINA850.PRX
Función
F850URET
Parámetros
No aplica
Retorno:
Array con regla y la descripción de la leyenda.
Estructura del array:
Posición [1posición]: Reglas.
Posición [2Posición]: Color.
Posición [3Posición]: Descripción de Leyenda
Totvs custom tabs box items
default
no
referencia
paso04
Ejemplo del punto de entrada "F850URET".
Bloco de código
language
java
theme
Midnight
title
F850URET
linenumbers
true
#INCLUDE "PROTHEUS.CH"
User Function F850URET()
Local aRet := {}
aAdd(aRet, {"APROVADO == 'S' .AND. E2_SALDO == E2_VALOR .AND. E2_SALDO > 0 .AND. AllTrim(E2_NATUREZ) == 'EFECTIVO'", "BR_BRANCO","Aprobada con efectivo"})
aAdd(aRet, {"APROVADO == 'S' .AND. E2_SALDO <> E2_VALOR .AND. E2_SALDO > 0 .AND. AllTrim(E2_NATUREZ) == 'EFECTIVO'", "BR_MARROM",,"Baja parcial con efectivo"})
Return aRet
El ejemplo proporcionado del punto de entrada está limitado con la naturaleza en EFECTIVO; esta condición puede ser ajustada por el usuario de acuerdo a su necesidad.
