Ordenamento de Insumos Realizados na OS Corretiva.
Características do Requisito
Linha de Produto: | Microsiga Protheus. | ||||
Segmento: | Manufatura. | ||||
Módulo: | Manutenção de Ativos e Gestão de Frotas. | ||||
Rotina: |
| ||||
Tickets relacionados | 9484127 | ||||
País(es): | Todos. | ||||
Banco(s) de Dados: | Todos. | ||||
Sistema(s) Operacional(is): | Todos. |
Ponto de Entrada
Descrição: | Ponto de entrada que permite customizar o ordenamento dos insumos realizados na Ordem de Serviço. | ||||||||||||
Localização: | SIGAMNT: Atualizações/Controle de Oficina/Ordem de Serviço/Corretiva | ||||||||||||
Eventos: | OS Corretiva (MNTA420). | ||||||||||||
Programa Fonte: | MNTA4906.prw | ||||||||||||
Parâmetros: |
| ||||||||||||
Retorno: |
|
MNTA420W
#Include 'Protheus.ch' //------------------------------------------------------------------------------ /*/{Protheus.doc} MNTA420W Permite customizar o ordenamento dos insumos na OS Corretiva. @author NG Informática @return .T. /*/ //------------------------------------------------------------------------------ User Function MNTA420W() Local aCols := PARAMIXB[1] //Contém os dados da linha(STL) posicionada. Local aHEADER := PARAMIXB[2] //Campos do aHeader Local nTipReg := aScan(aHEADER,{|x| Trim(Upper(x[2])) == "TL_ITEMSC"}) //Ordena pelo campo TL_ITEMSC If nTipReg > 0 aSort(aCols,,,{|x,y| x[nTipReg] < y[nTipReg] }) EndIf Return aCols
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas