Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 5

changes.mady.by.user Tainã Alberto Cardoso

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Tainã Alberto Cardoso

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

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:
NomeTipoDescriçãoObrigatório
PARAMIXB[1]objetoCarrega o modelo ativo da rotinaX

Retorno:

NomeTipoDescriçãoObrigatório
lRetlReturnLó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()
Exemplo 1 - Com MVC

#Include 'TOTVS.ch'
#Include 'FWMVCDEF.ch'
 
User Function MNTA5321()
     
    Local oModel5321
    Local lReturn := .T.
     
    If Type('PARAMIXB') == 'A'
 
		oModel5321 := PARAMIXB[1]
         
        If oModel5321:GetValue('MNTA532_TQX', 'TQX_CALMAX') == ' '
             
            lReturn := .F.
         
        EndIf
         
        If !lReturn
             
            MsgInfo("O campo TQX_CALMAX deve ser informado")
         
        EndIf
 
    EndIf
     
Return lReturn

Exemplo 2 - Sem MVC

#Include 'Protheus.ch'
 
User Function MNTA5321()
     
    Local lRet := .T.
 
    MsgInfo("Ponto de Entrada para validar a gravação.","P.E. MNTA5321")
     
Return lRet