If ExistBlock( "PCOA3104" )
	//P_EÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
	//P_E³ Ponto de entrada utilizado para inclusao de funcoes de usuarios na     ³
	//P_E³ preparacao da query para reprocessamento dos Lancamentos               ³
	//P_E³ Parametros : cProcesso, cItem, aClone(aRet), cAliasEntid, cQuery       ³
	//P_E³ Retorno    : cQuery      expressao da query                            ³
	//P_EÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
	cWhere := ExecBlock( "PCOA3104", .F., .F.,{cProcesso,cItem,aClone(aRet),cAliasEntid,cWhere})
EndIf

User Function PCOA3104()

    // As variáveis passadas por referência via PARAMIXB
    Local cProcesso   := PARAMIXB[1]
    Local cItem       := PARAMIXB[2]
    Local aRet        := PARAMIXB[3]
    Local cAliasEntid := PARAMIXB[4]
    Local cQuery      := PARAMIXB[5]
    
    // Exemplo de uso
    // Modificando a query para incluir uma condição adicional
    cQuery += " AND " + cAliasEntid + "->" + "AKB_PROCES == 'S' "

Return

• 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.