//chamada no fonte
If nOpt == 1 .And. ExistBlock("AF030VBX")
	If !ExecBlock("AF030VBX",.F.,.F.,{cMotivo,cNota,cSerie,lBx})
		nOpt := 0
	Endif
Endif

//função de usuário
User Function ATFA036 

	Local lRet := .F. // Variável de retorno dos pontos de entrada da rotina de baixa de ativos. 

Return lRet

• Observa-se que a utilização do PE e os impactos dele no sistema são de responsabilidade do cliente.
• Os exemplos utilizados nessa documentação são apenas para fins de demonstração, cada cliente deve verificar qual comportamento deseja realizar de acordo com o escopo do ponto de entrada.