- Agregado el ordenamiento alfabético de los índices de las tablas

foxbin2prg.prg

@@ -16042,7 +16042,7 @@ DEFINE CLASS CL_DBC_BASE AS CL_CUS_BASE
 		TRY
 			WITH THIS AS CL_DBC_BASE OF 'FOXBIN2PRG.PRG'
 				GO TOP IN TABLABIN
-				lcHeader	= TABLABIN.property
+				lcHeader	= TABLABIN.Property
 				._Name	= UPPER( JUSTFNAME( DBF("TABLABIN") ) )
 
 				DO WHILE .T.
@@ -17558,6 +17558,7 @@ DEFINE CLASS CL_DBC_INDEXES_DB AS CL_DBC_COL_BASE
 			SELECT LOWER(TB.objectName) FROM TABLABIN TB ;
 				INNER JOIN TABLABIN TB2 ON STR(TB.ParentID)+TB.ObjectType = STR(TB2.ObjectID)+PADR('Index',10) ;
 				AND TB2.objectName = PADR(LOWER(tcTable),128) ;
+				ORDER BY 1 ;
 				INTO ARRAY laIndexes
 			lnIndex_Count	= _TALLY
 
@@ -19473,6 +19474,7 @@ DEFINE CLASS CL_DBF_INDEXES AS CL_COL_BASE
 				ENDTEXT
 
 				tnTagInfo_Count	= ATAGINFO( taTagInfo )
+				ASORT( taTagInfo, 1, -1, 0, 1 )
 				loIndex			= CREATEOBJECT("CL_DBF_INDEX")
 
 				FOR I = 1 TO tnTagInfo_Count