Servicio para obtener las configuraciones iniciales
FINANCIAL-TITLES.CONTROLLER.TLPP
Controlador para obtener los títulos financieros
FINANCIAL-TITLES.SERVICE.TLPP
Servicio para obtener los títulos financieros
País:
Todos
Ticket:
N/A
Requisito/Story/Issue (informe el requisito vinculado):
DMINA-23387
02. DESCRIPCIÓN
Se requiere habilitar el punto de entrada F998VALBX el cual tiene el objetivo de habilitar la opción de "Descuento por pronto pago" en la ventana "Edición de cobro" y realizar un descuento al título seleccionado por un porciento (%).
03. INFORMACIÓN ADICIONAL
Se realizan cambios en los siguientes fuentes:
Aplicativo de TOTVS Recibo (FINA998.PRW Y FINA998A.TLPP) habilitando el endpoint para obtener las configuraciones determinadas en el PE "Descuento por pronto pago" (F998VALBX) y aplicar la lógica matemática para realizar los descuentos.
Servicio para configuraciones iniciales (GETCONTENTINI.SERVICE.TLPP) se habilita una bandera para habilitar o deshabilitar la opción "Descuento por pronto pago" cuando se desea realizar la "Edición de cobro" a un título.
Controlador y servicio para obtener los títulos financieros (FINANCIAL-TITLES.CONTROLLER.TLPP y FINANCIAL-TITLES.SERVICE.TLPP) se realiza la ejecución del PE "Descuento por pronto pago"
Aviso
title
Importante
Importante
La solución estará presente en el patch deexpedición continuacon fecha superior al 18/07/2024.
Totvs custom tabs box
tabs
Conf. Previas y flujo de prueba
ids
paso1,paso2
Totvs custom tabs box items
default
yes
referencia
paso1
Realizar un respaldo del repositorio (RPO).
Aplicar el paquete de expedición continua Financiero - Totvs Recibo MI con fecha del o posterior.
Aplicar el parche correspondiente al issue DMINA-23387.
Validar que las rutinas actualizadas en el repositorio, coincidan con las descritas en el encabezado del presente Documento Técnico, así como las fechas.
Crear la función de usuario "Descuento por pronto pago" (F998VALBX) el cual retornará un jsobjeto Json con las siguientes opciones:
Nombre del campo nuevo a mostrar.
Deshabilitar o habilitar el campo de descuento, multa o interés.
Habilitar o deshabilitar el campo "Descuento por pronto pago".
La siguiente imagen es un ejemplo del PE (F998VALBX):
Dentro del módulo Financiero ejecutar la rutina TOTVS Recibo (Actualizaciones | Cuentas por cobrar).
En la rutina deClientes(MATA030), ubicada en el móduloFinanciero (Actualizaciones | Archivos) registré un cliente.
En la rutina de Facturaciones (MATA467N), ubicada en el módulo de Facturación (Actualizaciones | Facturaciones) generamos un nuevo título.
Totvs custom tabs box items
default
no
referencia
paso2
Ingresar a la rutinaTOTVS Recibo;SIGAFIN - Actualizaciones | Cuentas por Cobrar | TOTVS Recibo.
Ingresar a la opción Nuevo Recibo.
Informe el encabezado del recibo de cobro con el cliente configurado anteriormente, después de clic en el botón Extraer Títulos.
Informe una forma de pago de tipo CH con el número 1307001
Confirme el recibo de cobro.
Ingresamos a la opción Buscar Recibo.
Llenamos los filtros necesarios para localizar el recibo generado anteriormente.
Damos clic en modificar.
Modificamos el número de cheque de 1307001 a 1307000
Verificar que salga la alerta de que el cheque no puede ser modificado
Card documentos
Informacao
La presente solución aplica para versión 12.1.2210 o superior, siempre y cuando se encuentre aplicado el paquete de expedición continua Financiero - Totvs Recibo MI con fecha de corte superior a este comunicado.
Titulo
¡IMPORTANTE!
Descripción
Actualizaciones
Nombre del programa fuente:
RECEIPT.SERVICE.TLPP
Parámetros recibidos
N/A
Punto de entrada:
F887ROT
Respuesta:
Arreglo que contiene el nombre de la nueva opción habilitada y la función que se ejecutara al dar clic en ella.
Nombre
Tipo
Descripción
Obligatorio
aRet[1]
C
Título de la nueva opción que se habilitara en Buscar Recibos.
Si
aRet[2]
C
Función de usuario que será ejecutada al dar clic en la nueva opción
Si
Bloco de código
language
actionscript3
title
Ejemplo de PE F887ROT y función de usuario
linenumbers
true
#Include 'Protheus.ch'
//Punto de entrada F887ROT
User Function F887ROT
Local aData As Array
aData := {"CANCEL FORZA","EjemploPE"} //{Nombre de la nueva opción, Funcion a ejecutarse}
Return aData
//Funcion de usuario que será ejecutada al dar clic en la nueva opción
User Function EjemploPE()
LOCAL aRet := {}
IF FJT->FJT_CLIENT == '000001' //Cancelara recibos que pertenezcan a este cliente
RecLock("FJT",.F.)
Replace FJT_CANCEL With "1"
MsUnLock()
aRet:={.T.,"PE EJECUTADO CORRECTAMENTE"} //{.T., Mensaje personalizado}
ELSE
aRet:={.F.,"ESTE CLIENTE NO PERMITE MODIFICACIONES"} //{.F., Mensaje personalizado}
ENDIF
Return aRet