Terminal control/Ringing the terminal bell: Difference between revisions
Content added Content deleted
imported>Acediast (→{{header|COBOL}}: changed to COBOL-85 since that's more descriptive) |
imported>Acediast (→{{header|COBOL}}: Changed to specify standard since this is a standard feature.) |
||
Line 293: | Line 293: | ||
=={{header|COBOL}}== |
=={{header|COBOL}}== |
||
Using the standard screen section: |
Using the standard screen section: |
||
{{works with| |
{{works with|X/Open COBOL}} |
||
{{works with|COBOL 2002}} |
|||
<syntaxhighlight lang="cobol"> IDENTIFICATION DIVISION. |
<syntaxhighlight lang="cobol"> IDENTIFICATION DIVISION. |
||
PROGRAM-ID. ring-terminal-bell. |
PROGRAM-ID. ring-terminal-bell. |
||
Line 303: | Line 304: | ||
PROCEDURE DIVISION. |
PROCEDURE DIVISION. |
||
DISPLAY ringer |
DISPLAY ringer |
||
STOP RUN. |
|||
END PROGRAM ring-terminal-bell.</syntaxhighlight> |
END PROGRAM ring-terminal-bell.</syntaxhighlight> |