FC030ORD - Ordena títulos -- 110890

Ponto de Entrada que permite customizar a cláusula ORDER BY, possibilitando que os ermitindo que  títulos em aberto sejam reordenados e os títulos pagos exibidos na consulta de posição de fornecedor.

FINC030.PRW

FC030ORD - Ordena títulos ( [ ParamIxb ] ) --> cRet

cRet(caracter)
• Deve retornar a cláusula ORDER BY customizada,conformr as regras descritas no tópico Observações.

 A montagem da cláusula ORDER BY customizada deve respeitar as seguintes regras:

- Só podem ser adicionados à essa cláusula, os campos da query padrão do Sistema, ou seja, os campos passados como parâmetro (conforme descrito no tópico arâmetros);

- A sintaxe da cláusula deve ser composta apenas pelos campos, ou seja, não é necessário incluir na customização, o comando "ORDER BY" (a sintaxe padrão do Sistema é informada como parâmetro, para uso como referência);

- É possível fazer a reordenação tanto na visualização dos títulos em aberto, quanto dos títulos pagos, permitindo a verificação da sua origem, por meio do  parâmetro informado (conforme descrito no tópico Parâmetros).

#include "protheus.ch"#include "rwmake.ch"User Function FC030ORD()Local cEstrut := ParamIxb[1] //Contém os campos que podem ser utilizados na cláusula ORDER BYLocal cOrdAtu := ParamIxb[2] //Contém a cláusula ORDER BY padrão do sistemaLocal nOpProc := ParamIxb[3] //Corresponde à visualização de títulos em aberto (1) ou pagos (2)Local cRet    := ""Alert("Ponto de entrada para odernar os títulos " + IIf(nOpProc == 1, "em aberto.", "pagos."))cRet := cOrdAtuReturn cRet