Ortak İş Odaklı Dil'in kısaltması olan COBOL, onlarca yıldır iş ve finans sektöründe kalıcı bir varlık göstermektedir. Uzun süreli varlığı, programlama dünyasındaki önemini gösterir. Yirminci yüzyılın ortalarında oluşturulmuş olmasına rağmen, modern iş uygulamalarında, özellikle de dosyaların okunmasını içeren görevlerde hala önemli bir rol oynamaktadır. Bu işlem önemlidir çünkü dosyalar birincil depolama ortamıdır ve dosya verilerinin okunması çoğu iş uygulamasında yaygın olarak gerekli bir görevdir.
Bu makalede, COBOL'da bir dosyayı okuma sürecini derinlemesine inceleyeceğiz, ilgili kodu inceleyeceğiz ve en önemlisi, algılanan karmaşıklıkları ortadan kaldırmak için bunu ilişkilendirilebilir bir biçimde sunacağız.
**COBOL'da bir dosyayı okumak** basit bir işlemdir. Yelken kısmı, ister sıralı okuma ister rastgele okuma olsun, COBOL'un bir dosyayı okurken sağladığı esnekliktir.
GİRİŞ dosya adını açın.
OKU dosya adı
SONUNDA
Dosya sonu göstergesine 'EVET' TAŞIYIN
SON OKU.
İlk satırda dosya açılır ve sonraki dosya işlemlerine hazırlanır. READ ifadesi dosyadaki bir sonraki kaydı alır. Daha fazla kayıt yoksa - yani dosyanın sonuna ulaştık - AT END ifadesi tetiklenir ve dosya sonu göstergesinin değeri 'YES' olarak değiştirilerek bunu belirtir.
Kodu parçalama
Bir dosyayı okumak için Cobol kodunun önemli kısımlarını adım adım inceleyelim:
**OPEN INPUT** ifadesi dosyayı okuma işlemine hazır hale getirir. Dosyanın bildirimi sırasında kullanılan dosya adını (dosya adı) belirtmeniz gerekir.
**READ** ifadesi dosyadaki bir sonraki kaydı belleğe okur. Burada da yine bildirilen dosya adı kullanılmıştır.
**AT END** yan tümcesi, READ işlemi dosya sonu durumuyla karşılaştığında (okunacak başka kayıt olmadığında) yürütülür. Burada, okunacak başka veri kalmadığının sinyalini veren bir bayrak değişkeni (dosya sonu göstergesi) 'EVET' olarak ayarlanır.
[h2]Anahtar COBOL dosyası işleme fiilleri
- AÇIK: Dosyayı sonraki dosya işlemlerine hazırlar.
- OKU: Dosyadan sonraki kaydı okur.
- YAZ: Dosyaya bir kayıt yazar.
- KAPAT: Dosya ile ilgili tüm işlemleri sonlandırır.
- YENİDEN YAZMAK: Dosyadaki bir kaydı değiştirir.
- SİL: Dosyadan bir kaydı kaldırır.
Dosya işlemleri olarak da bilinen COBOL dosya işleme fiilleri, dosyalarda depolanan verilerle etkileşim söz konusu olduğunda kritik öneme sahiptir.
Dosya Okuma Alternatifleri
COBOL, özellikle dizine alınmış ve göreli dosyalar için daha esnek dosya okuma stratejilerine izin vermek amacıyla **BAŞLAT** ve **SONRAKİ OKU** seçenekleri aracılığıyla dosyaları okumak için başka bir seçenek sunar.
BAŞLANGIÇ dosya adı KEY, ws-anahtarına EŞİTTİR.
SONRAKİ OKU dosya adı.
Dosya okumaları tartışmasını tamamlamak için COBOL'un gücü ön plana çıkıyor. COBOL'un iş ve finans operasyonları için çok önemli bir dil olarak varlığını sürdürmesini sağlayan şey, sağlamlığı ve iş gereksinimlerine bağlılığıyla birleşen bu güçtür. COBOL programcıları olarak, kuruluşlarımız için verimli ve etkili sistemler oluşturmak amacıyla bu dosya işleme işlemlerini takdir etmeye ve bu işlemlerde uzmanlaşmaya çalışmalıyız.
