ప్రధాన కంటెంట్‌కు వెళ్లండి
మాడ్యూల్ 1 · 2లో పాఠం 2కోర్సులో 2/10~12 min
మాడ్యూల్ పాఠాలు (2/2)

వేరియబుల్స్ మరియు పిక్చర్

COBOLలో, ఉపయోగించిన అన్ని వేరియబుల్స్ తప్పనిసరిగా డేటా డివిజన్ లోపల డిక్లేర్ చేయబడాలి. ప్రత్యేకించి, ప్రోగ్రామ్ లాజిక్ కోసం ఉపయోగించిన మెమరీలో తాత్కాలిక వేరియబుల్స్ పని-నిల్వ విభాగం లోపల ఉంటాయి.

స్థాయి సంఖ్యలు

COBOL వేరియబుల్ డిక్లరేషన్ డేటాను క్రమానుగతంగా రూపొందించడానికి మరియు నిర్వహించడానికి స్థాయి సంఖ్యలను ఉపయోగిస్తుంది:

  • 01: ప్రధాన వేరియబుల్ లేదా సమూహ అంశాన్ని నిర్వచిస్తుంది (అత్యున్నత స్థాయి).
  • 05, 10, 15: స్థాయి 01 సమూహ అంశంలో అధీన ఫీల్డ్‌లను నిర్వచించండి.
  • 77: చారిత్రాత్మకంగా సూచించబడిన స్వతంత్ర ప్రాథమిక వేరియబుల్స్, వాటిని మరింత ఉపవిభజన చేయడం సాధ్యం కాదు.

ఆధునిక ఆచరణలో, స్వతంత్ర ఎలిమెంటరీ వేరియబుల్‌లను ప్రకటించడానికి 01 స్థాయి సాధారణంగా ఉపయోగించబడుతుంది.

చిత్రం (లేదా PIC) నిబంధన

PICTURE (సంక్షిప్తంగా PIC) నిబంధన డేటా రకం మరియు వేరియబుల్ యొక్క అక్షర పొడవును పేర్కొంటుంది. మూడు ప్రాథమిక ఫార్మాట్ అక్షరాలు:

  1. X (ఆల్ఫాన్యూమరిక్): అక్షరాలు, సంఖ్యలు మరియు ప్రత్యేక అక్షరాలు ఉండవచ్చు.
    • PIC X(10) ఖచ్చితంగా 10 అక్షరాల స్ట్రింగ్‌ను ప్రకటించింది.
  2. 9 (సంఖ్యా): సంఖ్యా అంకెలను మాత్రమే కలిగి ఉంటుంది.
    • PIC 9(3) 3 అంకెలతో కూడిన పూర్ణాంకాన్ని ప్రకటించింది (999 వరకు).
  3. V (ఇంప్లిసిట్ డెసిమల్ పాయింట్): పాక్షిక భాగం ఎక్కడ ప్రారంభమవుతుందో సూచించడానికి దశాంశ సంఖ్యలలో ఉపయోగించబడుతుంది (దశాంశ బిందువు భౌతికంగా నిల్వ చేయబడదు).
    • PIC 9(3)V99 3 పూర్ణాంకాల అంకెలు మరియు 2 దశాంశ స్థానాలతో ఒక సంఖ్యను ప్రకటిస్తుంది.

VALUE నిబంధన

డిక్లరేషన్ సమయంలో వేరియబుల్‌కు ప్రారంభ విలువను కేటాయించడానికి, VALUE నిబంధనను ఉపయోగించండి.

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

అన్ని వేరియబుల్ నిర్వచనాలు తప్పనిసరిగా . వ్యవధితో ముగియాలి.


మీరే ప్రయత్నించండి

వ్యాయామం#cobol.m1.l2.e1
ప్రయత్నాలు: 0లోడ్ అవుతోంది...

20 అక్షరాల పొడవు గల WS-USER-NAME పేరుతో లెవల్ 01 ఆల్ఫాన్యూమరిక్ వేరియబుల్‌ని ప్రకటించి, దాని ప్రారంభ విలువను 'ALICE'కి సెట్ చేయండి.

ఎడిటర్ లోడ్ అవుతోంది…
సూచనను చూపించు

ఈ ఆకృతిని ఉపయోగించండి: 01 WS-USER-NAME PIC X(20) VALUE 'ALICE'.

3 ప్రయత్నాల తర్వాత పరిష్కారం లభిస్తుంది

వ్యాయామం#cobol.m1.l2.e2
ప్రయత్నాలు: 0లోడ్ అవుతోంది...

25 ప్రారంభ విలువతో 3 అంకెల WS-USER-AGE పేరుతో స్థాయి 01 సంఖ్యా వేరియబుల్‌ని ప్రకటించండి.

ఎడిటర్ లోడ్ అవుతోంది…
సూచనను చూపించు

వాక్యనిర్మాణాన్ని ఉపయోగించండి: 01 WS-USER-AGE PIC 9(3) VALUE 25.

3 ప్రయత్నాల తర్వాత పరిష్కారం లభిస్తుంది