File Section Pada Cobol

FILE SECTION Menerangkan wacana file yg digunakan dalam program, mencakup nama-file, cara erekaman, jumlah record per block, jumlah abjad per record, label serta nama dari record tersebut.

Bentuk Umum FILE SECTION

DATA DIVISION.
FILE SECTION.
FD nama-file
      [ BLOCK CONTAINS [ int1 TO int2 ] { CHARACTERS/RECORDS } ]
      [ RECORD CONTAINS [ int3 TO int4 ] CHARACTERS ]
      LABEL {RECORD IS/RECORDS ARE} {STANDARD/OMITTED}
            [VALUE OF FILE-ID IS nama-file-di-label ]

            [DATA {RECORD IS/RECORDS ARE} nama-rec1 [ , nama-rec2] ]

Keterangan :

BLOCK CONTAINS clause

Menunjukkan ukuran record di dalam file untuk tiap-tiap blocknya. Clause ini biasanya digunakan untuk file yg berupa tape magnetik, sifatnya optional. Bila tidak ditulis maka dianggap setiap block berisi 1 record.

RECORD CONTAINS clause

Menunjukkan banyaknya abjad untuk tiap-tiap record di dalam file. Jika clause ini tidak ditulis, maka panjang record diambil dari record description entry. Jika panjang record tetap, maka panjang record ini ditunjukkan oleh nilai dari int1.

LABEL RECORD atau LABEL RECORDS clause

Menunjukkan apakah file yg dipergunakan memiliki label atau tidak.
OMMITED digunakan untuk card-file atau print-file yang tidak memiliki file.
STANDARD digunakan untuk disk-file yg memiliki label

Clause ini harus ditulis kalau FILE SECTION ada.

VALUE OF FILE-ID clause

Berisi warta mengenai file yg memiliki label di disk. Label di disk ini berupa
suatu nama-file yg berisi data yg direkam di dalam disk tsb.

DATA RECORD atau DATA RECORDS clause

Menunjukkan nama-record di dalam file, sifatnya optional.