cobol
ADD कथन

टिप्पणियों

ADD कथन

ADD 1 TO cobol

यह चर cobol को संशोधित करता है। ओवरफ्लो चुपचाप नजरअंदाज कर दिया।

ADD 1 TO cobol GIVING GnuCOBOL

यह cobol संशोधित नहीं करता है, ADD का परिणाम GnuCOBOL में संग्रहीत किया जा रहा है। फिर, भंडारण आवंटन के ओवरफ्लो को चुपचाप नजरअंदाज कर दिया गया (क्षेत्र आकार त्रुटियों पर अपने पुराने मूल्य पर रहेगा और कोई अपवाद नहीं उठाया जाएगा)।

ADD
    a b c d f g h i j k l m n o p q r s t u v w x y z
    GIVING total-of
    ON SIZE ERROR
        PERFORM log-problem
    NOT ON SIZE ERROR
        PERFORM graph-result
END-ADD

भंडारण आकार परीक्षण स्पष्ट होने के साथ कई इनपुट की अनुमति है। COBOL में एक आंतरिक FUNCTION E , इसलिए यह एकल अक्षर पहचानकर्ता के लिए एक बुद्धिमान विकल्प नहीं है।

COBOL में SIZE ERROR टाइप और / या PICTURE पर निर्भर है। PIC 9 फ़ील्ड केवल 0 से 9 तक सुरक्षित रूप से मूल्यों को संग्रहीत करेगा, 10 का एक मध्यवर्ती परिणाम उस मामले में ON SIZE ERROR वाक्यांश को ट्रिगर करेगा।