VBA RFC Export Struktur übergeben

Die Frage ist als "gelöst" markiert. Den entsprechend Beitrag findest du hier.

Getting started ... Alles für einen gelungenen Start.
5 Beiträge • Seite 1 von 1
5 Beiträge Seite 1 von 1

VBA RFC Export Struktur übergeben

Beitrag von punkjunk (ForumUser / 3 / 1 / 0 ) »
Hallo zusammen,

ein Kollege hat einen Funktionsbaustein programmiert, welcher 3 Import Parameter besitzt:
Parameter1 = Einzelfeld Charakter 20
Parameter2 = Einzelfeld Charakter 20
Parameter3 = Tabelle mit 5 Spalten (Tabkey, Sign, Option, Low, High)

Nun würde ich diesen Funktionsbaustein gerne über Excel VBA aufrufen und die Parameter übergeben.

Das Funktioniert im ersten Schritt wunderbar:

Code: Alles auswählen.

.exports("Parameter1") = "abc"
.exports("Parameter2") = "123"

Set Table = .exports.Item("Parameter3")

.exports.Item("Parameter3").Value("TABKEY") = "ACCOUNT"
.exports.Item("Parameter3").Value("SIGN") = "I"
.exports.Item("Parameter3").Value("OPTION") = "EQ"
.exports.Item("Parameter3").Value("LOW") = "2304100000"
.exports.Item("Parameter3").Value("HIGH") = ""
Nun würde ich Parameter3 gerne noch mit weiteren Zeilen befüllen.
Hieran scheitere ich leider. Meine Idee war es, dies mit einem Index zu machen
(also z.B.: .
exports.Item("Parameter3").[1].Value("TABKEY") = "ACCOUNT"
exports.Item("Parameter3").[2].Value("TABKEY") = "ENTITY"
etc.)
Leider wird der Index nicht unterstützt. Auch - ähnlich wie bei Tabellen-Objekten - mit Rows.Add zu arbeiten, schlägt leider fehl.

Hat jemand eine Idee wie ich das Problem lösen kann bzw. ist mein Vorhaben überhaupt umsetzbar?

Viele Dank und beste Grüße
Tobias

gesponsert
Stellenangebote auf ABAPforum.com schalten
kostenfrei für Ausbildungsberufe und Werksstudenten


Re: VBA RFC Export Struktur übergeben

Beitrag von Tron (Top Expert / 1327 / 35 / 331 ) »
Moin Tobias.
schau es Dir doch hier mal an:
http://www.tricktresor.de/blog/werte-pe ... portieren/

Tabellen Objekt

Code: Alles auswählen.

     :
     :
'******** Create Table Object ************
Set SMDTabObj = SMDFunc.Tables("FIELDS")

SMDTabObj.freetable

SMDTabObj.appendrow
SMDTabObj.cell(1, 1) = "CHECKTABLE"
SMDTabObj.cell(2, 1) = "KEYFLAG"
     :
     :
es geht auch mit Feldnamen :

Code: Alles auswählen.

SMDTabObj.cell("FELD1", 1) = "CHECKTABLE"
SMDTabObj.cell("FELD2", 1) = "KEYFLAG"

Struktur Objekt

Code: Alles auswählen.

     :
     :
Set SMDStrucObj = SMDFunc2.Imports("OLWRKOBJ")
X1 = SMDStrucObj.Value("OBJNAME")
X2 = SMDStrucObj.Value("STATUS")
     :
     :
Demnach sähe Dein Coding so aus:

Code: Alles auswählen.

Dim SMDStrucObj as Object
Set SMDStrucObj  = <FunctionsObject??>.exports("Parameter3")

SMDStrucObj.Value("TABKEY") = "ACCOUNT"
SMDStrucObj.Value("SIGN") = "I"
SMDStrucObj.Value("OPTION") = "EQ"
SMDStrucObj.Value("LOW") = "2304100000"
SMDStrucObj.Value("HIGH") = ""
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.

Re: VBA RFC Export Struktur übergeben

Beitrag von punkjunk (ForumUser / 3 / 1 / 0 ) »
Hallo Jens,

vielen Dank für deine Antwort.

Der Code

Code: Alles auswählen.

