การใช้งาน Dictionary ในภาษา COBOL แบบง่ายๆ

Dictionary ใน COBOL คืออะไร?

ใน COBOL, คำว่า **Dictionary** หมายถึงการเก็บข้อมูลที่เกี่ยวข้องในรูปแบบที่สามารถอ้างอิงและค้นหาได้อย่างง่ายดาย โดยทั่วไปแล้ว **Dictionary** มักใช้เก็บข้อมูลในรูปแบบของคีย์และค่า (key-value pairs) เพื่อให้การเข้าถึงข้อมูลทำได้รวดเร็วและมีประสิทธิภาพ

การสร้างและใช้งาน Dictionary

การใช้งาน Dictionary ใน COBOL นั้นอาจไม่ตรงกับการใช้งานแบบ Dictionary ในภาษาที่มีพื้นฐานจาก OOP (Object-Oriented Programming) อย่าง Python หรือ Java แต่ COBOL ก็ยังมีวิธีการจัดการข้อมูลอย่างมีระบบ

ขั้นตอนการสร้าง Dictionary ใน COBOL

ตัวอย่าง CODE

มาลองดูตัวอย่างโค้ดที่แสดงการใช้งาน Dictionary ใน COBOL กันนะครับ:

        IDENTIFICATION DIVISION.
       PROGRAM-ID. DictionaryExample.
       DATA DIVISION.
       WORKING-STORAGE SECTION.
       01  Name-Dictionary.
           05  Name-Entry OCCURS 10 TIMES.
               10  Name-Key    PIC X(20).
               10  Name-Value  PIC X(30).

       01  WS-Count      PIC 9(2) VALUE 0.
       01  WS-Name-Key   PIC X(20).
       01  WS-Name-Value PIC X(30).

       PROCEDURE DIVISION.
           DISPLAY "Start inserting data into the dictionary."
           PERFORM VARYING WS-Count FROM 1 BY 1 UNTIL WS-Count > 3
               DISPLAY "Enter Name Key ({}):" WS-Count
               ACCEPT WS-Name-Key
               DISPLAY "Enter Name Value ({}):" WS-Count
               ACCEPT WS-Name-Value
               MOVE WS-Name-Key TO Name-Key(WS-Count - 1)
               MOVE WS-Name-Value TO Name-Value(WS-Count - 1)
           END-PERFORM

           DISPLAY "Data in the Dictionary:"
           PERFORM VARYING WS-Count FROM 1 BY 1 UNTIL WS-Count > 3
               DISPLAY "Key: " Name-Key(WS-Count - 1) " Value: " Name-Value(WS-Count - 1)
           END-PERFORM.

           STOP RUN.

อธิบายการทำงานของ CODE

ในโค้ดตัวอย่างนี้:

2. ใช้ลูป `PERFORM VARYING` เพื่อรับข้อมูลจากผู้ใช้ในช่วง 3 รอบ

3. เก็บคีย์และค่าที่ผู้ใช้กรอกลงใน Dictionary

4. สุดท้าย แสดงคีย์และค่าใน Dictionary ออกทางหน้าจอ

ตัวอย่าง Use Case ในโลกจริง

ลองนึกภาพว่าคุณทำงานในบริษัทที่มีการจัดการข้อมูลผู้ใช้อยู่แล้ว การใช้ Dictionary จะช่วยให้คุณสามารถเก็บข้อมูลของผู้ใช้ตามชื่อและหมายเลขโทรศัพท์ได้

เมื่อมีผู้ใช้ขึ้นชื่อใหม่ คุณสามารถเพิ่มข้อมูลใหม่เข้าไปใน Dictionary ได้อย่างรวดเร็ว และหากมีความจำเป็นต้องค้นหาหมายเลขโทรศัพท์ของผู้ใช้ ก็สามารถทำได้อย่างง่ายดายเช่นกัน

สรุป

การใช้ Dictionary ใน COBOL เป็นวิธีที่ดีในการจัดการข้อมูลให้มีระเบียบและเข้าถึงได้อย่างรวดเร็ว ถึงแม้ COBOL จะไม่ใช่ภาษาที่ใหม่ล่าสุด แต่การเรียนรู้ภาษา COBOL ยังคงมีความสำคัญ โดยเฉพาะในอุตสาหกรรมที่ต้องการความเชี่ยวชาญในระบบที่มีอยู่

ขอให้ทุกคนสนุกกับการเรียนรู้ programming และหวังว่าจะได้เห็นทุกคนมาเรียนกับเราที่ EPT นะครับ!

หมายเหตุ: ข้อมูลในบทความนี้อาจจะผิด โปรดตรวจสอบความถูกต้องของบทความอีกครั้งหนึ่ง บทความนี้ไม่สามารถนำไปใช้อ้างอิงใด ๆ ได้ ทาง EPT ไม่ขอยืนยันความถูกต้อง และไม่ขอรับผิดชอบต่อความเสียหายใดที่เกิดจากบทความชุดนี้ทั้งทางทรัพย์สิน ร่างกาย หรือจิตใจของผู้อ่านและผู้เกี่ยวข้อง