Tiempo aproximado de lectura 01:00 min
Duda
¿Cómo validar o controlar la eliminación de registros contables mediante el punto de entrada CTB102EXC?
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 CTB102EXC se ejecuta antes de la eliminación de un registro contable, permitiendo implementar validaciones o acciones específicas previas a la ejecución del proceso.
A través de este punto de entrada, el cliente puede definir reglas de negocio que aseguren que la eliminación del registro cumpla con los criterios establecidos, evitando eliminaciones indebidas y garantizando la integridad de la información contable.
El retorno del punto de entrada es un valor lógico (booleano), donde:
- .T. (True): Permite la eliminación del registro
- .F. (False): Bloquea la eliminación
Implementación en el sistema:
lOk := ExecBlock("CTB102EXC", .F., .F.)
Ejemplo de punto de entrada:
#INCLUDE "PROTHEUS.CH"
User Function CTB102EXC()
Local lRet := .F.
MsgAlert("CHAMADA DO PONTO DE ENTRADA: CTB102EXC")
Return lRet
Información adicional
- Permite agregar validaciones antes de eliminar registros contables
- Su uso ayuda a mantener la integridad de los datos
- 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 de negocio
0 Comentarios