Mudar ordem dos elementos de um achoice

Fórum sobre a linguagem CA-Clipper.

Moderador: Moderadores

Avatar do usuário
rosalvo rosa
Usuário Nível 3
Usuário Nível 3
Mensagens: 156
Registrado em: 10 Jan 2006 19:21
Localização: Curitiba - PR

ordena matriz

Mensagem por rosalvo rosa »

Olá Pablo,

eu coloquei um exemplo na msg, copie e compile tudo de novo.

vc vai ver que ela ordena em primeiro plano o campo 1 da matriz,
depois ordena pelo segundo , e dentro do segundo, ordena o terceiro

Digamos que vc tem um romaneio por exemplo:

m_romaneio:={}
AAdd(m_romaneio{data prod 10/01/08, artigo a, peso 10 kg}) // claro os caracteres estao errados, só prá identificar.
AAdd(m_romaneio{data prod 11/01/08, artigo c, peso 15 kg})
AAdd(m_romaneio{data prod 11/01/08, artigo b, peso 12 kg})
AAdd(m_romaneio{data prod 11/01/08, artigo b, peso 10 kg})
OrdenaMatriz(m_romaneio,1,2,3)
m_romaneio:={}
m_romaneio:= Aclone(m_OrdFinal)

a funcao vai colocar na ordem :
10/01/08 art a 10 kg
11/01/08 art b 10 kg
11/01/08 art b 12 kg
11/01/08 art c 15 kg

pode testar. vc pode colocar na ordem que vc quiser, primeiro data,
ou primeiro artigo, é só inverter a classificacao qdo vc chama a funcao.
Avatar do usuário
Pablo César
Usuário Nível 7
Usuário Nível 7
Mensagens: 5312
Registrado em: 31 Mai 2006 10:22
Localização: Curitiba - Paraná

Mensagem por Pablo César »

Bom dia Rosalvo,

Ahhh agora, re-compilei-o e entendí bem. Esta rotina é muito útil para ordenar matriz multidimensional, acompanhando todos os seus elementos. Sempre pensei fazer isso e achava que era dificil de fazer. Eu sempre apelei para criar vetores unidimensional acrescido de uma sub-string, isto é concatenava dois tipos de informações num mesmo elemento. Legal seu código, vou coloca-lo como exemplo para ordernar matrizes multidimensionais.
Um clip-abraço !

Pablo César Arrascaeta
Compartilhe suas dúvidas e soluções com todos os colegas aqui do fórum.
Evite enviar as dúvidas técnicas por MPs ou eMails, assim todos iremos beneficiar-nos.
Avatar do usuário
rosalvo rosa
Usuário Nível 3
Usuário Nível 3
Mensagens: 156
Registrado em: 10 Jan 2006 19:21
Localização: Curitiba - PR

odenar matrizes

Mensagem por rosalvo rosa »

Fico contente em ajudar.
agora é pedir pro Toledo me dar mais uma estrelinha e tudo bem.
Avatar do usuário
Pablo César
Usuário Nível 7
Usuário Nível 7
Mensagens: 5312
Registrado em: 31 Mai 2006 10:22
Localização: Curitiba - Paraná

Re: odenar matrizes

Mensagem por Pablo César »

rosalvo rosa escreveu:agora é pedir pro Toledo me dar mais uma estrelinha e tudo bem.
KAKAKA, essa é boa !. Só que a conquista de estrelinhas está vinculadas com a quantidade de mensagens postadas. Obedecendo as regras do fórum, é claro, não dá para encher de mensagens do tipo flood como é mencionado no item 17 REGRAS DO FÓRUM - LEITURA OBRIGATÓRIA DE TODOS, porque daí os moderadores cortam assas deletandos as mensagens "não aproveitáveis" e o número de mensagens diminuem por consequente. Então podemos dizer que é ajudando que se recebe, é recíproco os benefícios.
Um clip-abraço !

Pablo César Arrascaeta
Compartilhe suas dúvidas e soluções com todos os colegas aqui do fórum.
Evite enviar as dúvidas técnicas por MPs ou eMails, assim todos iremos beneficiar-nos.
Responder