Progress OpenEdge如何按字符长度排序

Progress OpenEdge how to sort by length of char

这里是新手问题。 我如何按 LEN(Firstname) Desc 然后按 lastName asc 对员工 table 进行排序?

这是我目前的代码:

output to /usr2/appsrv/test/Test.txt.
def var dRow as char.
for each emp by emp.FirstName no-lock:
  dRow = substitute ("&1,&2", emp.FirstName, emp.LastName).
  put unformatted dRow skip.
end.
put unformatted dRow skip.
output close.

我的版本是 11.3.3

谢谢

for each emp no-lock by emp.FirstName desc by emp.LastName :
for each emp by length( emp.firstName ) descending by lastName:
  display emp.firstName emp.lastName.
end.

如果这是一个大的table,性能会很糟糕table。