PE PCOA5307

01. DADOS GERAIS

02. DESCRIÇÃO

O ponto de entrada PCOA5307 é invocado após a realização da validação de dados relacionados ao controle de contingência. Ele oferece ao cliente a possibilidade de implementar avaliações específicas para determinar se um registro deve ou não ser incluído, de acordo com critérios próprios de negócio. Essa funcionalidade é particularmente útil no contexto de bloqueios orçamentários, permitindo ao usuário uma camada adicional de verificação e personalização, antes de autorizar a inclusão de registros. O controle de contingência atua como uma medida para assegurar que as políticas de orçamento sejam respeitadas, oferecendo flexibilidade para ajustes pontuais, conforme necessário.

03. DEMAIS INFORMAÇÕES

lRet:= ExecBlock("PCOA5307",.f.,.f.,{lRet,_aDadosBlq,nDet}) 

#Include "Protheus.ch"
 
User Function PCOA5307()
 
	Local lInclui   := ParamIXB[1] //Indica se passou pelas validações padrões.
	Local aDadosPE  := ParamIXB[2] //Dados orçamentários considerando o registro que se pretende incluir.
	Local nDet      := ParamIxb[3] // Retorno da variável, considerar a ação efetuada pelo usuário na pergunta de liberação de contingência.
 	
	If nDet == 2 // Indica que o usuário selecionou a opção Solicitar liberação.
    	lInclui := MsgYesNo("Na avaliação do Protheus, o registro " + If(lInclui,"será","não será") + " incluso. Você deseja incluir?" ,"Ponto de Entrada - PCOA5307")
	EndIF
 
Return lInclui

04. ASSUNTOS RELACIONADOS

• Não se aplica.