การใช้งาน CURL ในภาษา ABAP แบบง่ายๆ พร้อมตัวอย่าง CODE และอธิบายการทำงาน

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

Curl ใน ABAP

Curl (Client URL) เป็นเครื่องมือที่ให้เราสามารถทำการส่งข้อมูลไปยัง URL ผ่าน HTTP, HTTPS, FTP หรือโปรโตคอลอื่น ๆ ได้อย่างสะดวกแม้ว่าในบางภาษาอย่าง ABAP จะไม่มีฟังก์ชัน Curl โดยตรง แต่เราก็สามารถใช้ฟังก์ชันที่มีให้ใน ABAP ได้เพื่อเข้าถึงฟังก์ชัน Curl นี้ ซึ่งจะใช้เป็นการทำ HTTP Request แทน

การติดตั้ง CURL ใน ABAP

ในการใช้ Curl ใน ABAP เราจำเป็นต้องมีการติดตั้ง SAP NetWeaver ที่รองรับฟังก์ชัน HTTP Client ซึ่งในเวเวอร์ชันใหม่ๆ จะมีฟังก์ชันเหล่านี้มาให้โดยอัตโนมัติ หากคุณมี SAP ABAP 7.1 ขึ้นไปก็สามารถเริ่มใช้งานได้เลย

ตัวอย่างการใช้งาน Curl ใน ABAP

เราจะมาดูตัวอย่างโค้ดของการทำ HTTP GET Request กัน โดยสมมุติว่าเราต้องการเรียกข้อมูลจาก API ที่ให้บริการข้อมูลสภาพอากาศ

 DATA: lo_http_client TYPE REF TO cl_http_client,
      lv_url         TYPE string,
      lv_response    TYPE string,
      lv_status      TYPE i.

lv_url = 'https://api.example.com/weather?city=Bangkok'.

* สร้าง HTTP Client
CALL METHOD cl_http_client=>create_by_url
  EXPORTING
    url                = lv_url
  IMPORTING
    client             = lo_http_client
  EXCEPTIONS
    others             = 1.

IF sy-subrc <> 0.
  WRITE: 'Error creating HTTP Client'.
  RETURN.
ENDIF.

* ตั้งค่า HTTP HEADERS (ถ้าจำเป็น)
lo_http_client->request->set_header_field( 'Content-Type' , 'application/json' ).

* ส่ง HTTP GET Request
CALL METHOD lo_http_client->send
  EXCEPTIONS
    others = 1.

* ตรวจสอบผลลัพธ์ของการส่ง Request
IF sy-subrc <> 0.
  WRITE: 'Error sending HTTP request'.
  RETURN.
ENDIF.

* รับผลลัพธ์
CALL METHOD lo_http_client->receive
  IMPORTING
    data    = lv_response
    status  = lv_status
  EXCEPTIONS
    others  = 1.

IF sy-subrc <> 0.
  WRITE: 'Error receiving HTTP response'.
  RETURN.
ENDIF.

* แสดงผลลัพธ์
WRITE: / 'HTTP Response Status:', lv_status,
       / 'Response Data:', lv_response.

* ปิด HTTP Client
CALL METHOD lo_http_client->close.

อธิบายโค้ด

เราใช้ `cl_http_client=>create_by_url` เพื่อสร้าง Client ที่จะทำการส่งคำขอไปยัง URL ที่เรากำหนด

ในบางกรณีที่ API ต้องการประเภทข้อมูล (Content-Type) เราก็สามารถตั้งค่า header ได้ที่นี้

เราใช้ `lo_http_client->send` เพื่อส่งคำขอ และตรวจสอบว่าเกิดข้อผิดพลาดหรือไม่

`lo_http_client->receive` ใช้เพื่อรับข้อมูลที่กลับมาจาก API และดูว่าข้อผิดพลาดเกิดขึ้นหรือไม่

เราสามารถแสดง Status ของ response และข้อมูลที่เราได้รับได้ที่นี่

ไม่ลืมที่จะปิด Client หลังจากที่เราใช้เสร็จ

Use Case ในโลกจริง

การใช้ Curl ใน ABAP จึงมีประโยชน์อย่างยิ่งสำหรับการเชื่อมต่อกับระบบภายนอก เช่น การเรียกใช้ API สำหรับการตรวจสอบยอดคงเหลือของบัญชีธนาคาร หรือการเชื่อมต่อกับ API สำหรับการคำนวณค่าธรรมเนียมการชำระเงินออนไลน์ อย่างเช่นระบบการเงิน หรือการจัดการฐานข้อมูลที่จำเป็นต้องดึงข้อมูลจากบริการต่างๆ ซึ่งทำให้การทำงานของระบบ ERP มีความสมบูรณ์และมีประสิทธิภาพมากขึ้น

ทำไมต้องเรียนที่ EPT?

หากคุณสนใจการพัฒนาซอฟต์แวร์และต้องการเรียนรู้เกี่ยวกับการใช้งาน Curl ใน ABAP หรือการเขียนโปรแกรมในภาษาอื่น ๆ ที่ตอบโจทย์การทำงานทางธุรกิจ อย่าลืมมาศึกษาที่ EPT (Expert-Programming-Tutor) ซึ่งเรามีคอร์สเรียนที่ออกแบบมาเพื่อให้คุณเป็นนักพัฒนาโปรแกรมที่มีทักษะและสามารถนำไปใช้ได้จริง เรามีอาจารย์ผู้เชี่ยวชาญที่จะคอยดูแลและช่วยเหลือคุณตลอดเส้นทางการเรียนรู้

เรียนรู้การพัฒนาซอฟต์แวร์วันนี้ เพื่ออนาคตที่คุณกำหนดได้ที่ EPT!

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