data: lf_key(40)    type c, "string,
        lf_sap_object TYPE toa01-sap_object,
        lt_toa01      TYPE STANDARD TABLE OF toa01,
        ls_toa01      TYPE toa01,
        ls_files      TYPE /plc/ca_s_files,
        begin of ls_key,
          angnr TYPE /plc/angnr,
          anvnr TYPE /plc/anvnr,
       end of ls_key.

  clear: lf_sap_object, lf_key, ls_key.
*  lf_key = ao_manage_files->AF_ANGNR && ao_manage_files->AF_ANVNR.
*  CONCATENATE ao_manage_files->af_angnr ao_manage_files->af_anvnr into lf_key.
  ls_key-angnr = ao_manage_files->af_angnr.
  ls_key-anvnr = ao_manage_files->af_anvnr.
  write ls_key to lf_key.
  CONCATENATE '/PLC/' ao_manage_files->af_anwendung into lf_sap_object.
  select * from TOA01 INTO table lt_toa01
    where SAP_OBJECT = lf_sap_object
    and   object_id like lf_key
    and   reserve   = 'MSG'.

  LOOP AT lt_toa01 into ls_toa01.
    MOVE-CORRESPONDING ls_toa01 to ls_files.
    ls_files-DOCTP = 'BIN'.
    ls_files-type  = 'MSG'.
    ls_files-bezeichnung = 'Outlook Mail'.
    ls_files-ATTNO = ls_toa01-arc_doc_id.
    ls_files-erdat = ls_toa01-ar_date.

    Read TABLE ao_manage_files->at_filelist WITH KEY ATTNO = ls_files-attno TRANSPORTING NO FIELDS.
    if sy-subrc <> 0.
      append ls_files to ao_manage_files->at_filelist.
    endif.
  ENDLOOP.