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: |
| Movimentação do
|
Rotina(s) envolvida(s) | Nome Técnico |
MNTA2318 | Ponto de Entrada |
País(es):
Todos
Banco(s) de Dados:
Todos
Sistema(s) Operacional(is):
MNTA232 | Esquema de Rodados Gráfico |
Ponto de Entrada
Descrição: | Ponto de entrada executado na rotina de Movimentação do Esquema de Rodados (MNTA231) que carrega o sulco para o Pneunas rotinas de movimentação de rodados, onde possibilita que seja carregado o sulco para do pneu. | ||||||||
Localização: | SIGAMDISIGAMNT: Atualizações | /> Controle de Oficina | /> Ordem de Serviço | /> Corretiva > Rodados. | |||||
Programa Fonte: | MNTA231.prx MNTA232.prw | ||||||||
Função: | MNTA231MTV() | MNTA2318DLGPNEU() | |||||||
Parâmetros: |
| ||||||||
Retorno: |
| ||||||||
| |||||||||
Retorno: |
|
Bloco de código | |||||
---|---|---|---|---|---|
| |||||
| |||||
#Include 'Totvs.ch' User Function MNTA2318() Local aAreaTQS := TQS->( GetArea() ) Local nSulco := 1 0 Local cPneu := ParamIXB[1] MsgInfo("Ponto de Entrada para Carregar o Sulco do pneu '"+AllTrim(cPneu)+"'.","P.E. MNTA2318") Return nSulco] 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