String Cobol

Menguasai Penggabungan String di COBOL

Dalam dunia pemrograman, menangani string adalah tugas yang umum. Di COBOL, seseorang sering kali menghadapi tantangan menggabungkan string yang panjangnya tidak ditentukan. Artikel ini bertujuan memberikan solusi yang jelas untuk pertanyaan tentang bagaimana cara menggabungkan dua string dengan panjang tidak diketahui di COBOL secara efektif.

Masalah

Bayangkan Anda sedang bekerja dengan suatu program yang menangani nama depan dan nama belakang pengguna. Bagian WORKING-STORAGE Anda mendefinisikan variabel untuk menyimpan nama-nama ini, tetapi tantangan muncul ketika Anda perlu menggabungkannya menjadi nama lengkap tanpa mempertahankan spasi yang tidak perlu. Sebagai contoh, diberikan:

WORKING-STORAGE.
    FIRST-NAME    PIC X(15) VALUE SPACES.
    LAST-NAME     PIC X(15) VALUE SPACES.
    FULL-NAME     PIC X(31) VALUE SPACES.

Misalkan FIRST-NAME diatur ke 'JOHN ' dan LAST-NAME ke 'DOE ', Anda berusaha mencapai hasil:

FULL-NAME = 'JOHN DOE                       '.

Namun, penggabungan yang naif mungkin membuat Anda berakhir dengan:

FULL-NAME = 'JOHN            DOE            '.

Ini bukan hasil yang diinginkan karena mencakup spasi ekstra di antara bagian yang digabungkan. Jadi, bagaimana Anda menyelesaikan masalah ini?

Solusi

Solusi untuk masalah ini adalah menggunakan pernyataan STRING COBOL secara efektif. Ini memungkinkan Anda untuk menggabungkan string dan menentukan pembatas untuk menghilangkan spasi yang tidak diinginkan. Berikut adalah langkah-langkah untuk menggabungkan dua string dengan benar.

Panduan Langkah-Demi-Langkah

  1. Definisikan String: Pastikan Anda telah mendefinisikan FIRST-NAME, LAST-NAME, dan FULL-NAME di bagian WORKING-STORAGE Anda seperti yang diilustrasikan di atas.

  2. Gunakan Pernyataan STRING: Anda dapat menggunakan pernyataan STRING untuk menggabungkan string. Berikut cara melakukannya:

    STRING
    FIRST-NAME DELIMITED BY " ",
    " ",
    LAST-NAME DELIMITED BY SIZE
INTO FULL-NAME.

Rincian Pernyataan STRING

  • FIRST-NAME DELIMITED BY " “: Ini memberi tahu COBOL untuk menggunakan FIRST-NAME dan berhenti menggabungkan di spasi pertama yang ditemui, secara efektif memangkas spasi yang ada di belakang.

  • ” “: Ini menambahkan satu spasi antara nama depan dan nama belakang untuk memastikan mereka terpisah dengan baik.

  • LAST-NAME DELIMITED BY SIZE: Ini menentukan bahwa seluruh panjang LAST-NAME harus dimasukkan dalam penggabungan, sehingga menghindari spasi yang tidak perlu di belakang.

  • INTO FULL-NAME: Ini mengarahkan string yang dihasilkan yang digabungkan untuk disimpan di FULL-NAME.

Kesimpulan

Dengan mengikuti langkah-langkah ini, Anda akan dapat menggabungkan string dengan panjang tidak diketahui di COBOL secara efisien sambil memastikan keluaran yang bersih dan terformat. Dengan memanfaatkan pernyataan STRING dengan pembatas yang tepat, COBOL menyederhanakan proses pengelolaan string, menjadikannya alat yang kuat untuk kebutuhan pemrograman Anda.

Sekarang, lain kali Anda menghadapi tantangan serupa dengan penggabungan di COBOL, Anda dapat menerapkan metode ini dengan percaya diri untuk mencapai hasil yang Anda inginkan!