Histórico da Página
Ponto de Entrada para
validaçãomanipulação de registros no processo de gravação de multa/notificação.
Características do Requisito
Linha de Produto: | Microsiga Protheus | ||||
Segmento: | Manufatura | ||||
Módulo: | SIGAMNT - Manutenção de Ativos e Gestão de Frotas. | ||||
Rotina: |
| ||||
Cadastros Iniciais: | MNTA084 - Veículos. | ||||
País(es): | Todos | ||||
Banco(s) de Dados: | Todos | ||||
Tabelas Utilizadas: | ST9 - Bens | ||||
Sistema(s) Operacional(is): | Windows e Linux | ||||
Ponto de Entrada: | MAR1W010 - Validação de registro |
Descrição
Realizado conversão das rotina MNTA765 - Multas para o modelo padrão de desenvolvimento MVC, por este motivo a chamada e utilização do ponto de entrada MAR1W010 deve ser alterada para o novo modelo.
Procedimento para Utilização
- Entrar no modulo de Manutenção de Ativos e Gestão de Frotas(SIGAMNT).
- Em Atualizações > Gestão de Riscos > Multas > Multas.
Ponto de Entrada
Descrição: | Ponto de entrada MAR1W010 no padrão MVC. | ||||||||
Localização: | Em Atualizações > Gestão de Riscos > Multas > Multas. | ||||||||
Eventos: | Multas (MNTA765) | ||||||||
Programa Fonte: | MNTA765.prx | ||||||||
Função: | MNTA765() | ||||||||
Retorno: |
|
Bloco de código | ||||||||
---|---|---|---|---|---|---|---|---|
| ||||||||
#Include 'Protheus.ch' User Function MAR1W010() Local oModel765 If Type("PARAMIXB") == "A" oModel765 := PARAMIXB[1] // Busca o modelo de dados, que conterá os dados do arquivo em tela. If Empty(oModel765:GetValue( 'MULTAS', 'TRX_MULTARODOVI' ) ) MsgAlert("Código da Multa está vazio.") Return .F. EndIf EndIf Return oModel765:LoadValue( 'MULTAS', 'TRX_RODOVI', '001' ) EndIf EndIf Return |