input-input section

Input-output Section.

Seksi ini digunakan bila anda akan menggunakan file ( akan dibahas lebih lanjut dalam operasi file). Bentuk umum adalah :
INPUT-OUTPUT SECTION. FILE-CONTROL.
{ file-control entry }.


Contoh Program 1.

TEST.COB Mon Aug 21 18:46:47 2006 Page 1 line number source line Microsoft COBOL Version 2.20

1 IDENTIFICATION DIVISION.
2 PROGRAM-ID. COBA.
3 AUTHOR. SAYA.
4 ENVIRONMENT DIVISION.
5 CONFIGURATION SECTION.
6 SOURCE-COMPUTER. IBM-PC.
7 OBJECT-COMPUTER. IBM-PC.
8 SPECIAL-NAMES.
9 DECIMAL-POINT IS COMMA.
10 DATA DIVISION.
11 WORKING-STORAGE SECTION.
12 01 HASIL.
13 02 NILAI PIC 9999,99.
14 SCREEN SECTION.
15 01 HAPUS-LAYAR.
16 02 BLANK SCREEN.
17 PROCEDURE DIVISION.
18 MULAI.
19 MOVE 4612,34 TO NILAI.
20 DISPLAY 'ANGKA = ', NILAI.
21 SELESAI.
22 STOP RUN.
23