Categories: COBOL

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.

Contoh:

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.

Demikian yang dapat kami share kepada sobat source code aplikasi pada kesempatan ini, semoga dapat bermanfaat dan bisa menjadi referensi pemrograman bagi anda. Jangan lupa like Fan Page kami, dan SUBSCRIBE Channel Youtube kami untuk dapatkan update source code aplikasi terbaru.

Ahmad Code