Ordenar arreglo bidimensional

Ordenar arreglo bidimensional

Postby JoseAlvarez » Thu Apr 14, 2022 12:42 am

Hola a todos, un gran abrazo.

Esta vez tengo la necesidad de ordenar un arreglo bidimensional tomando en cuenta dos columnas.

Alguien sabe como hacerlo?
"Los errores en programación, siempre están entre la silla y el teclado..."

Fwh 19.06 32 bits + Harbour 3.2 + Borland 7.4 + MariaDB + TDolphin

Carora, Estado Lara, Venezuela.
User avatar
JoseAlvarez
 
Posts: 764
Joined: Sun Nov 09, 2014 5:01 pm

Re: Ordenar arreglo bidimensional

Postby leandro » Thu Apr 14, 2022 3:31 am

José buenas noches como vas?

Code: Select all  Expand view

//Ordenamos el array por documento y luego por consecutivo
ASORT(aRspFac,,, { |x, y| if( x["ll_docume"]==y["ll_docume"],;
                val(x["ll_consec"])<val(y["ll_consec"]),;
                x["ll_docume"]<y["ll_docume"] ) })
 
Saludos
LEANDRO AREVALO
Bogotá (Colombia)
https://hymlyma.com
https://hymplus.com/
leandroalfonso111@gmail.com
leandroalfonso111@hotmail.com

[ Embarcadero C++ 7.60 for Win32 ] [ FiveWin 23.07 ] [ xHarbour 1.3.0 Intl. (SimpLex) (Build 20230914) ]
User avatar
leandro
 
Posts: 1490
Joined: Wed Oct 26, 2005 2:49 pm
Location: Colombia

Re: Ordenar arreglo bidimensional

Postby JoseAlvarez » Fri Apr 15, 2022 10:12 pm

leandro wrote:José buenas noches como vas?

Code: Select all  Expand view

//Ordenamos el array por documento y luego por consecutivo
ASORT(aRspFac,,, { |x, y| if( x["ll_docume"]==y["ll_docume"],;
                val(x["ll_consec"])<val(y["ll_consec"]),;
                x["ll_docume"]<y["ll_docume"] ) })
 


Hola Leandro!

Funcionó perfecto!

Muchas Gracias nuevamente por tu gentil ayuda!
"Los errores en programación, siempre están entre la silla y el teclado..."

Fwh 19.06 32 bits + Harbour 3.2 + Borland 7.4 + MariaDB + TDolphin

Carora, Estado Lara, Venezuela.
User avatar
JoseAlvarez
 
Posts: 764
Joined: Sun Nov 09, 2014 5:01 pm


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 53 guests

cron