在ABAP中，你可以使用函数模块ARCHIV_OBJECT_CREATE来存储二进制文件到ArchiveLink数据库中。以下是一个示例代码：

DATA: lv_objtype    TYPE archiving_objtype,
      lv_objkey     TYPE archiving_objkey,
      lv_docname    TYPE archiving_docname,
      lv_doctype    TYPE archiving_doctype,
      lv_filetype   TYPE archiving_filetype,
      lt_contents   TYPE STANDARD TABLE OF bapicontent2,
      ls_content    TYPE bapicontent2,
      lt_return     TYPE STANDARD TABLE OF bapiret2,
      ls_return     TYPE bapiret2.

lv_objtype = 'BUSINESS_OBJECT'.
lv_objkey = 'OBJECT_KEY'.  "替换为实际的对象键
lv_docname = 'DOCUMENT_NAME'.  "替换为实际的文档名称
lv_doctype = 'DOCUMENT_TYPE'.  "替换为实际的文档类型
lv_filetype = 'BIN'.

"将二进制文件读入内部表
CALL FUNCTION 'GUI_UPLOAD'
  EXPORTING
    filename                = 'C:\path\to\file.txt'  "替换为实际的文件路径
  TABLES
    data_tab                = lt_contents
  EXCEPTIONS
    OTHERS                  = 1.

IF sy-subrc <> 0.
  "处理文件上传错误
  RETURN.
ENDIF.

"设置bapicontent2结构体
ls_content-objtp = lv_objtype.
ls_content-objyr = sy-datum+0(4).
ls_content-objno = lv_objkey.
ls_content-docnm = lv_docname.
ls_content-doctp = lv_doctype.
ls_content-filetype = lv_filetype.
ls_content-doc_size = lines( lt_contents ).
ls_content-doc_sizex = 'X'.

"将文件内容添加到bapicontent2表中
APPEND ls_content TO lt_contents.

"调用ARCHIV_OBJECT_CREATE函数模块存储二进制文件
CALL FUNCTION 'ARCHIV_OBJECT_CREATE'
  TABLES
    contents   = lt_contents
    return     = lt_return.

"检查存储结果
READ TABLE lt_return WITH KEY type = 'S'.
IF sy-subrc = 0.
  "文件成功存储
ELSE.
  "文件存储失败，处理错误信息
ENDIF.

请注意，示例代码中的一些值需要根据实际情况进行替换，比如对象键、文档名称、文档类型和文件路径。此外，你还可以根据需要添加更多的错误处理和逻辑。