Set Table = rfc_journal.exports("IT_FILTER")
Table.Value("TABKEY") = "ACCOUNT"
Table.Value("SIGN") = "I"
Table.Value("OPTION") = "EQ"
Table.Value("LOW") = "2304100000"
Table.Value("HIGH") = ""
funktioniert bei mir ohne Probleme. Allerdings kann ich immer nur ein Value pro Feld mitgeben, also eine Datenreihe erzeugen.
Mit meinem Code würde der Inhalt der Import-Struktur so aussehen:
TABKEY SIGN OPTION LOW HIGH
ACCOUNT I EQ 2304100000

Wie kann ich an meine Struktur eine weitere Datenzeile hinzufügen.
Das Ergebnis der Import-Struktur sollte z.B. so aussehen:
TABKEY SIGN OPTION LOW HIGH
ACCOUNT I EQ 2304100000
ENTITY I EQ 1000

Ich habe es z.B. schon mit

Code: Alles auswählen.

Table.Rows.Add
Table.Value("TABKEY") = "ENTITY"
Table.Value("SIGN") = "I"
Table.Value("OPTION") = "EQ"
Table.Value("LOW") = "1000"
Table.Value("HIGH") = ""
versucht. Das funktioniert aber leider nicht, da es sich um eine Import-Struktur handelt und nicht - wie z.B. beim RFC_READ_TABLE Funktionsbaustein - um ein Table-Objekt.

Viele Grüße
Tobias

Re: VBA RFC Export Struktur übergeben

Beitrag von Tron (Top Expert / 1327 / 35 / 331 ) »
Moin Tobias
punkjunk hat geschrieben:ein Kollege hat einen Funktionsbaustein programmiert, welcher 3 Import Parameter besitzt:
Nun vielleicht ist er so nett und macht aus dem Import Parameter einen Tables Parameter. :wink:
Eine Struktur ist immer Eindimensional und entspricht einer Feldleiste.
Damit kann man keine 2 te Zeile anhängen !
Falls der Kollege kein Zeit (oder so) hat, kannst Du den Baustein auch kopieren und entprechend anpassen.
lg Jens

Folgende Benutzer bedankten sich beim Autor Tron für den Beitrag:
punkjunk

<:: 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.

Re: VBA RFC Export Struktur übergeben

Beitrag von punkjunk (ForumUser / 3 / 1 / 0 ) »
Hallo Jens,

danke für deine Hilfe.
Der Kollege passt den Funktionsbaustein nun an. 8)

Viele Grüße
Tobias

Seite 1 von 1

Vergleichbare Themen

3
Antw.
2643
Views
Struktur übergeben
von erzoo24 » 06.07.2015 14:45 • Verfasst in ABAP® für Anfänger
0
Antw.
826
Views
FuBa zum übergeben der PSP-Struktur an MS Project
von Johannes » 30.10.2005 13:38 • Verfasst in Financials
3
Antw.
3016
Views
Variablen und Strukturken in größere Struktur übergeben.
von lav007 » 01.06.2016 13:23 • Verfasst in ABAP® für Anfänger
10
Antw.
616
Views
2
Antw.
1682
Views
Struktur als Kopie von vorhandener Struktur anlegen
von Marwin » 20.04.2005 15:29 • Verfasst in ABAP® Core

Über diesen Beitrag


Die Frage ist als "gelöst" markiert. Den entsprechend Beitrag findest du hier.

Unterstütze die Community und teile den Beitrag für mehr Leser und Austausch

Aktuelle Forenbeiträge

Zwischensumme Adobe Forms
vor 3 Tagen von Lucyalison 1 / 64
Interne Tabelle
vor 5 Tagen von black_adept 2 / 133
MaLo-Checker in ABAP
vor einer Woche von A6272 6 / 254

Newsletter Anmeldung

Keine Beiträge verpassen! Wöchentlich versenden wir lesenwerte Beiträge aus unserer Community.
Die letzte Ausgabe findest du hier.
Details zum Versandverfahren und zu Ihren Widerrufsmöglichkeiten findest du in unserer Datenschutzerklärung.

Aktuelle Forenbeiträge

Zwischensumme Adobe Forms
vor 3 Tagen von Lucyalison 1 / 64
Interne Tabelle
vor 5 Tagen von black_adept 2 / 133
MaLo-Checker in ABAP
vor einer Woche von A6272 6 / 254

Unbeantwortete Forenbeiträge

Zwischensumme Adobe Forms
vor 3 Tagen von Lucyalison 1 / 64
Group Items auf einer Filterbar
vor einer Woche von Bright4.5 1 / 107
tRFC Transaktionen SM58
vor 4 Wochen von A6272 1 / 140