FILE SECTION PADA COBOL

FILE SECTION Menerangkan tentang file yg dipakai dalam program, meliputi nama-file, cara erekaman, jumlah record per block, jumlah karakter 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 karakter 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 mempunyai label atau tidak.
OMMITED digunakan untuk card-file atau print-file yang tidak mempunyai file.
STANDARD digunakan untuk disk-file yg mempunyai label

Clause ini harus ditulis jika FILE SECTION ada.

VALUE OF FILE-ID clause

Berisi informasi mengenai file yg mempunyai 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.

Komentar

Postingan populer dari blog ini

statement kondisi pada qbasic

statement dasar qbasic

jenis jenis array pada qbasic