การใช้งาน function ในภาษา COBOL แบบง่ายๆ พร้อมตัวอย่าง CODE 3 ตัวอย่าง และอธิบายการทำงาน และยกตัวอย่าง usecase ในโลกจริง

# การใช้งาน Function ในภาษา COBOL ทิศทางใหม่ที่ไม่ควรมองข้าม

Function ใน COBOL: แนะนำ

ตัวอย่างการใช้งาน Function ใน COBOL

ตัวอย่างที่ 1: Function การคำนวณ

IDENTIFICATION DIVISION.
PROGRAM-ID. CALC-EX.

DATA DIVISION.
WORKING-STORAGE SECTION.
01 MY-NUMBER PIC 9(03) VALUE 100.
01 MY-RESULT PIC 9(03).

PROCEDURE DIVISION.
    MOVE FUNCTION NUMVAL("123") TO MY-NUMBER.
    DISPLAY "THE RESULT OF NUMVAL FUNCTION IS: " MY-NUMBER.

    MOVE FUNCTION SQRT(MY-NUMBER) TO MY-RESULT.
    DISPLAY "THE SQUARE ROOT OF " MY-NUMBER " IS " MY-RESULT.

STOP RUN.

ในตัวอย่างข้างบน, เราได้ใช้ `FUNCTION NUMVAL` สำหรับการแปลงข้อความ "123" เป็นตัวเลข. หลังจากนั้นก็ใช้ `FUNCTION SQRT` เพื่อหาค่ารากที่สองของตัวเลข. ความสามารถนี้ช่วยลดความซับซ้อนในการเขียนโค้ดเพื่อการคำนวณพื้นฐานได้เป็นอย่างดี.

ตัวอย่างที่ 2: Function การจัดการข้อความ

IDENTIFICATION DIVISION.
PROGRAM-ID. STRING-FUNC.

DATA DIVISION.
WORKING-STORAGE SECTION.
01 MY-STRING PIC A(10) VALUE "HELLO".
01 MY-STRING-RESULT PIC A(10).

PROCEDURE DIVISION.
    MOVE FUNCTION UPPER-CASE(MY-STRING) TO MY-STRING-RESULT.
    DISPLAY "UPPER CASE OF " MY-STRING " IS " MY-STRING-RESULT.

STOP RUN.

ในตัวอย่างที่ 2, `FUNCTION UPPER-CASE` ช่วยให้สามารถเปลี่ยนข้อความเป็นตัวพิมพ์ใหญ่ได้ง่ายขึ้น. ฟังก์ชันนี้เป็นส่วนสำคัญในการจัดการข้อความในระบบฐานข้อมูลต่างๆ.

ตัวอย่างที่ 3: Function ได้ใช้งานในการวันที่และเวลา

IDENTIFICATION DIVISION.
PROGRAM-ID. DATE-TIME-FUNC.

DATA DIVISION.
WORKING-STORAGE SECTION.
01 TODAY-DATE PIC 9(08).

PROCEDURE DIVISION.
    MOVE FUNCTION CURRENT-DATE TO TODAY-DATE.
    DISPLAY "TODAY'S DATE IS " TODAY-DATE(1:4) "/" TODAY-DATE(5:2) "/" TODAY-DATE(7:2) .

STOP RUN.

ในตัวอย่างที่ 3, `FUNCTION CURRENT-DATE` ช่วยให้เราสามารถรับค่าวันที่ปัจจุบันได้ภายในโปรแกรม COBOL ทำให้ง่ายในการเรียกใช้วันที่สำหรับการจัดการเรื่องรายงานหรือประมวลผลทางธุรกิจ.

Usecase ในโลกจริงของ COBOL

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

สรุป

COBOL ยังไม่ตาย! และในฐานะผู้ที่สนใจทางด้านการเขียนโปรแกรมหรือกำลังมองหาทางเลือกในการพัฒนาอาชีพ, การเรียนรู้ภาษาโปรแกรมมิ่งแบบคลาสสิกเช่น COBOL อาจเปิดโอกาสกว้างขวางยิ่งขึ้น. ที่ Expert-Programming-Tutor (EPT), เรามุ่งมั่นที่จะให้ความรู้และเทคนิคในการเอาชนะความท้าทายด้านโค้ดมากด้วยหลักสูตรที่น่าตื่นเต้นและครูผู้สอนที่มีความเชี่ยวชาญ. เรียนรู้เพิ่มเติมหรือลงทะเบียนเพื่อเริ่มการเดินทางในโลกโปรแกรมมิ่งกับเราวันนี้!

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