Exibir origem

01. DATOS GENERALES

Producto:	TOTVS Backoffice
Línea de producto:	Línea Protheus
Segmento:	Servicios
Módulo:	TOTVS Backoffice (Línea Protheus) - Activo fijo (SIGAATF)
Función:	ATFA012
País:	Brasil
Ticket:	Interno
Requisito/Story/Issue	DSERCTR1-46748

02. DESCRIPCIÓN

El punto de entrada AF010TOK es responsable por realizar la validación de los datos digitados antes de su grabación en el proceso de registro de activos.

Funcionamiento:

Se activa inmediatamente antes de la confirmación y hacer efectiva la grabación de los datos registrados.
Permite que el desarrollador implemente reglas específicas para validar las informaciones suministradas por el usuario, garantizando la integridad y consistencia de los datos.

Beneficios:

Control de calidad: Garantiza que los datos incluidos atiendan a criterios previamente establecidos antes de grabarse.
Flexibilidad: Permite que las empresas personalicen el comportamiento estándar, adaptándolo a sus necesidades específicas.

Este punto de entrada es ideal para garantizar que el registro de activos atienda a estándares personalizados de validación antes de finalizar.

03. OTRAS INFORMACIONES

If lRet .AND. ExistBlock("AF010TOK")
	lRet := ExecBlock("AF010TOK",.F.,.F.)
Endif

#include "rwmake.ch"

User function AF010TOK()

	Local aArea := GetArea()
	Local cMensagem := ""
	Local lRet := .T.
	Local cChapa := AllTrim(M->N1_CHAPA)

	If !Empty(cChapa)
		If Len(cChapa) <> 6
			cMensagem := "Número de la plaqueta no está en el estándar de dígitos."
			Help("ATFA010",1,"HELP","VALCHAPA",cMensagem,1,0)
			lRet := .F.
		Endif
	Endif

	RestArea(aArea)
	SN1->(DbSetOrder(1))

Return lRet

Se observa que la utilización del PE y los impactos de este en el sistema son de responsabilidad del cliente.
Los ejemplos utilizados en esta documentación solamente son para fines de demostración, cada cliente debe verificar qué comportamiento desea realizar de acuerdo con el alcance del punto de entrada.

04. ASUNTOS RELACIONADOS

No se aplica.