Khalidah / Pemrograman Olah Berkas
1
PEMROGRAMAN OLAH BERKAS PERTEMUAN 5 PROCEDURE DIVISION KHALIDAH
PROCEDURE DIVISION 2
Pernyataan STOP dan MOVE Pernyataan DISPLAY dan ACCEPT Operasi Aritmatika : • • • • •
ADD, SUBSTRACT, DIVIDE, MULTIPLY dan COMPUTE.
Khalidah / Pemrograman Olah Berkas
STOP VERB 3
Verb ini digunakan untuk menghentikan program baik secara permanen maupun secara sementara saja, yang kemudian proses dilanjutkan kembali.
Khalidah / Pemrograman Olah Berkas
program dapat
MOVE VERB 4
Verb ini berguna untuk memindahkan data dari satu field ke lokasi field yang lain, sehingga input data dapat dimanipulasi untuk menghasilkan output. Contoh : MOVE UNIT TO UNIT-OUT
Khalidah / Pemrograman Olah Berkas
DISPLAY & ACCEPT VERB 5
Display Verb dipergunakan untuk menampilkan hasil di layar ataupun di printer. Accept Verb dipergunakan untuk input data sewaktu program tersebut dijalankan.
Khalidah / Pemrograman Olah Berkas
CONTOH DISPLAY & ACCEPT VERB 6
Khalidah / Pemrograman Olah Berkas
CONTOH DISPLAY & ACCEPT VERB 7
Khalidah / Pemrograman Olah Berkas
OPERASI ARITMATIKA (ADD) 8
Verb ini digunakan untuk menambahkan 2 atau lebih operand numerik dan menyimpan hasilnya. Terdapat 2 jenis ADD yang digunakan : ADD . . . TO ADD . . . GIVING Khalidah / Pemrograman Olah Berkas
ADD . . . TO 9
ADD 15 TO A
ADD 17 TO A A
A
Sebelum
0
Sebelum
15
Sesudah
15
Sesudah
32
Berarti A = A + 15 = 0 + 15 = 15
Berarti A = A + 17 = 15 + 17 = 23
Khalidah / Pemrograman Olah Berkas
PROGRAM 1 10
Khalidah / Pemrograman Olah Berkas
HASIL PROGRAM 1 11
Khalidah / Pemrograman Olah Berkas
ADD . . . TO 12
Add A , 15 TO B
Add A , 9 TO B
A
B
Sebelum
2
10
Sesudah
2
27
A
B
Sebelum
17
9
Sesudah
17
35
Berarti B = B + A + 15 Berarti B = 10 + 2 + 15 = 27 Khalidah / Pemrograman Olah Berkas
=B+A+9 = 9 + 17 + 9 = 35
PROGRAM 1 13
Khalidah / Pemrograman Olah Berkas
HASIL PROGRAM 1 14
Khalidah / Pemrograman Olah Berkas
PROGRAM 2 15
Khalidah / Pemrograman Olah Berkas
HASIL PROGRAM 2 16
Khalidah / Pemrograman Olah Berkas
ADD . . . GIVING 17
ADD A, 5 GIVING B A
B
Sebelum
1
20
Sesudah
1
6
Berarti B = A + 5 =1+5 =6
Khalidah / Pemrograman Olah Berkas
PROGRAM 1 18
Khalidah / Pemrograman Olah Berkas
HASIL PROGRAM 1 19
Khalidah / Pemrograman Olah Berkas
OPERASI ARITMATIKA (SUBTRACT) 20
Verb ini digunakan untuk membentuk statement operasi aritmatika pengurangan suatu nilai operand numerik. Bila melakukan pengurangan suatu nilai maka digunakan bentuk FROM.
Khalidah / Pemrograman Olah Berkas
SUBTRACT 21
SUBSTRACT A FROM B
SUBSTRACT 5 FROM A
A
B
Sebelum
5
15
Sebelum
9
Sesudah
5
10
Sesudah
0
Berarti B = B – A = 15 – 5 = 10
A
Berarti A = A – 5 =9–5 =4
Khalidah / Pemrograman Olah Berkas
PROGRAM 1 22
Khalidah / Pemrograman Olah Berkas
HASIL PROGRAM 1 23
Khalidah / Pemrograman Olah Berkas
PROGRAM 2 24
Khalidah / Pemrograman Olah Berkas
HASIL PROGRAM 2 25
Khalidah / Pemrograman Olah Berkas
SUBSTRACT 26
SUBSTRACT A, B FROM C A
B
C
Sebelum
4
5
15
Sesudah
1
2
0
Berarti C = C – A – B =15 – 4 – 5 =6
Khalidah / Pemrograman Olah Berkas
PROGRAM 1 27
Khalidah / Pemrograman Olah Berkas
HASIL PROGRAM 1 28
Khalidah / Pemrograman Olah Berkas
DIVIDE 29
Verb ini digunakan untuk membentuk statement operasi pembagian.
Khalidah / Pemrograman Olah Berkas
DIVIDE 30
DIVIDE A INTO B A
B
Sebelum
10
50
Sesudah
10
5
Berarti B
=B/A = 50 / 10 =5 Khalidah / Pemrograman Olah Berkas
DIVIDE 31
DIVIDE A INTO B GIVING C A
B
C
Sebelum
10
50
75
Sesudah
10
50
5
Berarti C = B / A = 50 / 10 =5
Khalidah / Pemrograman Olah Berkas
DIVIDE 32
DIVIDE A BY B GIVING C A
B
C
Sebelum
8
2
15
Sesudah
8
2
4
Berarti C
=A/B =8/2 =4
Khalidah / Pemrograman Olah Berkas
DIVIDE 33
DIVIDE A BY 5 GIVING B A
B
Sebelum
15
4
Sesudah
1
3
Berarti B
=A/5 = 15 / 5 =3
Khalidah / Pemrograman Olah Berkas
MULTIPLY 34
Verb ini digunakan untuk membentuk statement perkalian dua nilai numerik dan menyimpan hasilnya.
Khalidah / Pemrograman Olah Berkas
MULTIPLY 35
MULTIPLY A BY B A
B
Sebelum
2
5
Sesudah
2
10
Berarti B
=BxA =5x2 = 10
Khalidah / Pemrograman Olah Berkas
PROGRAM 1 36
Khalidah / Pemrograman Olah Berkas
HASIL PROGRAM 1 37
Khalidah / Pemrograman Olah Berkas
MULTIPLY 38
MULTIPLY 9 BY A
Catatan :
A Sebelum
100
Sesudah
900
Berarti A = A x 9 = 100 x 9 =900
MULTIPLY A BY 9 Bentuk ini salah, Literal tidak terletak setelah BY bila GIVING tidak digunakan
Khalidah / Pemrograman Olah Berkas
MULTIPLY 39
MULTIPLY A BY 9 GIVING B A
B
Sebelum
12
25
Sesudah
12
108
Berarti B
=Ax9 = 12 x 9 = 108
Khalidah / Pemrograman Olah Berkas
SUMBER 40
Jogiyanto H.M,Teori dan Aplikasi program bahasa COBOL, Penerbit Andi Offset. Yogyakarta, 1991
Khalidah / Pemrograman Olah Berkas