Hi,
we updated to SAP GUI 740 and it seems that our Excel VBA files which are using "SAP.Logoncontrol.1" and "SAP.Functions" to logon to SAP and to execute different function modules doesn't work anymore.
Enclosed two examples for VBA Excel (NON_SSO and SSO) ...
„NON_SSO“ VBA Code:
Set objSap = CreateObject("SAP.Logoncontrol.1")
Set objSapCon = objSap.NewConnection
objSapCon.Client = "100"
objSapCon.ApplicationServer = "servapk01"
objSapCon.System = "K01"
objSapCon.SystemNumber = "01"
objSapCon.User = "Developer"
objSapCon.Password = "Password"
objSapCon.Language = "EN"
If objSapCon.Logon(0, True) <> True Then
objSapCon.LastError
Else
MsgBox("Logon ok!")
Endif
„SSO“ VBA Code:
Set objSap = CreateObject("SAP.Logoncontrol.1")
Set objSapCon = objSap.NewConnection()
objSapCon.Client = "100"
objSapCon.ApplicationServer = "servapk01"
objSapCon.System = "K01"
objSapCon.SystemNumber = "01"
objSapCon.User = "Developer"
objSapCon.Language = "EN"
objSapCon.autologon = 1
objSapCon.SNC = True
objSapCon.SNCName = "p:Developer@COMPANY.COM"
objSapCon.SNCQuality = 3
If objSapCon.Logon(0, True) <> True Then
objSapCon.LastError
Else
MsgBox ("Logon ok!")
End If
...where we get the following error:
Fehler Gruppe
RFC_ERROR_COMMUNICATION
Nachricht
Connect to message server failed
Connect_PM MSHOST=servapk01, R3NAME=K01, GROUP=PUBLIC
ERROR service 'sapmsK01' unknown
TIME Wed Jun 24 13:14:19 2015
RELEASE 740
COMPONENT NI (network interface)
VERSION 40
RC -3
MODULE D:/depot/bas/740_REL/src/base/ni/nixxsl.cpp
LINE 189
DETAIL NiSrvLGetServNo: service name cached as unknown
COUNTER 7
--------------------------------------
When we change the following VBA code part from ...
If objSapCon.Logon(0, True) <> True Then
... to ...
If objSapCon.Logon(0, False) <> True Then
... to display the Logon window the "NON_SSO" works:
-----------------------------
Set objSap = CreateObject("SAP.Logoncontrol.1")
Set objSapCon = objSap.NewConnection
objSapCon.Client = "100"
objSapCon.ApplicationServer = "servapk01"
objSapCon.System = "K01"
objSapCon.SystemNumber = "01"
objSapCon.User = "Developer"
objSapCon.Password = "Password"
objSapCon.Language = "EN"
If objSapCon.Logon(0, True) <> True Then
objSapCon.LastError
Else
MsgBox("Logon ok!")
Endif
-----------------------------
But for "SSO" ...
-----------------------------
Set objSap = CreateObject("SAP.Logoncontrol.1")
Set objSapCon = objSap.NewConnection()
objSapCon.Client = "100"
objSapCon.ApplicationServer = "servapk01"
objSapCon.System = "K01"
objSapCon.SystemNumber = "01"
objSapCon.User = "Developer"
objSapCon.Language = "EN"
objSapCon.autologon = 1
objSapCon.SNC = True
objSapCon.SNCName = "p:Developer@HERAEUS.COM"
objSapCon.SNCQuality = 3
If objSapCon.Logon(0, True) <> True Then
objSapCon.LastError
Else
MsgBox ("Logon ok!")
End If
-----------------------------
... we get the following error:
Fehler Gruppe
RFC_ERROR_COMMUNICATION
Nachricht
CPIC-CALL: 'CMRCV : rc=20
LOCATION CPIC (TCP/IP) on local host
ERROR illegal parameter value ( function=SAP_CMTIMEOUT2 /
parameter=conversation_ID / value=75850214 )
TIME Wed Jun 24 13:29:15 2015
RELEASE 740
COMPONENT CPIC (TCP/IP)
VERSION 3
RC 769
MODULE D:/depot/bas/740_REL/src/krn/si/cpic/r3cpic.c
LINE 10858
COUNTER 20
-----------------------------
With SAP GUI 720 everything works fine.
Are there any changes or bugs know for SAP GUI 740 or do we have to handle VBA logon to SAP in a new changed way?
We have the same errors in our SAP Online Transport Management System and within SAP ChaRM and Incident Mgt CRM (SAP NetWeaver).
BR
Florian