vbap & vba

Alles rund um die Sprache ABAP®: Funktionsbausteine, Listen, ALV

vbap & vba

Postby Alessandra3088 » Wed Apr 16, 2003 9:57 am

hi!

hab ein problem mit dem auslesen der vbap. ich möchte z.B. die materialnummern zu einem beleg von excel aus auslesen. hab den fb rfc_read_table benutzt; die felder, die ausgelesen werden sollen hab ich auch angegeben. fehlermeldung lautet: system_failure. mit anderen tabellen funktionierts aber. weiß jemand woran das liegen könnte?

viele grüße

carina
Alessandra3088
.
.
 
Posts: 6
Joined: Wed Feb 26, 2003 7:04 pm

Postby Eymen1956 » Wed Apr 16, 2003 9:59 am

Hallo Carina,

kannst Du mal Dein Coding hier reinhängen? Danke.

Hermann
Eymen1956
.
.
 
Posts: 1
Joined: Wed Apr 16, 2003 9:59 am

Postby Walter4536 » Wed Apr 16, 2003 10:48 am

anmerkung Steff: post umgehängt, antwort von meinereine:


hallo hermann, hier das coding:

Set rfcRead = functions.Add("RFC_READ_TABLE")
rfcRead.Exports("QUERY_TABLE") = "VBAP"

Set options = rfcRead.Tables.Item("OPTIONS")
Set fields = rfcRead.Tables.Item("FIELDS")
selfel = "MATNR"

'For j = 1 To tabende
'sOption = "VBELN like '" & a_vbeln(j) & "'"
options.data = "VBELN like '0010194941' "
fields.data = selfel

If rfcRead.Call = True Then
Set retab = rfcRead.Tables.Item("DATA")
MsgBox retab(1, 1)
Else
MsgBox rfcRead.Exception
End If
'Next j

vielleicht siehst du ja woran es hakt...

danke schon mal!
Walter4536
...
...
 
Posts: 315
Joined: Mon Dec 02, 2002 12:09 pm

Postby Fabian1957 » Thu Apr 17, 2003 8:32 am

Hallo,

das 'like' in options sieht etwas seltsam aus. Ich würde Dir mal folgendes
empfehlen. Ins Backend gehen und den Funktionsbaustein über die SE37 mit Deinen Eingabeparametern testen. Wg. dem like bekomme ich in meinem System einen Kurzdump. Ich wage mal zu behaupten, dass das bei Dir ebenfalls die Ursache ist.

Hermann
Fabian1957
....
....
 
Posts: 535
Joined: Mon Dec 02, 2002 11:34 am

Postby Fabian1957 » Thu Apr 17, 2003 8:52 am

nachtrag:

Was nämlich irgendwann mal in diesem Baustein passiert ist die folgende Select-Anweisung:

Code: [Select all] [Expand/Collapse] [Download] (Untitled.txt)
  1. SELECT * FROM (QUERY_TABLE) INTO WORK WHERE (OPTIONS).
  2.  
GeSHi ©


Das heißt, daß das was in Options steht eine gültige Where-Bedingung sein muss. Ich bin mir nicht sicher, ob das bei Deiner like Anweisung zutrifft.
Ich würde mal vermuten, dass in Deinem Fall die like-Klausel so lauten müßte:
Code: [Select all] [Expand/Collapse] [Download] (Untitled.txt)
  1. options.data = ''VBELN like '0010194941%' ''
  2.  
GeSHi ©

Probier's mal aus.

Hermann
Fabian1957
....
....
 
Posts: 535
Joined: Mon Dec 02, 2002 11:34 am


Return to ABAP® Core

Who is online

Users browsing this forum: No registered users and 4 guests

cron