Histórico da Página
Ponto de entrada que carrega o sulco
...
do Pneu no Esquema de Rodados
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 |
MNTA2318 | Ponto de Entrada |
País(es):
Todos
Banco(s) de Dados:
Todos
Sistema(s) Operacional(is):
|
Ponto de Entrada
Descrição: | Ponto de entrada executado |
nas rotinas de movimentação de rodados, onde possibilita que seja carregado o sulco para do pneu. |
Localização: |
SIGAMNT: Atualizações |
> Controle de Oficina |
> Ordem de Serviço |
> Corretiva > Rodados. | |
Programa Fonte: | MNTA231.prx |
Função:
MNTA232.prw | ||||
Parâmetros: |
|
|
|
| ||||
Retorno: | Valor do sulco para o pneu. |
Bloco de código | ||||||
---|---|---|---|---|---|---|
| ||||||
#Include 'Totvs.ch'
| ||||||
Bloco de código | ||||||
| ||||||
#Include 'Protheus.ch' User Function MNTA2318(cPneu) Local aAreaTQS := TQS->( GetArea() ) Local nSulco := 0 MsgInfo("Ponto de Entrada para Carregar o Sulco do pneu '"+AllTrim(cPneu)+"'.","P.E. MNTA2318") Return nSulco Local cPneu := ParamIXB[1] Local nProcess := ParamIXB[2] Local nSulco1 := ParamIXB[3] Do Case Case nProcess == 1 // Saída de pneus da estrutura. nSulco := Posicione( 'TQS', 1, xFilial( 'TQS' ) + cPneu, 'TQS_SULCAT' ) Case nProcess == 2 // Troca de posição entre pneus na estrutura. nSulco := 0 Case nProcess == 3 // Transferência de pneus. nSulco := 30 OtherWise nSulco := nSulco1 End Case RestArea( aAreaTQS ) Return nSulco |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas