| Produto: | |
|---|---|
| Linha de Produto: | |
| Segmento: | |
| Módulo: | |
| Função: | MNTA5321() |
| País: | Brasil |
Descrição: | Ponto de entrada executado na rotina de Modelo x Medidas (MNTA532) que realiza validação ao confirmar o registro | ||||||||
Localização: | SIGAMNT: Atualizações/Controle de Pneus/Pneus/Mod x Medida | ||||||||
Programa Fonte: | MNTA532.prw | ||||||||
Função: | MNTA5321() | ||||||||
Parâmetros: |
| ||||||||
Retorno: |
|
#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 |