Very simply stated the code I suggested Right Justified the data.

Instead of:

A1---
A11--
A12--
A13--
...
A111

By right justifying the data:

---A1
---A2
---A3
...
--A10
--A11

  padl(TRIM('XXX   '),FSIZE('DATAFIELD','DATATABLE'))

Means:
Trim the data to the right.
add spaces to the left
to make the entire length the same as the field size of the datafield specified in the table specified.

Glenn

>I’m sorry that I answer late.
>Your code resolving the problem and sorting the data excellent
>I didn't understand why your code fixing the problem.
>Would you like to explain me?