మాడ్యూల్ పాఠాలు (1/2)
పేరాగ్రాఫ్లు మరియు PERFORM
COBOLలో, PROCEDURE DIVISION లోపల కోడ్ యొక్క మాడ్యులారిటీ మరియు లాజికల్ స్ట్రక్చరింగ్ అనేది ఫంక్షన్లు లేదా పద్ధతుల ద్వారా జరగదు, కానీ పేరాగ్రాఫ్లు మరియు PERFORM స్టేట్మెంట్ ద్వారా జరుగుతుంది.
పేరాగ్రాఫ్లను నిర్వచించడం
పేరా అనేది కాలమ్ 8 (ఏరియా A) వద్ద . వ్యవధితో ముగిసే పేరుతో ప్రారంభమయ్యే కోడ్ యొక్క లేబుల్ విభాగం, ఆ తర్వాత కాలమ్ 12 (ఏరియా B) వద్ద సూచనల క్రమం ఉంటుంది.
DISPLAY-MESSAGE.
DISPLAY "This is a paragraph!".పేరాగ్రాఫ్లు చాలా పొడవైన ప్రోగ్రామ్లను పునర్వినియోగపరచదగిన మరియు స్వీయ-డాక్యుమెంటింగ్ బ్లాక్లుగా విభజించడానికి అనుమతిస్తాయి.
PERFORMతో పేరాగ్రాఫ్లను అమలు చేయడం
PERFORM స్టేట్మెంట్ పేరాగ్రాఫ్ను అమలు చేస్తుంది మరియు అమలు చేస్తుంది, ఆపై PERFORM స్టేట్మెంట్ను అనుసరించి వెంటనే సూచనలకు నియంత్రణను అందిస్తుంది.
PROCEDURE DIVISION.
MAIN-PROCEDURE.
DISPLAY "Starting program...".
PERFORM PROCESS-DATA.
DISPLAY "Ending program.".
STOP RUN.
PROCESS-DATA.
DISPLAY "Processing data in memory...".పై జాబితాలో:
MAIN-PROCEDUREలోపలDISPLAYఅమలు చేయబడింది.PERFORM PROCESS-DATAPROCESS-DATAపేరాకు శాఖల అమలు.PROCESS-DATAపేరా ముగిసిన తర్వాత, "ముగిస్తున్న ప్రోగ్రామ్"ని ప్రింట్ చేయడానికి అమలుMAIN-PROCEDUREకి తిరిగి వస్తుంది. మరియుSTOP RUN.ని ఉపయోగించడం ఆపివేయండి.
మీరే ప్రయత్నించండి
DISPLAYని ఉపయోగించి 'మొత్తం పూర్తయింది' అని ప్రింట్ చేసే DISPLAY-TOTAL అనే పేరాను నిర్వచించండి మరియు ప్రోగ్రామ్ను ఆపివేసే ముందు దాన్ని PERFORMని ఉపయోగించి మెయిన్-ప్రోసీడర్లో కాల్ చేయండి.
సూచనను చూపించు
ప్రదర్శన-మొత్తం పనితీరును వ్రాయండి. నిలువు వరుస 12 వద్ద, మరియు MAIN-PROCEDURE బ్లాక్ దిగువన DISPLAY-TOTALని ప్రకటించండి. కాలమ్ 8 వద్ద పేరా.
3 ప్రయత్నాల తర్వాత పరిష్కారం లభిస్తుంది
MAIN-PROCEDURE బ్లాక్లో రెండు పేరాగ్రాఫ్లను వరుసగా కాల్ చేయండి, మొదట INITIALIZE-DATA ఆపై PROCESS-DATA.
సూచనను చూపించు
నిలువు వరుస 12 వద్ద వరుస క్రమంలో రెండు PERFORM స్టేట్మెంట్లను చొప్పించండి.
3 ప్రయత్నాల తర్వాత పరిష్కారం లభిస్తుంది