Histórico da Página
Ponto de entrada que possibilita o aumento de vidas do pneu na rotina de Análise Técnica (MNTA600)
Características do Requisito
Linha de Produto: | Microsiga Protheus | ||||||||
Segmento: | Manufatura | ||||||||
Módulo: | SIGAMNT - Manutenção de Ativos e Gestão de Frotas | ||||||||
Rotina: |
| ||||||||
País(es): | Todos | ||||||||
Banco(s) de Dados: | Todos | ||||||||
Sistema(s) Operacional(is): | Todos |
Ponto de Entrada
Descrição: | Ponto de entrada executado na rotina de Análise Técnica (MNTA600) que possibilita o aumento de vida de um pneu, relacionando o número da banda com a quilometragem específica da vida do pneu. | |||||||||
Programa Fonte: | MNTA600.prx | |||||||||
Localização: | SIGAMNT: Atualizações/Controle de Pneus/Análise Técnica/Análise Técnica | |||||||||
Função: | MNTA6003() | |||||||||
Parâmetros: |
| |||||||||
Retorno: |
|
Bloco de código | ||
---|---|---|
| ||
#Include 'Protheus.ch'
User Function MNTA6003()
// Parametros
lRet := PARAMIXB1 // Preenche com um valor logico,.T. - para retornar cTmpRet ou .F. para retornar cTmpCmp
cBanda := PARAMIXB2 // Preenche com o numero da banda
// Retornos
cTmpRet := "" // Retorno
cTmpCmp := "" // Campo
If cBanda == '6'
cTmpRet := TQS->TQS_KMR5
cTmpCmp := 'TQS->TQS_KMR5'
ElseIf cBanda == '7'
cTmpRet := TQS->TQS_KMR6
cTmpCmp := 'TQS->TQS_KMR6'
ElseIf cBanda == '8'
cTmpRet := TQS->TQS_KMR7
cTmpCmp := 'TQS->TQS_KMR7'
ElseIf cBanda == '9'
cTmpRet := TQS->TQS_KMR8
cTmpCmp := 'TQS->TQS_KMR8'
ElseIf cBanda == 'A'
cTmpRet := TQS->TQS_KMR9
cTmpCmp := 'TQS->TQS_KMR9'
EndIf
Return If(lRet,cTmpRet,cTmpCmp) |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas