ENVIRONMENT DIVISION

File-control entry bisa terdiri dari 3 bentuk tergantung organisasi file yang akan dipergunakan.

Organisasi file dapat berupa sequential file, indexed file dan relative file.

INPUT-OUTPUT SECTION UNTUK SEQUENTIAL FILE

INPUT-OUTPUT SECTION.

FILE-CONTROL.

SELECT nama_file ASSIGN TO    DISK

      PRINTER

  [ ORGANIZATION IS SEQUENTIAL ]

  [ ACCESS MODE IS SEQUENTIAL ]

  [ FILE STATUS IS nama_data ].

INPUT-OUTPUT SECTION UNTUK INDEXED FILE

INPUT-OUTPUT SECTION.

FILE-CONTROL.

SELECT nama_file ASSIGN TO DISK

  [ ORGANIZATION IS INDEXED ]

    SEQUENTIAL

   ACCESS MODE IS        RANDOM

    DYNAMIC

  [ FILE STATUS IS nama_data ].

INPUT-OUTPUT SECTION UNTUK RELATIVE FILE

INPUT-OUTPUT SECTION.

FILE-CONTROL.

SELECT nama_file ASSIGN TO DISK

  [ ORGANIZATION IS RELATIVE ]

           SEQUENTIAL

   ACCESS MODE IS    RANDOM

           DYNAMIC

  [ FILE STATUS IS nama_data ].