মডিউল পাঠ (2/2)
ভেরিয়েবল এবং PICTURE
COBOL-এ, ব্যবহৃত সমস্ত ভেরিয়েবল অবশ্যই ডেটা ডিভিশন-এর মধ্যে ঘোষণা করতে হবে। বিশেষ করে, প্রোগ্রাম লজিকের জন্য ব্যবহৃত মেমরির অস্থায়ী ভেরিয়েবলগুলি ওয়ার্কিং-স্টোরেজ সেকশন-এর ভিতরে থাকে।
লেভেল নম্বর
COBOL ভেরিয়েবল ডিক্লেয়ারেশন স্তরের সংখ্যা ব্যবহার করে ডেটা ক্রমানুসারে গঠন ও সংগঠিত করে:
01: একটি প্রধান পরিবর্তনশীল বা গ্রুপ আইটেম (সর্বোচ্চ স্তর) সংজ্ঞায়িত করে।05,10,15: একটি স্তরের01গ্রুপ আইটেমের মধ্যে অধীনস্থ ক্ষেত্রগুলিকে সংজ্ঞায়িত করুন৷77: ঐতিহাসিকভাবে নির্দেশিত স্বাধীন প্রাথমিক ভেরিয়েবল যা আরও উপবিভক্ত করা যায়নি।
আধুনিক অনুশীলনে, স্তর 01 সাধারণত স্বাধীন প্রাথমিক ভেরিয়েবল ঘোষণা করতে ব্যবহৃত হয়।
PICTURE (বা PIC) ধারা
PICTURE (সংক্ষেপে PIC) ধারাটি ডেটার ধরন এবং ভেরিয়েবলের অক্ষর দৈর্ঘ্য নির্দিষ্ট করে। তিনটি মৌলিক বিন্যাস অক্ষর হল:
X(আলফানিউমেরিক): অক্ষর, সংখ্যা এবং বিশেষ অক্ষর থাকতে পারে।PIC X(10)ঠিক 10টি অক্ষরের একটি স্ট্রিং ঘোষণা করে৷
9(সাংখ্যিক): শুধুমাত্র সাংখ্যিক সংখ্যা থাকতে পারে।PIC 9(3)একটি পূর্ণসংখ্যা ঘোষণা করে যা 3টি সংখ্যা (999 পর্যন্ত) নিয়ে গঠিত।
V(অন্তর্নিহিত দশমিক বিন্দু): ভগ্নাংশের অংশটি কোথায় শুরু হয় তা উপস্থাপন করতে দশমিক সংখ্যায় ব্যবহৃত হয় (দশমিক বিন্দুটি শারীরিকভাবে সংরক্ষণ করা হয় না)।PIC 9(3)V993টি পূর্ণসংখ্যা সংখ্যা এবং 2 দশমিক স্থান সহ একটি সংখ্যা ঘোষণা করে৷
VALUE ধারা
ঘোষণার সময় একটি ভেরিয়েবলে একটি প্রাথমিক মান নির্ধারণ করতে, VALUE ধারাটি ব্যবহার করুন।
01 WS-PROJECT-NAME PIC X(15) VALUE "ELEARNER".
01 WS-USER-AGE PIC 9(3) VALUE 25.সমস্ত পরিবর্তনশীল সংজ্ঞা অবশ্যই একটি . এর সাথে শেষ হতে হবে।
নিজে চেষ্টা করে দেখুন
20 অক্ষরের WS-USER-NAME নামের একটি লেভেল 01 আলফানিউমেরিক ভেরিয়েবল ঘোষণা করুন এবং এর প্রাথমিক মান 'ALICE' এ সেট করুন।
ইঙ্গিত দেখান
বিন্যাসটি ব্যবহার করুন: 01 WS-USER-NAME PIC X(20) VALUE 'ALICE'৷
সমাধান 3 প্রচেষ্টার পরে উপলব্ধ
25 এর প্রাথমিক মান সহ 3 সংখ্যার WS-USER-AGE নামের একটি স্তর 01 সংখ্যাসূচক পরিবর্তনশীল ঘোষণা করুন।
ইঙ্গিত দেখান
সিনট্যাক্স ব্যবহার করুন: 01 WS-USER-AGE PIC 9(3) VALUE 25।
সমাধান 3 প্রচেষ্টার পরে উপলব্ধ