Ansicht
Dokumentation

BDC_RECORD_OPEN - Batchinput-Aufzeichnung: Öffnen

rdisp/max_wprun_time - Maximum work process run time   BAL_S_LOG - Application Log: Log header data  
Diese Dokumentation steht unter dem Copyright der SAP AG.

Funktionalität

Ist der eindeutige Datenbankschluessel 'QUEUE_ID' nicht leer, so wird die Aufzeichnung mit dem übergebenen Schlüssel von der Datenbank gelesen. Ist QUEUE_ID leer, wird intern eine initiale Aufzeichnung, d.h. eine Aufzeichnung, die noch keine Transaktionen enthält, mit dem übergebenem Namen angelegt.

Die so geöffnete Aufzeichnung kann nun mit anderen Funktionsbausteinen (siehe Funktionsgruppe SBDR) bearbeitet werden.

Die derzeit auf der Datenbank verfügbaren Aufzeichnungen können mittels der Funktionsbausteine BDC_RECORD_VALUE_REQUEST oder BDC_OBJECT_SELECT ermittelt werden.

Beispiel

REPORT TEST01.
DATA: P_KEY LIKE APQI.

DATA: BEGIN OF TRANS_TAB OCCURS 0.
INCLUDE STRUCTURE BDCTH.
DATA: END OF TRANS_TAB.
DATA: BEGIN OF MTAB OCCURS 0.
INCLUDE STRUCTURE APQI.
DATA: END OF MTAB.
DATA: BEGIN OF BDC_TAB OCCURS 0.
INCLUDE STRUCTURE BDCDATA.
DATA: END OF BDC_TAB.

START-OF-SELECTION.
PERFORM RECORD_SELECT.
PERFORM RECORD_OPEN.
PERFORM CALL_TRANSACTION.

************************************************************************
** FORMS
************************************************************************
FORM RECORD_SELECT.
CALL FUNCTION 'BDC_RECORD_VALUE_REQUEST'
EXPORTING
NAME = '*'
DISPLAY = ' '
IMPORTING
KEY = P_KEY
EXCEPTIONS
OTHERS = 1.
IF SY-SUBRC <> 0.
WRITE: / '----> Systemfehler bei BDC_RECORD_VALUE_REQUEST'.
STOP.
ELSE.
IF P_KEY IS INITIAL.
WRITE: / 'Kein APQI-KEY selektiert'.
STOP.
ENDIF.
ENDIF.
ENDFORM.

FORM RECORD_OPEN.
CALL FUNCTION 'BDC_RECORD_OPEN'
EXPORTING
NAME = P_KEY-GROUPID
QUEUE_ID = P_KEY-QID
TABLES
TRANSACTIONS = TRANS_TAB
EXCEPTIONS
NOT_FOUND = 1
SYSTEM_FAILURE = 2
OTHERS = 3.
ENDFORM.

FORM CALL_TRANSACTION.
LOOP AT TRANS_TAB.

CALL FUNCTION 'BDC_RECORD_GET'
EXPORTING
TRANSACTION_INDEX = SY-TABIX
TABLES
DYNPROTAB = BDC_TAB
EXCEPTIONS
INVALID_INDEX = 1
OTHERS = 2.

CALL TRANSACTION TRANS_TAB-TCODE USING BDC_TAB
MODE 'A'
UPDATE 'S'.
IF SY-SUBRC = 0.
WRITE: / 'Transaktion:', TRANS_TAB-TCODE.
WRITE: / 'SY-SUBRC:', SY-SUBRC.
WRITE: / .
ELSE.
WRITE: / 'Transaktion:', TRANS_TAB-TCODE.
WRITE: / 'SY-SUBRC:', SY-SUBRC.
WRITE: / .
MESSAGE ID SY-MSGID TYPE 'S' NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
ENDLOOP.
ENDFORM.

Hinweise

Weiterführende Informationen

Parameter

DYNPROTAB
NAME
QUEUE_ID
TRANSACTIONS

Ausnahmen

NOT_FOUND
SYSTEM_FAILURE

Funktionsgruppe

SBDR

SUBST_MERGE_LIST - merge external lists to one complete list with #if... logic for R3up   rdisp/max_wprun_time - Maximum work process run time  
Diese Dokumentation steht unter dem Copyright der SAP AG.

Length: 3567 Date: 20240523 Time: 153340     sap01-206 ( 37 ms )