Prozesskette per VBA starten

Wenn man eine Prozesskette starten möchte und dies nicht im Business Warehouse erledigen möchte, kann man dies mit folgenden VBA-Code erledigen.

Private Sub PK_Start()

Dim FUBA_PK As Object                      'Variable für Funktionsbaustein

Dim T_I_Options As Object                  'Variable für rfc_read_table Optionen

Dim T_I_Fields As Object                   'Variable für rfc_read_table Felder

Dim T_E_Data As Object                     'Variable für rfc_read_table Daten

Dim retn As Boolean                        'Variable für Rückgabewert des Funktionsbausteins

'Funktionsbaustein Prozessketten starten

Set FUBA_PK = R3.Add("RSPC_CHAIN_START")

With FUBA_PK

    .exports("I_CHAIN") = "TECHNISCHER_NAME_DER_PROZESSKETTE" 'Auszuführende Prozesskette

End With

'Ausführen des Funktionsbausteins

retn = FUBA_PK.Call

Set T_E_Data = Nothing

Set T_I_Fields = Nothing

Set T_I_Options = Nothing

End Sub