Histórico da Página
Ponto de entrada
MNTA231C em RodadosMNTA2327 na validacao do campo contador.
Características do Requisito
Linha de Produto: | Microsiga Protheus | ||||||||||
Segmento: | Manufatura | ||||||||||
Módulo: | Manutenção de Ativos | ||||||||||
Rotina: |
| ||||||||||
Cadastros Iniciais: | - Família de Bens | ||||||||||
País(es): | Todos | ||||||||||
Banco(s) de Dados: | Todos | ||||||||||
Tabelas Utilizadas: | ST6 - Familia de Bens | ||||||||||
Sistema(s) Operacional(is): | Windows e Linux |
Descrição
Realizado inclusão de ponto de entrada 'MNTA231C' antes da chamada da função 'NGCHKHISTO'MNTA2327' na validação dos campos Contador 1 e Contador 2, para que o usuário escolha a verificação de histórico que será feitaseja validado o valor informado.
Ponto de Entrada
Descrição: | Ponto de entrada 'MNTA231C' anterior a chamada da função 'NGCHKHISTO'MNTA2327' na validação dos campos Contador 1 e Contador 2. | ||||||||
Localização: | Atualizações > Controle de Oficina > Ordem de Serviço > Corretiva > Rodados. | ||||||||
Eventos: | Rodados | ||||||||
Programa Fonte: | MNTA420MNTA232.prx | ||||||||
Função: | MNTA231HISCriaCabecalho() | ||||||||
Retorno: |
|
Exemplo:
#Include 'Protheus.ch'
User Function MNTA231CMNTA2327()
Local lRet := .T.
Local BEMPAI nKmB := PARAMIXB[1]0
Local dDTDATEM nPOSCONT := PARAMIXB[2]1] //Valor informado do contador.
Local nCONTAD cCodBem := PARAMIXB[3]
Local cVHORCON := PARAMIXB[4]
Local nTIP := PARAMIXB[5]2] //Código do Bem.
dbSelectArea("TT8") // Informações do tanque de combustivel.
dbSetOrder(2)
If dbSeek(xFilial("TT8")+cCodBem+"1")
If TT8->TT8_MEDIA > 0 .Or. TT8->TT8_CAPMAX > 0
nKmB := TT8->TT8_MEDIA * TT8->TT8_CAPMAX //Média e Capacidade Máxima.
If nPOSCONT > nKmB
msgStop("O valor informado do contador é superior a capacidade do veículo.")
lRet := .F.
EndIf
EndIf
EndIfIf !NGCHKHISTO(cBEMPAI,dDTDATEM,nCONTAD,cVHORCON,nTIP,,.T.)
lRet := .F.
Endif
Return lRet