在cobol/400中DATABASE和disk和WORKSTATION的区别

超越自己-勇

SELECT AAESDFKD                                              CBLUPDK1
             ASSIGN TO WORKSTATION-AAESDFKD-SI                          CBLUPDK1
             ORGANIZATION IS TRANSACTION                                CBLUPDK1
             ACCESS MODE IS DYNAMIC                                     CBLUPDK1
             RELATIVE KEY IS ZZRR                                       CBLUPDK1
             FILE STATUS IS FILE-STATUS, MAJOR-MINOR-CODE.              CBLUPDK1
      *    DSP: 0DF内部作??位代??? DISPLAY FILE
      *                                                                 CBLUPDK1
           SELECT AAAIREL1                                              CBLUPDK1
             ASSIGN TO DATABASE-AAAIREL1                                CBLUPDK1
             ORGANIZATION IS INDEXED                                    CBLUPDK1
             ACCESS MODE IS DYNAMIC                                     CBLUPDK1
             RECORD KEY IS EXTERNALLY-DESCRIBED-KEY                     CBLUPDK1
             FILE STATUS IS FILE-STATUS.                                CBLUPDK1
           SELECT AAAIR2                                              CBLUPDK1
             ASSIGN TO disk-AAAIR2                                CBLUPDK1
             ORGANIZATION IS INDEXED                                    CBLUPDK1
             ACCESS MODE IS DYNAMIC                                     CBLUPDK1
             RECORD KEY IS EXTE-KEY                     CBLUPDK1
             FILE STATUS IS FILE-STATUS.                                CBLUPDK1

xuguopeng

声明DSPF和PRTF的时候用WORKSTATION
声明LF或PF的时候使用DATABASE

DISK我不知道,我只知道RPG中DISK是在声明LF或PF的时候用的