ordena matriz
Enviado: 13 Mar 2008 09:05
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.
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.