$(function () { pageContext.i18n.modTalk = 'moderation talk'; pageContext.i18n.replyToComment = 'Reply'; pageContext.i18n.modTalkEmpty = 'moderation talk is empty'; pageContext.url.getModTalk = "/comments/%25ID%25/listModTalk.json"; pageContext.url.possibleCommentRecipients = "/comments/%ID%/possibleRecipients.json"; pageContext.url.commentEdit = '/comments/%25ID%25/edit.html'; pageContext.url.commentView = '/comments/%ID%/view.html'; pageContext.i18n.commentVisibility = { 'full': 'Viewable by all users', 'op': 'Viewable by the original poster', 'mod': 'Viewable by moderators', 'opAndMod': 'Viewable by moderators and the original poster', 'other': 'Advanced visibility', 'dialogTitle': 'Comment visibility', 'selectGroups': 'Visible to groups', 'selectOther': 'Other recipients', 'selectOriginalPoster': 'Original poster', 'selectModerators': 'Moderators', 'selectAssignees': 'Asked to answer users' }; pageContext.i18n.commentMenuLabels = { 'comment-edit': 'comments.menu.edit', 'comment-delete': 'comments.menu.delete', 'comment-convert': 'comments.menu.convert' };pageContext.i18n.answer= { bestAnswer: 'Best Answer', controlBar : { accept: 'Accept', unaccept: 'Unaccept', acceptCommand: 'Accept this answer as correct', cancelAcceptedCommand: 'Remove this answers accepted status' } }; window.croles = { u: false, op: false, m: false, og: false, as: false, ag: false, dc: false, doc: false, eo: false, ea: false }; tools.init({ q: { e: false, ew: false, eo: false, r: false, ro: false, d: false, dow: false, fv: false, c: false, co: false, p: false, tm: false , ms: false, mos: false }, n: { f: false, vf: false, vfo: false, vr: false, vro: false, c: false, co: false, vu: false, vd: false, w: false, wo: false, l: false }, c: { e: false, eo: false, d: false, dow: false, ta: false, tao: false, l: false }, a: { e: false, ew: false, eo: false, d: false, dow: false, a: false, aoq: false, ao: false, tc: false, tco: false, p: false, tm: false }, pc: croles }, { tc: true, nsc: true }); commandUtils.initializeLabels(); }); Skip to Content
0

Bug at SAPLogon with wdtlog.ocx starting with SAP GUI 7.40 PL 9

Nov 01, 2016 at 08:27 PM

147

avatar image

Hi,

we recognize an issue within the component "wdtlog.ocx" / "wdtlogU.ocx" starting with SAP GUI 7.40 PL 9.

(In PL 7 the described functionality works without any trouble.)

And yes - we need the old ocx-component still in this days...

So:

A very simple way to test the situation is the possibility of running the logon in VBA in a Word document.

Private Sub test_sap_logon()
  Dim objSapLogon As Object
  Dim objConnection As Object
  Dim sMsg As String
  Dim bRetval As Boolean


  On Error GoTo 0
  
  Set objSapLogon = CreateObject("SAP.LogonControl.Unicode.1")
  
  Set objConnection = objSapLogon.NewConnection
    
  With objConnection
    .System = "D60" ' die System ID des SAP Systems, z.B. "Q11"
    .SystemNumber = 0 ' die Instanznummer des SAP Systems, z.B: 11
    .Client = "800" ' der Mandant für die Anmeldung, z.B: "100"
    .Language = "DE" ' die Anmeldesprache, z.B: "EN"
    .User = "USER1" ' der SAP Benutzername, z.B. "MAYER"
    .Password = "MyPassword" ' zum Test ihr SAP Kennwort, z.B. "11aa#13"
    .HostName = ""
    .CodePage = "" '"1100"
    .RfcWithDialog = 2
    .SNC = False
    .SNCName = ""
    .SNCQuality = "-1"
    .LowSpeedConnection = False
    .SystemID = ""
    .TraceLevel = 0
    .GatewayHost = ""
    .GatewayService = ""
    .ABAPDebug = False
    .UseDefaultSystem = False
    .UseSAPLogonIni = False
    .UseSAPRFCIni = False
    .Destination = .System
  End With
    
  ' Anmeldung an Servergruppe
  With objConnection
    .ApplicationServer = ""
    .GroupName = "PUBLIC" ' der Gruppenname zur Anmeldung an einer Servergruppe, z.B. "PUBLIC"
    .MessageServer = "se03" ' der Hostname des Messageservers zur Gruppenanmeldung, z.B. "MS11.inPuncto.local"
    .SAPRouter = ""
  End With
  
  bRetval = objConnection.Logon(0, True)
  If bRetval = False Then
    sMsg = ""
    Select Case objConnection.IsConnected
      Case 1 'tloRfcConnected
        ' that's correct - but why is bRetval = False ?
        sMsg = "TCP/IP error at SAP R/3 connection"
      Case 0 'tloRfcNotConnected
        sMsg = "Connection to SAP R/3 could not be established"
      Case 2 ' tloRfcConnectCancel
        sMsg = "Connection aborted"
      Case 4 'tloRfcConnectParameterMissing
        sMsg = "Connection error: Parameter missing"
      Case 8 'tloRfcConnectFailed
        'The R/3 connection failed - display further info
        Call objConnection.LastError
      Case Else
        sMsg = "Unknown RfcStatus in <SAP.Connection.IsConnected>"
    End Select
    If sMsg <> "" Then
      MsgBox sMsg, vbCritical + vbOKOnly
    End If
  Else
    Call objConnection.SystemInformation(0)
  End If
  Set objConnection = Nothing
  Set objSapLogon = Nothing
End Sub


At line objConnection.Logon SAP displays following message in a dialog

Error Group
RFC_ERROR_COMMUNICATION
Message

SAP_CMINIT3 : rc=20 > Connect to SAP gateway failed
Connect_PM  GWHOST=0, GWSERV=sapgw00, SYSNR=00

LOCATION    CPIC (TCP/IP) on local host vpc71-srvw01 with Unicode
ERROR       hostname '0' unknown
TIME        Thu Oct 27 08:10:15 2016
RELEASE     740
COMPONENT   NI (network interface)
VERSION     40
RC          -2
MODULE      D:/depot/bas/740_REL/src/base/ni/ninti.c
LINE        896
DETAIL      NiPGetHostByName: '0' not found
SYSTEM CALL getaddrinfo
COUNTER     4

Because the exactly same code works at SAP GUI 7.40 PL 7 without any error, we think that is a new bug in the component.

Does any other developer has the same problems?

Any help?

Regards, Oliver

10 |10000 characters needed characters left characters exceeded
* Please Login or Register to Answer, Follow or Comment.

0 Answers