400/COBOL中，无键字文件如何声明，请高手指教

waiting811013

如题，
   环境部定义如下：
SELECT   XXXXX       ASSIGN TO DATABASE-XXXXX     
         ORGANIZATION IS  INDEXED                 
         ACCESS MODE  IS  DYNAMIC                 
         RECORD KEY   IS  EXTERNALLY-DESCRIBED-KEY
                          WITH  DUPLICATES.
数据部描述：
      FD  xxxxx.                       
01  xxxxx-REC.                  
   COPY DDS-ALL-FORMATS OF xxxxx.

对此文件有个写操作，编译提示：文件类型定义不正确，请高手指点，此文件无键字

giggsone

SELECT   XXXXX       ASSIGN TO DATABASE-XXXXX
              ORGANIZATION     IS  SEQUENTIAL        
              ACCESS MODE      IS  SEQUENTIAL        
你试试

没想到

文件没有键字，为什么要定义成 RECORD KEY   IS  EXTERNALLY-DESCRIBED-KEY ?

无键字文件可以直接写成

SELECT xx        ASSIGN TO DATABASE-xx  
                    ORGANIZATION IS SEQUENTIAL      
                    ACCESS IS SEQUENTIAL            
                    FILE STATUS FILE-STATUS-xx.

waiting811013

谢谢，问题已经解决了