Linha Microsiga Protheus

Árvore de páginas

Validação de campos no Portal SS

Atenção!

  • Este ponto de entrada está disponível a partir de 31/05/2021

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Manufatura

Módulo:

SIGAMNT - Manutenção de Ativos e Gestão de Frotas

Rotina:

Rotina

Nome Técnico

MNTI0052

Portal SS - Tela de inclusão de SS

País(es):

Todos

Banco(s) de Dados:

Todos

Sistema(s) Operacional(is):

Todos

Ponto de Entrada

Descrição:

Ponto de entrada acionado após a gravação de Solicitação de Serviço através do Portal S.S.

Localização:

Portal de SS

Eventos:

Inclusão de SS (MNTI0052)

Programa Fonte:

MNTI006.PRW

Função:

I05VLDCPO()

Parâmetros:
NomeTipoDescrição
PARAMIXB[1]CaracterCampo a ser validado
PARAMIXB[2]CaracterValor do campo a ser validado
Retorno:Mensagem a ser exibida em tela, quando o campo desejado for acessado e modificado.

 

MNTI5007.PRW
#include 'totvs.ch'
#include 'apwebex.ch'

User Function MNTI5007()

	Local cCampo := PARAMIXB[1]
	Local cValor := PARAMIXB[2]
	Local cMsg   := ''

	// Realiza validação do campo inserido em tela
	If cCampo == 'TQB_RAMAL'
		// Verifica se o campo atende à validação especificada
		// Caso não, limpa seu conteúdo e apresenta mensagem em tela
		If AllTrim( cValor ) >= '0000' .And. AllTrim( cValor ) <= '0100'
			HttpSession->TQB_RAMAL := ''
			cMsg := 'Nao é possivel selecionar o Ramal!'
		Else
			// Caso sim, repassa o valor informado no campo a sua variável da sessão
			HttpSession->TQB_RAMAL := cValor
		Endif
	EndIf

Return cMsg