Array - ordenar un array

stPoliza                   is Structure
    dFecha is Date
    sTipoPoliza         is string
    nNoPoliza is int
    sCuenta is string
    nNumeroMov is int
    sTipoMovto is string
    cyImporte is currency
    sConceptoMovto is string
    sConceptoPoliza is string
END
arrPolizas         is array of stpoliza
stUnaPoliza             is stPoliza

nContador  is int  = 0

sNombreArchivoExcel is string     = EDT_File_Name..Value
nNumArchivoExcel    is int     = xlsOpen(sNombreArchivoExcel)
nLineasArchivoExcel is int     = xlsNbRow(nNumArchivoExcel)
FOR nContador     = 26 TO nLineasArchivoExcel  //NO CONSIDERO ENCABEZADOS
STC_Avance     = nContador
stUnaPoliza.dFecha     = StringToDate(xlsData(nNumArchivoExcel,nContador,01),"DD/MM/YYYY")
stUnaPoliza.sTipoPoliza     = NoSpace(xlsData(nNumArchivoExcel,nContador,02, False))
stUnaPoliza.nNoPoliza     = xlsData(nNumArchivoExcel,nContador,03, False)
stUnaPoliza.sCuenta     = xlsData(nNumArchivoExcel,nContador,04, False)
stUnaPoliza.nNumeroMov          = xlsData(nNumArchivoExcel,nContador,05, False)
stUnaPoliza.sTipoMovto     = NoSpace(xlsData(nNumArchivoExcel,nContador,06, False))
stUnaPoliza.cyImporte     = Val(xlsData(nNumArchivoExcel,nContador,07, False))
stUnaPoliza.sConceptoMovto     = xlsData(nNumArchivoExcel,nContador,08, False)
stUnaPoliza.sConceptoPoliza    = xlsData(nNumArchivoExcel,nContador,09, False)
arrPolizas.Add(stUnaPoliza)
END
xlsClose(nNumArchivoExcel)  //cierro el archivo fuente
//ordeno el array
ArraySort(arrPolizas,asMember, "sTipoPoliza;nNoPoliza")