COBOL प्रोग्रामिंग भाषा में, आप अपने प्रोग्राम के एक सेक्शन में सभी वेरिएबल और डेटा फ़ील्ड को परिभाषित करते हैं जिसे डेटा डिवीजन कहा जाता है। यहां, आप डिस्क फ़ाइलों, मुद्रण लेआउट, काउंटरों और गणना के लिए कार्यशील संग्रहण के लिए रिकॉर्ड सेट करते हैं। आप अधिकांश डेटा फ़ील्ड को विशिष्ट नाम देकर परिभाषित करते हैं, लेकिन FILLER कीवर्ड आपको किसी नाम की आवश्यकता के बिना मेमोरी स्पेस को अलग रखने देता है।
पूरक
FILLER एक आरक्षित शब्द है, जिसका अर्थ है कि आप अलग-अलग मेमोरी तत्वों को परिभाषित करने के अलावा अन्य फ़ील्ड या रिकॉर्ड के नामकरण के लिए शब्द का उपयोग नहीं कर सकते हैं। आप स्तर संख्या के तुरंत बाद और किसी फ़ील्ड के आकार और डेटा प्रकार को परिभाषित करने वाले चित्र खंड से पहले FILLER का उपयोग करते हैं। COBOL डेटा डिवीजन में फिलर के उपयोग को प्रतिबंधित करता है; यह पहचान, पर्यावरण या प्रक्रिया प्रभागों पर लागू नहीं होता है।
दिन का वीडियो
रिकॉर्ड लेआउट
डेटा रिकॉर्ड परिभाषाओं के लिए FILLER के सबसे आम उपयोगों में से एक है। यदि आप 150-वर्ण रिकॉर्ड लंबाई वाली डेटा फ़ाइल का उपयोग करते हैं और आपको इसमें प्रत्येक फ़ील्ड को लेबल करने की आवश्यकता नहीं है, तो आप अनावश्यक वर्णों को FILLER के रूप में परिभाषित कर सकते हैं, जैसा कि निम्न कोड में है:
01 ग्राहक-रिकॉर्ड। 05 फिलर पीआईसी एक्स(10)। 05 ग्राहक-नाम पीआईसी एक्स (30)। 05 ग्राहक-पता PIC X(30)। 05 ग्राहक-शहर पीआईसी एक्स (30)। 05 फिलर पीआईसी एक्स (50)।
इससे आप 150-वर्णों का रिकॉर्ड पढ़ सकते हैं और अपने इच्छित फ़ील्ड की पहचान कर सकते हैं - ग्राहक का नाम, पता और शहर - बाकी रिकॉर्ड को अनदेखा करते हुए।
सबस्ट्रिंग निष्कर्षण
बड़ी स्ट्रिंग से सबस्ट्रिंग निकालने में सहायता के लिए आप FILLER कीवर्ड का उपयोग कर सकते हैं। उदाहरण के लिए, ज़िप कोड के पहले पांच अंक निकालने के लिए, आप वर्किंग-स्टोरेज सेक्शन में निम्नलिखित स्टेटमेंट सेट कर सकते हैं:
01 संपूर्ण-ज़िप-कोड। 05 प्राथमिक-ज़िप PIC X(5)। 05 फिलर पीआईसी एक्स(5)।
प्रक्रिया प्रभाग में, आप ज़िप-प्लस-4 कोड को संपूर्ण-ज़िप-कोड में ले जाते हैं, फिर प्राथमिक-ज़िप को गंतव्य फ़ील्ड में ले जाते हैं। ऐसा करने पर, आप पहले पांच अंकों के बाद सब कुछ छोड़ देते हैं।
भराव और मूल्य
एक रिकॉर्ड में, एक फिलर फ़ील्ड मेमोरी स्पेस को सुरक्षित रखता है और आपके द्वारा इसमें ले जाने वाले किसी भी प्रकार के डेटा को स्वीकार करता है। आप मान रखने के लिए FILLER फ़ील्ड को भी परिभाषित कर सकते हैं। प्रोग्रामर इस तकनीक का उपयोग अक्सर रिपोर्ट शीर्षकों को स्थापित करने के लिए करते हैं, जैसे कि निम्नलिखित उदाहरण में:
01 प्रिंट-लाइन। 05 फिलर PIC X(10) वैल्यू स्पेस। 05 फिलर PIC X(15) मान "वर्ष के अंत की रिपोर्ट"। 05 फिलर PIC X(20) वैल्यू स्पेस। 05 फिलर PIC X(5) मान "पेज"। 05 पेज-नंबर PIC ZZZ9.
ध्यान दें कि रिपोर्ट पेज हेडर टाइटल और स्पेसिंग सभी फिलर के साथ किया जाता है, एक नामित फ़ील्ड को छोड़कर जो पेज नंबर प्रदर्शित करता है।
