topic Re: Calling BAPI_COMPANYCODE_GETDETAIL from VBA (Excel) in Application Development and Automation Discussions

Calling BAPI_COMPANYCODE_GETDETAIL from VBA (Excel)

Former Member — Wed, 30 Jul 2008 19:27:27 GMT

Hi,

I've successfully called a number of BAPIs in VBA, however am getting a problem with BAPI_COMPANYCODE_GETDETAIL

It doesn't seem to pick up the structure of the tables - the 'Tables' objects just get set to 'nothing' rather than pulling back the structure, like it should. The call itself doesn't fail but obviously no data is returned.

Much appreciate any ideas!

Set oSAPFunctions = CreateObject("SAP.Functions")

Set oSAPBapiFn = oSAPFunctions.Add("BAPI_COMPANYCODE_GETDETAIL")

Set oSAPECC = oSAPBapiFn.Exports("COMPANYCODEID")

Set oSAPICCD = oSAPBapiFn.Tables("COMPANYCODE_DETAIL")

'Set oSAPICCA = oSAPBapiFn.Tables("COMPANYCODE_ADDRESS")

Set oSAPTRet = oSAPBapiFn.Tables("RETURN")

oSAPECC.Value = "xxxx"

If oSAPBapiFn.Call = False Then

iRet = False

Else

'worked

EndIf

Re: Calling BAPI_COMPANYCODE_GETDETAIL from VBA (Excel)

Former Member — Wed, 30 Jul 2008 20:15:10 GMT

Hi,

Could you in your call pass empty values for tables. IMHO such behaviour is mandatory.

/wg

Re: Calling BAPI_COMPANYCODE_GETDETAIL from VBA (Excel)

Former Member — Thu, 31 Jul 2008 07:13:24 GMT

Hi wg,

Thanks for your reply, however I'm not entirely sure what you mean: the TABLES parameters are returned FROM the function module?

However I attempted what I thought you meant and changed the code as below:

Set oSAPFunctions = CreateObject("SAP.Functions")

Set oSAPBapiFn = oSAPFunctions.Add("BAPI_COMPANYCODE_GETDETAIL")

Set oSAPECC = oSAPBapiFn.Exports("COMPANYCODEID")

Set oSAPICCD = oSAPBapiFn.Tables("COMPANYCODE_DETAIL")

'Set oSAPICCA = oSAPBapiFn.Tables("COMPANYCODE_ADDRESS")

Set oSAPTRet = oSAPBapiFn.Tables("RETURN")

oSAPICCD("COMP_CODE").Value = "" <---- new line

oSAPECC.Value = "xxxx"

If oSAPBapiFn.Call = False Then

iRet = False

Else

'worked

EndIf

However I got the error that oSAPICCD hadn't been set yet, probably because it doesn't seem to be pulling down the structure of COMPANYCODE_DETAIL from SAP (i.e. being set to 'Nothing').

Re: Calling BAPI_COMPANYCODE_GETDETAIL from VBA (Excel)

Former Member — Thu, 31 Jul 2008 12:13:10 GMT

There is such limitation in SAP adapter for BizTalk:

"By default, table parameters are not surfaced in the response message. If you require table parameters in response message, you must pass empty table parameters in the request message."

Do you receive anything in the return?

/wg

Re: Calling BAPI_COMPANYCODE_GETDETAIL from VBA (Excel)

Former Member — Thu, 31 Jul 2008 12:19:59 GMT

Hi wg,

No, nothing is filled into RETURN but this is because the RETURN structure is not copied down to the object variable either. So it is 'Nothing' like the others.