Заполнение параметра таблицы импорта BAPI в EXCEL с использованием VBA
У меня есть запрос для меня, который требует очистки. Я использую Excel 2003. Лист содержит 12 столбцов. Мне нужно сделать экспорт данных из Excel в SAP. Перед экспортом мне нужно проверить, существует запись или нет, если существует, то удалить и вставить.
У меня есть два BAPI для этого является таблица импорта, которая должна быть заполнена параметрами, после заполнения этой таблицы BAPI ищет соответствующие записи.
Список будет отображаться в виде таблицы. Мне нужно найти в этой таблице значения из Excel, а затем импортировать одно значение поля в Excel.
Я пишу этот код, но он не работает, давая BAPI Error 0
,
Public Function Import_Order() As Boolean
Dim oBAPIGetOrder As Object
Dim oBAPIVariant1 As Object
Dim oBAPIVariant2 As Object
Dim oBAPIVariant3 As Object
Dim oBAPIImpOrder As Variant
Dim oBAPIRet As Boolean
Dim oDoNothing As Variant
gBAPIPlanOrder = 0
Set oBAPIGetPlOrder = sBAPIControl.Add("PLANED_GET_DET_LIST") 'BAPI
Set oBAPIVariant1 = oBAPIGetPlOrder.exports.Item("SELECTIONCRITERIA") 'Internal table
Set oBAPIVariant2 = oBAPIGetPlOrder.Tables.Item("DETAILEDLIST") 'Table
oBAPIVariant1.Value("MATERIAL") = eMaterial
oBAPIVariant1.Value("PLANT") = ePlnPlant
lBAPIRet = oBAPIGetPlOrder.call
If lBAPIRet Then
'oBAPIImpOrder = oBAPIGetPlOrder.imports.Item("PLANNEDORDER_NUM")
a = oBAPIVariant2.Rows.Count
oBAPIImpOrder = oBAPIVariant2.Value("PLANNEDORDER_NUM")
Import_PlannedOrder = True
Else
oBAPIImpOrder = 0
Import_PlannedOrder = False
End If
End Function
Заранее благодарю за любую помощь...
1 ответ
Пожалуйста, поместите оператор вызова функции lBAPIRet = oBAPIGetPlOrder.call после непосредственно оператора экспорта и перед таблицами и importtatements