Árvore de páginas

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:

MNTC9351()

País:Brasil


02. DESCRIÇÃO

DescriçãoPonto de Entrada que possibilita filtrar os dados que serão apresentados na Consulta Gerencial de Custos.
Programa Fonte:MNTC935.prx
Localização:
SIGAMNT: Consultas/Gerencial/Custos

Função:

MNTC9351

Retorno:

NomeTipoDescriçãoObrigatório
aFiltroArrayEnvia o array com o conteúdo após aplicação do filtro.Sim

03. DEMAIS INFORMAÇÕES

Exemplo MNTC9351()
#Include 'Protheus.ch'

User Function MNTC9351()

Local aFiltro := ""

Local aFiltroOld := aColsRod

Local nX := 0

// Parâmetros

// Array contendo contendo os dados que serão filtrados.

// Cada posição do Array possui 7 campos: 1 - Código, 2 - Descrição, 3 - Valor Previsto, 4 - Percentual Previsto, 5 - Valor Realizado, 6 - Percentual Realizado, 7 - Quantidade de Registros

//Cria um clone para manter o aCols original

aFiltro := aClone(aFiltroOld)

For nX := 1 to Len(aFiltro)

If Len(aFiltro) > 1 .And. !(Alltrim(aFiltro[nX][1]) == "1.001.999")

aDel(aFiltro,nX)

aSize(aFiltro,Len(aFiltro)-1)

nX--

Else

If Len(aFiltro) == nX .And. !(Alltrim(aFiltro[nX][1]) == "1.001.999") .And. !(Alltrim(aFiltro[nX][1]) $ "SIN/MUL/ABA/DOC/MUL/DOC/OFI/PNE")

aDel(aFiltro,nX)

aSize(aFiltro,Len(aFiltro)-1)

nX--

EndIf

EndIf

Next nX

Return aFiltro


04. ASSUNTOS RELACIONADOS

  • Não se aplica.