Dosya Tanımlama ve Dosya Kontrolü

COBOL'da harici dosyaların (metin arşivleri veya diskteki ikili kayıtlar gibi) yönetilmesi, toplu kurumsal uygulamalar için en önemli özelliklerden biridir. COBOL modern veritabanlarından çok önce tasarlandığından, disk dosyaları birincil depolama görevi görür.

İşletim sisteminde saklanan fiziksel dosyaların programın dahili değişkenlerine bağlanması iki aşamada gerçekleşir:

1. ENVIRONMENT DIVISION'daki mantıksal-fiziksel ilişki.
2. DATA DIVISION'deki veri kaydının tanımı.

1. İlişkilendirme: DOSYA KONTROLÜ ve SELECT ASSIGN

Program yapısına ayrılan bölümde ENVIRONMENT DIVISION'yi inceledik. İçinde INPUT-OUTPUT SECTION, program tarafından kullanılan harici dosyaları bildiren FILE-CONTROL paragrafını içerir.

Programdaki mantıksal bir dosyayı (örneğin, SALES-FILE) diskteki gerçek bir fiziksel dosyayla (örneğin, sales.dat) ilişkilendirmek için SELECT ... ASSIGN TO ... ifadesini kullanın:

       ENVIRONMENT DIVISION.
       INPUT-OUTPUT SECTION.
       FILE-CONTROL.
           SELECT SALES-FILE ASSIGN TO "sales.dat"
               ORGANIZATION IS LINE SEQUENTIAL.

• SELECT SALES-FILE: Programın dosyaya başvurmak için kullanacağı mantıksal adı tanımlar.
• ASSIGN TO "sales.dat": Diskteki gerçek fiziksel dosya adını (veya yolunu) belirtir.
• ORGANIZATION IS LINE SEQUENTIAL (isteğe bağlı): Dosyanın, her satırın bir kaydı temsil ettiği (yeni satır karakterleriyle ayrılmış) bir düz metin dosyası olduğunu belirtir.

2. Beyan: DOSYA BÖLÜMÜ ve FD

ENVIRONMENT DIVISION içindeki dosyayı ilişkilendirdikten sonra DATA DIVISION içindeki kayıtlarının yapısını tanımlamamız gerekir. Bunu yapmak için FILE SECTION (WORKING-STORAGE SECTION'den önce gelir) adlı özel bir bölüm kullanırız.

Seçilen her dosya, kayıt yapısını bildiren bir FD (Dosya Açıklaması) girişine sahip olmalıdır:

       DATA DIVISION.
       FILE SECTION.
       FD SALES-FILE.
       01 SALES-RECORD.
           05 EMP-ID       PIC 9(5).
           05 EMP-NAME     PIC X(20).
           05 EMP-SALARY   PIC 9(6)V99.

• FD SALES-FILE.: SALES-FILE mantıksal adı için dosya açıklamasını tanımlar. Bir nokta ile bittiğini unutmayın.
• 01 SALES-RECORD.: Dosyayla ilişkili grup yapısını (kaydı) belirtir. Her okuma/yazma işlemi bu bellek yapısını kullanarak veri alışverişinde bulunacaktır.

Deneyin