Ordering in Getall and getCollectionByAttribu

[Marcos Flavio de Oliveira]

The default ordering is ascend in this code:

    ' If the collection isn't nothing.
    If Not IsNothing(pOrderCol) Then
      ' For each attribute in collection, add a order attribute in retrieve criteria.
      For inIndex = 1 To pOrderCol.Count
        boAscend = True
        If Not IsNothing(pOrderAscCol) Then
          If Not pOrderAscCol.Item(pOrderCol.Item(inIndex)) Is Nothing Then
            boAscend = pOrderAscCol.Item(pOrderCol.Item(inIndex))
          End If
        End If
        obRC.addOrderAttributeByAscend(pOrderCol(inIndex), boAscend)
      Next
    End If