Download Faktura-Anhänge method cl_binary_relation=>read_links_of_binrel
6 Beiträge
•
Seite 1 von 1
6 Beiträge
Seite 1 von 1
Hallo zusammen,
ich will mit der Methode cl_binary_relation=>read_links_of_binrel Anhänge zu Fakturen herunterladen.
Ich habe es versucht mit den Business Objekten BU2037, VBRK and BUS2037001 , aber nichts führte zum Erfolg.
Habt Ihr eine Idee?
Mein Coding sieht folgendermaßen aus:
gs_object-instid = gs_invoices-vbeln.
gs_object-typeid = 'BUS2037'.
gs_object-catid = 'BO'.
TRY.
" Verknüpfungen zum Objekt lesen
CALL METHOD cl_binary_relation=>read_links_of_binrel
EXPORTING
is_object = gs_object
ip_relation = 'NOTE'
IMPORTING
et_links = gt_links.
IF NOT gt_links IS INITIAL.
LOOP AT gt_links INTO gs_links WHERE typeid_b = 'MESSAGE'.
" Optional: Schlüsselkomponenten extrahieren
gs_key = gs_links-instid_b.
WRITE: / 'foltp', gs_key-foltp
, / 'folyr', gs_key-folyr
, / 'folno', gs_key-folno
, / 'objtp', gs_key-objtp
, / 'objyr', gs_key-objyr
, / 'objno', gs_key-objno
.
" Die Dokumenten-ID für SAPOffice entspricht der ermittelten
" Instanz-ID
gd_doc_id = gs_links-instid_b.
" Dokumenteninhalte löschen
CLEAR
: gt_cont
, gt_contx
.
" Dokument lesen
CALL FUNCTION 'SO_DOCUMENT_READ_API1'
EXPORTING
document_id = gd_doc_id
IMPORTING
document_data = gs_doc_data
TABLES
object_content = gt_cont
contents_hex = gt_contx
EXCEPTIONS
document_id_not_exist = 1
operation_no_authorization = 2
x_error = 3
OTHERS = 4.
IF sy-subrc <> 0.
" Fehlerbehandlung: Lesen des Dokuments
ELSE.
" Ausgabe einiger Kopfdaten
WRITE: / gs_doc_data-object_id
, gs_doc_data-obj_type
, gs_doc_data-obj_name
, gs_doc_data-obj_descr
.
ENDIF.
SKIP.
IF NOT gt_cont[] IS INITIAL.
" Es gibt Inhalt im Textformat
WRITE: 7 'TXT'.
ENDIF.
IF NOT gt_contx[] IS INITIAL.
" Es gibt Inhalt im Binärformat
WRITE: 14 'BIN'.
ENDIF.
ENDLOOP.
ENDIF.
ENDTRY.
ich will mit der Methode cl_binary_relation=>read_links_of_binrel Anhänge zu Fakturen herunterladen.
Ich habe es versucht mit den Business Objekten BU2037, VBRK and BUS2037001 , aber nichts führte zum Erfolg.
Habt Ihr eine Idee?
Mein Coding sieht folgendermaßen aus:
gs_object-instid = gs_invoices-vbeln.
gs_object-typeid = 'BUS2037'.
gs_object-catid = 'BO'.
TRY.
" Verknüpfungen zum Objekt lesen
CALL METHOD cl_binary_relation=>read_links_of_binrel
EXPORTING
is_object = gs_object
ip_relation = 'NOTE'
IMPORTING
et_links = gt_links.
IF NOT gt_links IS INITIAL.
LOOP AT gt_links INTO gs_links WHERE typeid_b = 'MESSAGE'.
" Optional: Schlüsselkomponenten extrahieren
gs_key = gs_links-instid_b.
WRITE: / 'foltp', gs_key-foltp
, / 'folyr', gs_key-folyr
, / 'folno', gs_key-folno
, / 'objtp', gs_key-objtp
, / 'objyr', gs_key-objyr
, / 'objno', gs_key-objno
.
" Die Dokumenten-ID für SAPOffice entspricht der ermittelten
" Instanz-ID
gd_doc_id = gs_links-instid_b.
" Dokumenteninhalte löschen
CLEAR
: gt_cont
, gt_contx
.
" Dokument lesen
CALL FUNCTION 'SO_DOCUMENT_READ_API1'
EXPORTING
document_id = gd_doc_id
IMPORTING
document_data = gs_doc_data
TABLES
object_content = gt_cont
contents_hex = gt_contx
EXCEPTIONS
document_id_not_exist = 1
operation_no_authorization = 2
x_error = 3
OTHERS = 4.
IF sy-subrc <> 0.
" Fehlerbehandlung: Lesen des Dokuments
ELSE.
" Ausgabe einiger Kopfdaten
WRITE: / gs_doc_data-object_id
, gs_doc_data-obj_type
, gs_doc_data-obj_name
, gs_doc_data-obj_descr
.
ENDIF.
SKIP.
IF NOT gt_cont[] IS INITIAL.
" Es gibt Inhalt im Textformat
WRITE: 7 'TXT'.
ENDIF.
IF NOT gt_contx[] IS INITIAL.
" Es gibt Inhalt im Binärformat
WRITE: 14 'BIN'.
ENDIF.
ENDLOOP.
ENDIF.
ENDTRY.
gesponsert ⓘ
Stellenangebote auf ABAPforum.com schalten
kostenfrei für Ausbildungsberufe und Werksstudenten
kostenfrei für Ausbildungsberufe und Werksstudenten
Hi Doobie.
Handelt es sich bei den Anhängen um GOS-Anlage oder per ArchiveLink verknüpfte Dateien?
Grüße,
Haubi
P.S.: der Code kommt mir leicht bekannt vor... ;-)
Handelt es sich bei den Anhängen um GOS-Anlage oder per ArchiveLink verknüpfte Dateien?
Grüße,
Haubi
P.S.: der Code kommt mir leicht bekannt vor... ;-)
Beitrag
von black_adept (Top Expert / 4103 / 128 /
945
)
»
Moin Udo,
das Coding kommt mir, wie Haubi, auch leicht bekannt vor. Aber es gibt seitdem eine meiner Meinung nach deutlich leichter handzuhabende Methodik mittels der GOS-API.
Ich habe hier mal kurz die wesentlichen Stellen aus einem Programm von mir gefischt, wo ich einen GOS-Anhang downloade:.
1. GOS-API instanziieren.Hier musst du die instid mit dem Schlüssel des Objekts und typeid mit dem richtigen Typ füllen.
2. Laden des GOS-Anhangs als binary:
das Coding kommt mir, wie Haubi, auch leicht bekannt vor. Aber es gibt seitdem eine meiner Meinung nach deutlich leichter handzuhabende Methodik mittels der GOS-API.
Ich habe hier mal kurz die wesentlichen Stellen aus einem Programm von mir gefischt, wo ich einen GOS-Anhang downloade:.
1. GOS-API instanziieren.
Code: Alles auswählen.
TRY.
me->mo_gos_api = cl_gos_api=>create_instance( is_object = VALUE #( instid = mf_warnr
typeid = 'ZCS_WR'
catid = 'BO' ) ).
CATCH cx_gos_api.
CLEAR me->mo_gos_api.
ENDTRY.2. Laden des GOS-Anhangs als binary:
Code: Alles auswählen.
METHOD GET_ATTACHMENT_CONTENT_BINARY.
TRY.
DATA(ls_att_content) = me->mo_gos_api->get_al_item( is_attachment_key ).
IF ls_att_content-content_x IS NOT INITIAL.
rf_binary_content = ls_att_content-content_x.
ELSE.
TRY.
rf_binary_content = cl_bcs_convert=>string_to_xstring( ls_att_content-content ).
CATCH cx_bcs.
CLEAR rf_binary_content.
ENDTRY.
ENDIF.
CATCH cx_gos_api.
CLEAR rf_binary_content.
ENDTRY.
ENDMETHOD.
Moin Udo,
Ich denke mal das alles was Du braucht hier ist:
https://www.bb1.j-gun.de/viewtopic.php?f=36&t=20623
bzw.
http://www.bb1.gate2app.com/viewtopic.php?f=36&t=20623
gruß Jens
Ich denke mal das alles was Du braucht hier ist:
https://www.bb1.j-gun.de/viewtopic.php?f=36&t=20623
bzw.
http://www.bb1.gate2app.com/viewtopic.php?f=36&t=20623
gruß Jens
Folgende Benutzer bedankten sich beim Autor Tron für den Beitrag:
black_adept
<:: XING-Gruppe Tricktresor::>
Die deutsche Rechtschreibung ist Freeware, du darfst sie kostenlos nutzen –
Aber sie ist nicht Open Source, d. h. du darfst sie nicht verändern oder in veränderter Form veröffentlichen.
Die deutsche Rechtschreibung ist Freeware, du darfst sie kostenlos nutzen –
Aber sie ist nicht Open Source, d. h. du darfst sie nicht verändern oder in veränderter Form veröffentlichen.
Kleine Ergänzung hierzu:
indem man den Eintrag SOFFDB auf ein Archiv verweisen läßt.
vorher sollte man allerdings die daten in das "Neue Archiv" kopieren.
Report RSIRPIRL hilft hierbei.
https://userapps.support.sap.com/sap/su ... en/2459712
gruß Jens
Über Transaktion OACT/OAC0 läßt sich der physikalische Ablageort auf Archiv ändern,
indem man den Eintrag SOFFDB auf ein Archiv verweisen läßt.
vorher sollte man allerdings die daten in das "Neue Archiv" kopieren.
Report RSIRPIRL hilft hierbei.
https://userapps.support.sap.com/sap/su ... en/2459712
gruß Jens
<:: XING-Gruppe Tricktresor::>
Die deutsche Rechtschreibung ist Freeware, du darfst sie kostenlos nutzen –
Aber sie ist nicht Open Source, d. h. du darfst sie nicht verändern oder in veränderter Form veröffentlichen.
Die deutsche Rechtschreibung ist Freeware, du darfst sie kostenlos nutzen –
Aber sie ist nicht Open Source, d. h. du darfst sie nicht verändern oder in veränderter Form veröffentlichen.
Seite 1 von 1
Vergleichbare Themen
6
Antw.
Antw.
1684
Views
Views
BINARY MODE zu PDF Datei konvertieren
von ABAPlerv » 16.12.2022 11:14 • Verfasst in ABAP® für Anfänger
von ABAPlerv » 16.12.2022 11:14 • Verfasst in ABAP® für Anfänger
0
Antw.
Antw.
1072
Views
Views
IDOC EXPINV01 (Export Faktura) und INVOIC02 (Rechnung/Faktura) manipulieren
von Alpmann » 28.07.2022 18:12 • Verfasst in ABAP® für Anfänger
von Alpmann » 28.07.2022 18:12 • Verfasst in ABAP® für Anfänger
22
Antw.
Antw.
6789
Views
Views
Binary search SY-SUBRC = 4 obwohl Eintrag vorhanden (HEX identisch)
von Romaniac » 31.01.2024 13:39 • Verfasst in ABAP® Core
von Romaniac » 31.01.2024 13:39 • Verfasst in ABAP® Core
1
Antw.
Antw.
1466
Views
Views
9
Antw.
Antw.
3135
Views
Views
Versand Von Bestellung als Email mit Anhänge
von mano79 » 08.12.2020 21:55 • Verfasst in ABAP® für Anfänger
von mano79 » 08.12.2020 21:55 • Verfasst in ABAP® für Anfänger
Frage die ABAP Experten
Über diesen Beitrag
Unterstütze die Community und teile den Beitrag für mehr Leser und Austausch
Aktuelle Forenbeiträge
Newsletter Anmeldung
Keine Beiträge verpassen! Wöchentlich versenden wir lesenwerte Beiträge aus unserer Community.Die letzte Ausgabe findest du hier.