Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 2

changes.mady.by.user Tainã Alberto Cardoso

Gravado em

comparado com

Nova versão 3

changes.mady.by.user Tainã Alberto Cardoso

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Comentário: Revertida da versão 1

Ponto de entrada que realiza validação na gravação de Modelo x Medidas (MNTA532)

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

MNTA532

Mod x Medida


Rotina(s) envolvida(s)

Nome Técnico

MNTA5321

Ponto de Entrada

País(es):

Todos

Banco(s) de Dados:

Todos

Sistema(s) Operacional(is):

Todos


Ponto de Entrada

Descrição:

Ponto de entrada executado na rotina de Modelo x Medidas (MNTA532) que realiza validação ao confirmar o registro

Programa Fonte:

MNTA532.prx
Localização:SIGAMNT: Atualizações/Controle de Pneus/Pneus/Mod x Medida

Função:

MNTA5321()
Parâmetro:Modelo ativo da rotina

Retorno:

NomeTipoDescriçãoObrigatório
lRetLógicoSe as informações estiverem de acordo com a validação, retorno verdadeiro (.T.), caso contrário, retorna falso (.F.)X
Bloco de código
titleExemplo do Ponto de Entrada MNTA5321()
#Include 'Protheus.ch'

User Function MNTA5321()
	
	Local oModel5321
	Local lReturn lRet := .T.

	oModel5321 := PARAMIXB[1]
	
	If Type('PARAMIXB') == 'A'

		
		If oModel5321:GetValue('MNTA532_TQX', 'TQX_CALMAX') == ' '
			
			lReturn := .F.
		
		EndIf
		
		If !lReturn
			
			MsgInfo("O campo TQX_CALMAX deve ser informado")
		
		EndIf

	EndIf
	
Return lReturnMsgInfo("Ponto de Entrada para validar a gravação.","P.E. MNTA5321")
	
Return lRet