Ordenação campo advpl

Bom dia a todos! Consegui ordenar a estrutura pelo G1_COMP, porém agora estava tentando em seguida ordenar também pelo campo G1_XTRT, ou seja gostaria de ordenar por G1_COMPO + G1_XTRT, se alguém tiver ideia de como realizar ou dar uma ajuda e ideia, ficarei grato. Obrigado. Segue o código.

INCLUDE "PROTHEUS.CH"

USER FUNCTION PC200ORD()

Local aPosic := PARAMIXB //Array com os campos disponíveis para ordenação. Local nPosCmp := aScan(aPosic,{|x|x[3] == "G1_COMP" }) Local nPosTrt := aScan(aPosic,{|y|y[4] == "G1_XTRT"})

Local bSort := Nil //sempre será ordenado pela posição 2 seguida do campos desejado pelo cliente bSort := {|x, y| x[2,nPosCmp]+x[2,nPosTrt]<y[2,nPosCmp]+y[2,nPosTrt]}

Return bSort

compartilhar
  1. Você vai ver essas setas em qualquer página de pergunta. Com elas, você pode dizer se uma pergunta ou uma resposta foram relevantes ou não.
  2. Edite sua pergunta ou resposta caso queira alterar ou adicionar detalhes.
  3. Caso haja alguma dúvida sobre a pergunta, adicione um comentário. O espaço de respostas deve ser utilizado apenas para responder a pergunta.
  4. Se o autor da pergunta marcar uma resposta como solucionada, esta marca aparecerá.
  5. Clique aqui para mais detalhes sobre o funcionamento do TOTVS DevForum!

0 resposta

Não é a resposta que estava procurando? Procure outras perguntas com as tags advpl protheus pontodeentrada ou faça a sua própria pergunta.