Linha Microsiga Protheus

Árvore de páginas

Carregando...
Tempo aproximado para leitura: 1 minuto

01. DADOS GERAIS

Produto:

TOTVS Manutenção de Ativos

Linha de Produto:

Linha Protheus

Segmento:

Manufatura

Módulo:

TOTVS Manufatura (Linha Protheus) - Manutenção de ativos (SIGAMNT)

Função:MNTA420W()
País:Brasil


02. DESCRIÇÃO

Descrição:

Ponto de entrada que permite customizar o ordenamento dos insumos realizados na Ordem de Serviço. 

Localização:

SIGAMNT: Em Atualizações > Controle de Oficina > Ordens de Serviço > Corretiva.

Programa Fonte:

MNTA420.prw

Função:

MNTA420W()

Parâmetros:

NomeTipoDescriçãoObrigatório

aCols

ArrayNãoContém os dados da Linha (STL) posicionado. 

aHEADER

ArrayNãoContém os campos no aHeader (array) com os campos da STL.


Retorno:

NomeTipoDescriçãoObrigatório

aCols

Array

Contém os dados da linha (STL) ordenados.

Sim

03. DEMAIS INFORMAÇÕES

Exemplo 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


04. ASSUNTOS RELACIONADOS

  • Não se aplica.