चर और चित्र

COBOL में, उपयोग किए गए सभी वेरिएबल को डेटा डिवीजन के अंदर घोषित किया जाना चाहिए। विशेष रूप से, प्रोग्राम लॉजिक के लिए उपयोग की जाने वाली मेमोरी में अस्थायी चर वर्किंग-स्टोरेज सेक्शन के अंदर रहते हैं।

लेवल नंबर

COBOL वैरिएबल घोषणा डेटा को पदानुक्रमित रूप से संरचना और व्यवस्थित करने के लिए स्तर संख्याओं का उपयोग करती है:

• 01: एक मुख्य चर या समूह आइटम (उच्चतम स्तर) को परिभाषित करता है।
• 05, 10, 15: एक स्तर 01 समूह आइटम के भीतर अधीनस्थ क्षेत्रों को परिभाषित करें।
• 77: ऐतिहासिक रूप से संकेतित स्वतंत्र प्रारंभिक चर जिन्हें आगे उप-विभाजित नहीं किया जा सका।

आधुनिक व्यवहार में, स्तर 01 का उपयोग आमतौर पर स्वतंत्र प्रारंभिक चर घोषित करने के लिए किया जाता है।

चित्र (या तस्वीर) खंड

PICTURE (संक्षिप्त रूप में PIC) क्लॉज डेटा के प्रकार और वेरिएबल की वर्ण लंबाई निर्दिष्ट करता है। तीन मूलभूत प्रारूप वर्ण हैं:

1. X (अल्फ़ान्यूमेरिक): इसमें अक्षर, संख्याएँ और विशेष वर्ण हो सकते हैं।
   • PIC X(10) बिल्कुल 10 वर्णों की एक स्ट्रिंग घोषित करता है।
2. 9 (संख्यात्मक): इसमें केवल संख्यात्मक अंक हो सकते हैं।
   • PIC 9(3) 3 अंकों (999 तक) से बना एक पूर्णांक घोषित करता है।
3. V (अंतर्निहित दशमलव बिंदु): दशमलव संख्याओं में यह दर्शाने के लिए उपयोग किया जाता है कि भिन्नात्मक भाग कहाँ से शुरू होता है (दशमलव बिंदु भौतिक रूप से संग्रहीत नहीं होता है)।
   • PIC 9(3)V99 3 पूर्णांक अंकों और 2 दशमलव स्थानों के साथ एक संख्या घोषित करता है।

मूल्य खंड

घोषणा के समय किसी वेरिएबल को प्रारंभिक मान निर्दिष्ट करने के लिए, VALUE क्लॉज़ का उपयोग करें।

01 WS-PROJECT-NAME PIC X(15) VALUE "ELEARNER".
01 WS-USER-AGE     PIC 9(3)  VALUE 25.

सभी परिवर्तनीय परिभाषाएँ . अवधि के साथ समाप्त होनी चाहिए।

खुद कोशिश करना