Move Verb Pada Cobol
Pengertian move verb pada cobol
MOVE verb
MOVE verb merupakan salah satu perintah yang penting didalam bahasa pemrograman COBOL. Verb ini berkhasiat untuk memindahkan data dari satu field ke lokasi field yang lain, sehingga input data dapat dimanipulasi untuk enghasilkan output.
Bentuk dari statement MOVE :
Contoh MOVE verb
01 KIRIM.
02 UNIT PIC 9(3).
02 HARGA PIC 9(5).
01 TERIMA.
02 UNIT-OUT PIC 9(3).
02 HARGA-OUT PIC 9(7).
Statement dalam PROCEDURE DIVISION sebagai berikut :
MOVE UNIT TO UNIT-OUT.
- Akan memindahkan nilai data dari field UNIT ke field UNIT-OUT
MOVE KIRIM TO TERIMA.
- Akan memindahkan 8 aksara dari field group item KIRIM ke 10 aksara secara bersamaan ke field group item TERIMA.Group item yang dipindahkan akan diperlakukan sebagai nilai alphanumerik,tidak memandang bentuk dari PICTURE masing-masing elemen data item.Sehingga bersifat Left-justified.
Bentuk yang khusus dari MOVE verb ialah MOVE CORRSPONDING, dengan bentuk:
MOVE CORRESPONDING nama-data-1 TO nama-data-2.
MOVE CORRESPONDING dipakai untuk memindahkan data dari group data item ke group data item yang lain yang berjulukan sama.
Pada DATA DIVISION :
01 RECORD-A.
02 A PIC 9(3).
02 B PIC X(5).
02 C PIC A(9).
02 D PIC 9(4).
01 RECORD-B.
02 A PIC 9(3).
02 FILLER PIC X(5).
02 B PIC X(6).
02 D PIC 9(4).
02 E PIC $$.99.
02 FILLER PIC X(5).
Statement :
MOVE CORRESPONDING RECORD-A TO RECORD-B.
Artinya :
Akan memindahkan group item RECORD-A ke group data item RECORD-B yang
memiliki nama data yang sama.