【AI】使用abap调用deepseek api 例子

最新推荐文章于 2025-06-12 14:34:25 发布

SAP古生

最新推荐文章于 2025-06-12 14:34:25 发布

阅读量492

点赞数 1

CC 4.0 BY-SA版权

文章标签：人工智能

本文链接：https://blog.csdn.net/ptyqsh/article/details/145509401

最近很火的deepseek，试了下用abap 调用！

FUNCTION zdeep_seek_post.
*"----------------------------------------------------------------------
*"*"本地接口：
*"  IMPORTING
*"     VALUE(IV_URL) TYPE  STRING OPTIONAL
*"     VALUE(IV_CONTENT_TYPE) TYPE  STRING DEFAULT 'application/json'
*"     VALUE(IV_SET_CDATA) TYPE  STRING OPTIONAL
*"     VALUE(AUTHORIZATION) TYPE  STRING OPTIONAL
*"     VALUE(IV_TEXT) TYPE  STRING OPTIONAL
*"     VALUE(IV_STREAM) TYPE  STRING DEFAULT 'false'
*"  EXPORTING
*"     VALUE(RESPONSE_BODY) TYPE  STRING
*"     VALUE(DATA_LENGTH) TYPE  I
*"     VALUE(HTTP_STATUS) TYPE  STRING
*"----------------------------------------------------------------------
  "本函数通过if_http_client类实现HTTP POST，过程如下：
  "1.创建连接
  "2.发送请求
  "3.接收返回
  "4.关闭连接
  DATA:lv_token TYPE string.
  DATA:
    lo_http_client TYPE REF TO if_http_client,
    lv_url         TYPE string,
    lv_response    TYPE string,
    lv_http_code   TYPE i,
    lv_http_reason TYPE string.


  "request
*-d '{
*        "model": "deepseek-chat",
*        "messages": [
*          {"role": "system", "content": "You are a helpful assistant."},
*          {"role": "user", "content": "Hello!"}
*        ],
*        "stream": false
*      }'
  TYPES:BEGIN OF ty_messages,
          role    TYPE string,
          content TYPE string,
        END OF ty_messages.
*  TYPES:gty_messages TYPE TABLE OF ty_messages.

  DATA:gw_messages TYPE ty_messages,
       gt_messages TYPE TABLE OF ty_messages.


  TYPES: BEGIN OF ty_cdata,
           model    TYPE string,
           messages TYPE STANDARD TABLE OF