Produto: | |
---|---|
Linha de Produto: | |
Segmento: | |
Módulo: | |
Função: | MNTA4906() |
País: | Brasil |
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/Plano Manutenção/Liberação de OS | ||||||||||||
Programa Fonte: | MNTA490.prw | ||||||||||||
Função: | MNTA4906() | ||||||||||||
Parâmetros: |
| ||||||||||||
Retorno: |
|
#Include 'Protheus.ch' //------------------------------------------------------------------------------ /*/{Protheus.doc} MNTA4906 Permite customizar o ordenamento dos insumos na Alteração de OS. @author NG Informática @return .T. /*/ //------------------------------------------------------------------------------ User Function MNTA4906() Local aCols := PARAMIXB[1] //Contém os dados da linha(STL) posicionada. Local aHEAINS := PARAMIXB[2] //Campos do aHeader Local nTipReg := aScan(aHEAINS,{|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 |