Tiempo aproximado de lectura 01:00 min
Duda
¿Cómo validar o restringir la reversión de asientos contables mediante el punto de entrada VCTB102EST?
Entorno
Cross Segmentos - TOTVS BackOffice (Línea Protheus) - MI - Contabilidad de Gestión (SIGACTB) - A partir de la versión 12.1.2410
Solución
El punto de entrada VCTB102EST permite validar las operaciones de reversión de asientos contables, posibilitando la implementación de reglas de negocio personalizadas para aprobar o rechazar la reversión.
Este punto de entrada es útil cuando se requieren controles adicionales, como validaciones de integridad financiera, restricciones por lote o reglas relacionadas con periodos contables, asegurando que solo se permitan reversiones que cumplan con los criterios definidos.
El retorno del punto de entrada es un valor lógico (booleano), donde:
- .T. (True): Permite la reversión
- .F. (False): Bloquea la reversión
Implementación en el sistema:
If !ExecBlock("VCTB102EST", .F., .F., {dDataLanc, cLote, cSubLote, cDoc, nTotInf})
Return .F.
EndIf
Ejemplo de punto de entrada:
User Function VCTB102EST()
Local dDataLanc := PARAMIXB[1]
Local cLote := PARAMIXB[2]
Local cSubLote := PARAMIXB[3]
Local cDoc := PARAMIXB[4]
Local nTotInf := PARAMIXB[5]
Local lRel := .T.
// Verifica si el lote atiende los criterios necesarios
If cLote == "LOTE_RESTRITO"
MsgAlert("Reversión no permitida para el lote restringido.")
lRel := .F.
EndIf
Return lRel
Información adicional
- Permite agregar validaciones personalizadas en la reversión de asientos
- Recibe parámetros como fecha, lote, sublote, documento y total informado
- Facilita el control de reglas contables específicas del negocio
- El uso del punto de entrada y sus impactos son responsabilidad del cliente
- Los ejemplos proporcionados son únicamente ilustrativos
- Cada cliente debe definir la lógica conforme a sus necesidades
0 Comentarios