Histórico da Página
Ponto de entrada que permite customizar a validação de negociação e preço de posto na rotina de Abastecimento Manual (MNTA655)
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(s) envolvida(s) | Nome Técnico |
MNTA6557 | Ponto de Entrada |
Países:
Todos
Bancos de Dados:
Todos
Sistema(s) Operacional(is)Sistemas Operacionais:
Todos
Ponto de Entrada
Descrição: | Ponto de entrada executado na rotina de Abastecimento Manual (MNTA655) para customização da validação de negociação e preço de posto | ||||||||||||
Localização: | SIGAMNT: Atualizações | /> Controle de Combustíveis | /> Abastecimento | /> Abastecimento Manual | |||||||||
Programa Fonte: | MNTA655.prx | ||||||||||||
Função: | MNTA6557MNTA655HR() / MNA655HR() | ||||||||||||
Parâmetros: |
| ||||||||||||
Retorno: Nome |
|
Bloco de código | ||||||
---|---|---|---|---|---|---|
| ||||||
#INCLUDE 'PROTHEUS.CH' User Function MNTA6557() Local lRet := .T. // Parâmetros cCodPos := PARAMIXB[1] // Código do Posto cCodLoj := PARAMIXB[2] // Código da Loja cCodCnp := PARAMIXB[3] // CNPJ/CPF If Empty( M->TQN_VALUNI ) If MsgYesNo("Não há uma negociação anterior a esse abastecimento. Deseja Continuar?","ATENÇÃO") M->TQN_VALUNI := 3.19 // Recebe o valor padrão Else Else lRet := .F. EndIf EndIf EndIf Return lRet |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas