Histórico da Página
Inclusão de Ponto de Entrada
Características do Requisito
Linha de Produto: | Microsiga Protheus | ||||||||
Segmento: | Serviços | ||||||||
Módulo: | Financeiro | ||||||||
Rotina: |
| ||||||||
Ponto de Entrada: | F666VLDP | ||||||||
Requisito (ISSUE): | PCDEF-98112 | ||||||||
País(es): | Todos | ||||||||
Banco(s) de Dados: | Todos | ||||||||
Sistema(s) Operacional(is): | Todos | ||||||||
Versões/Release: | 12.1.7 |
Ponto de Entrada
Descrição: | Permite definir uma validação personalizada para a seleção de participante na solicitação de viagem. | ||||||||
Localização: | Atualizações / Viagens / Solicitação de Viagens | ||||||||
Eventos: | Seleção de participante (validação de campo) / confirmação do formulário (validação do modelo de dados) | ||||||||
Programa Fonte: | FINA666 | ||||||||
Função: | F666VPARTI | ||||||||
Retorno: |
|
Exemplo:
#include 'protheus.ch'
user function F666VLDP()
Local Local lRet := .T.
Local Local oModel := FWModelActive() //Modelo de dados ativo.
Local Local cPartic := Alltrim( oModel:GetValue( "FW5DETAIL", "FW5_PARTIC" ) )
Local Local cSolic := Alltrim( oModel:GetValue( "FW3MASTER", "FW3_USER" ) )
If If cPartic <> cSolic
lRet lRet := .F.
Endif Endif
return lRet