Daten aus SAP auslesen mit Web Service

Re: Daten aus SAP auslesen mit Web Service

Moin Anna.
Im Anhang findest Du eine kleine Doku für den Anfang zum Einrichten eines Webservices.
Meine Frage wäre als nächstes, ob die HTML Seite auch aus dem Service kommen soll.

lg Jens

Re: Daten aus SAP auslesen mit Web Service

Moin.
Das ist ja noch besser. (kein html Desäng)
Nun dann benötigt man einen Requesthandler.
Ich schlage vor den/die Parameter in der URL an den Handler zu übergeben.
Dann erfolgt aus dem Handler die Datenermittlung und das Senden in ein noch zu klärendes Format . Also Plain, XML oder JSON.
Was die Bausteine angeht: Klassen mögen keine Tables Parameter von Funktionsbausteinen. Möglich wären Tabellentypen als Im-/Exportparameter.
Das sollte bedacht werden, wenn man alles zentral in einen Funktionsbaustein packt.
lg Jens

Re: Daten aus SAP auslesen mit Web Service

... Ja klar.

Die Datenbeschaffung (SE80):
1. Funktionsgruppe anlegen .
2. Neuen Funktionsbaustein in der Gruppe anlegen und mit "Muster" alle benötigten Bausteine in den Quellcode "einbinden".
3. Sy-uname als Importparameter und das Ergebnis als Exportparameter ausprägen und....
4. Testen (mit SE37 bzw. SE80).

Wie kriege ich das technisch hin? Das Ziel soll sein, dass ein Benutzer seine ID über das Web eintippt und dann anschließend die oben genannten Daten erhält.

Die Anmeldung erledigt der Requesthandler von sich aus (siehe PDF-Beschreibung) . Hier muß man gar nichts weiter unternehmen.
Nach der Authentifizierung (mit Passwort) weiß der Handler, welche Daten (z.B. Adressnummer bzw. Username) er Deinem Funktionsbaustein mitgeben muß, um die richtigen Daten des Kunden ermitteln zu können.

lg Jens

Re: Daten aus SAP auslesen mit Web Service

hallo Jens,

vielen Dank. Habe es so gemacht wie du gesagt hast. Der erste FUBA funktioniert (er liefert den Firmennamen). Der zweite der die Adressdaten liefern soll, funktioniert nicht. Der erste FUBA muss dem zweiten FUBA im Importing Daten überreichen. Oder? Im zweiten FUBA heisst der Exportparameter ADDRESSDATA.
Woher soll ich die relevanten Daten (Straße, Hausnummer, etc.) denn Selecten?
Wenn alle Daten vollständig in der Struktur sind erfolgt dann ein APPEND in die interne Tabelle (et_data).
Kannst du mir bitte weiterhelfen . Weiß nicht genau woher ich die Daten im 2. Baustein selektieren soll.


Hier der Code:

FUNCTION Z_FUBA_DATA.
*"----------------------------------------------------------------------
*"*"Lokale Schnittstelle:
*" IMPORTING
*" REFERENCE(COMPID) TYPE BU_PARTNER
*" EXPORTING
*" REFERENCE(ET_DATA) TYPE ZPPDT1
*"----------------------------------------------------------------------

data: ls_data like line of et_data.

CALL FUNCTION 'BAPI_BUPA_CENTRAL_GETDETAIL'
EXPORTING
BUSINESSPARTNER = compID.
* VALID_DATE = SY-DATLO
* IMPORTING
*CENTRALDATA =
* CENTRALDATAPERSON =
* CENTRALDATAORGANIZATION =
* CENTRALDATAGROUP =
* CENTRALDATAVALIDITY =
* TABLES
* TELEFONDATANONADDRESS =
* FAXDATANONADDRESS =
* TELETEXDATANONADDRESS =
* TELEXDATANONADDRESS =
* E_MAILDATANONADDRESS =
* RMLADDRESSDATANONADDRESS =
* X400ADDRESSDATANONADDRESS =
* RFCADDRESSDATANONADDRESS =
* PRTADDRESSDATANONADDRESS =
* SSFADDRESSDATANONADDRESS =
* URIADDRESSDATANONADDRESS =
* PAGADDRESSDATANONADDRESS =
* COMMUNICATIONNOTESNONADDRESS =
* COMMUNICATIONUSAGENONADDRESS =
* RETURN =

select name_org1 from but000 into ls_data-firmenname where partner = compID.
if sy-subrc ne 0.
write: / 'No Data found'.
endif.
endselect.

CALL FUNCTION 'BAPI_BUPA_ADDRESS_GETDETAIL'
EXPORTING
BUSINESSPARTNER = compID
* ADDRESSGUID =
* VALID_DATE = SY-DATLO
* RESET_BUFFER =
* IMPORTING
* ADDRESSDATA =
* TABLES
* BAPIADTEL =
* BAPIADFAX =
* BAPIADTTX =
* BAPIADTLX =
* BAPIADSMTP =
* BAPIADRML =
* BAPIADX400 =
* BAPIADRFC =
* BAPIADPRT =
* BAPIADSSF =
* BAPIADURI =
* BAPIADPAG =
* BAPIAD_REM =
* BAPICOMREM =
* ADDRESSUSAGE =
* BAPIADVERSORG =
* BAPIADVERSPERS =
* BAPIADUSE =
* RETURN =
.
*select * from adrc into ls_adrc.
* ls_data-str = street.
* ls_data-hausnummer = house_no.
* ls_data-plz = postl_cod1.
* ls_data-ort = city.
*endselect.

select street from adrc into ls_Data-str where
endselect.

ENDFUNCTION.

Vielen Dank im Voraus
Liebe Grüße Anna