JOIN FILE 里面用JDUPSEQ排序怎么不起作用呢？？

zhonglei56

首先建立JOIN FILE
R xxx                JFILE(PF1 PF2 PF3)
J                           JOIN(PF1 PF2)        
                             JFLD(field-a1 field-b1)            
                            JDUPSEQ(field-b2 *DESCEND)   
J                            JOIN(PF1 PF3)        
                             JFLD(field-a1 field-c1)        

KEY：field-a1


field-b2为PF2中的字段，DESCEND代表降序。
各个PF内容如下：
PF1                   PF2                                  PF3
------------------------------------------------------
field-a1              field-b1     field-b2             field-c1
商品1              商品1     001                        商品1
                     商品1     002               

程式里读取JOIN FILE，将记录依次写入某文件，如果有排序的效果，那么写到文件的记录应该是
商品1   002
商品1   001

但是现在 field-b2为001的记录仍然先写进文件，表明没有排序效果。。。。
请教高手这是怎么回事，是这个as400环境不支持DESCEND么？