FC030IND - Altera ordem de exibição da consulta

01. DADOS GERAIS

Abrangência:	Protheus 12.1.23
Versões:	Protheus 12
Compatível Países:	Todos
Sistemas Operacionais:	Todos
Compatível às Bases de Dados:	Todos
Idiomas :	Português(Brasil)
Rotina:	FINC030

02. DESCRIÇÃO

Ponto de entrada que permite alterar a ordem de exibição do conteúdo das pastas "Títulos Pagos" e "Faturamento", na opção "Consultar" da rotina de Consulta de Posição de Fornecedores (FINC030).

03. PARÂMETROS

Nome	Tipo	Descrição	Default	Obrigatório	Referência
nPasta	Numérico	Número da pasta em que se deseja alterar a ordem, sendo 2 para "Títulos Pagos" e 4 para "Faturamento".		x
aCampos	Vetor	Array com os campos exibidos na pasta "Títulos Pagos", se informado 2 em nPasta ou "Faturamento", se informado 4 em nPasta.		x

04. RETORNO

cCpoUser (caracter)

Expressão para ordenar os dados exibidos na pasta "Títulos Pagos" ou "Faturamento".

05. EXEMPLO

FC030IND

#include "rwmake.ch"

User Function FC030IND

Local nPasta := ParamIxb[1]
Local aCampos := ParamIxb[2]
Local cCpoUser := ""

If nPasta == 2 // Pasta Títulos Pagos
// Ordena por Data da Baixa
    nPos := aScan( aCampos,{ |x| AllTrim( x[1] ) == "BAIXA" })

    If nPos > 0
        cCpoUser := aCampos[ nPos, 1 ]
    EndIf
EndIf

Return cCpoUser

Árvore de páginas