Histórico da Página
Ponto de entrada para rotina de cadastro de multas
Características do Requisito
Linha de Produto: | Microsiga Protheus | ||||||||
Segmento: | Manufatura | ||||||||
Módulo: | Manutenção de Ativos e Gestão de Frotas | ||||||||
Rotina: |
| ||||||||
Tickets relacionados | 6668447 | ||||||||
Issue: | DNG-7936 | ||||||||
Países: | Todos. | ||||||||
Bancos de Dados: | Todos. | ||||||||
Sistemas Operacionais: | Todos. |
Ponto de Entrada
Descrição: | Ponto de entrada no padrão MVC para customização da rotina de cadastro de multas. | ||||||||||||||||
| Localização: | SIGAMNT: Em Atualizações > Controle de Riscos > Multas > Multas. | ||||||||||||||||
Programa Fonte: | MNTA765.prx | ||||||||||||||||
| Parâmetros: |
| ||||||||||||||||
Retorno: |
| ||||||||||||||||
| Links: | Pontos de entrada padrão MVC |
| Bloco de código | ||||||
|---|---|---|---|---|---|---|
| ||||||
#INCLUDE 'PROTHEUS.CH'
#INCLUDE 'FWMVCDEF.CH'
User Function MNTA765()
Local oMod := PARAMIXB[1]
Local cId := PARAMIXB[2]
Local cIdMod := PARAMIXB[3]
Local lRet := .T.
If cId == 'MODELPRE'
If oMod:GetModel( 'MULTAS' ):HasField( 'TRX_PREFIX' )
oMod:LoadValue( 'MULTAS', 'TRX_PREFIX', &( Trim( Posicione( 'SX3', 2, 'TRX_PREFIX', 'X3_RELACAO' ) ) ) )
EndIf
If oMod:GetModel( 'MULTAS' ):HasField( 'TRX_TIPO' )
oMod:LoadValue( 'MULTAS', 'TRX_TIPO', &( Trim( Posicione( 'SX3', 2, 'TRX_TIPO', 'X3_RELACAO' ) ) ) )
EndIf
ElseIf cId == 'MODELPOS'
If oMod:GetModel( 'MULTAS' ):HasField( 'TRX_RODOVI' ) .And.;
Empty( oMod:GetValue( 'MULTAS', 'TRX_RODOVI' ) )
Help( , , 'MODELPOS', , 'Código da Rodovia está vazio.', 2, 1 )
lRet := .F.
EndIf
EndIf
Return lRet |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas