Xbase++ Requires Chilkat v11.0.0+

Transition from Email.FindIssuer to Cert.GetIssuer

Provides instructions for replacing deprecated FindIssuer method calls with Cert.GetIssuer. Xbase++

LOCAL nSuccess
LOCAL oEmail
LOCAL oCert
LOCAL oCertObj
LOCAL oIssuerCert

nSuccess := 0

oEmail := CreateObject("Chilkat.Email")
oCert := CreateObject("Chilkat.Cert")

//  ...
//  ...

//  ------------------------------------------------------------------------
//  The FindIssuer method is deprecated:

oCertObj := oEmail:FindIssuer(oCert)
IF (oEmail:LastMethodSuccess == 0)
    ? oEmail:LastErrorText
    oEmail:destroy()
    oCert:destroy()
    RETURN
ENDIF

//  ...
//  ...

oCertObj:destroy()

//  ------------------------------------------------------------------------
//  Do the equivalent using Cert.GetIssuer.
//  Your application creates a new, empty Cert object which is passed 
//  in the last argument and filled upon success.

oIssuerCert := CreateObject("Chilkat.Cert")
nSuccess := oCert:GetIssuer(oIssuerCert)
IF (nSuccess == 0)
    ? oEmail:LastErrorText
    oEmail:destroy()
    oCert:destroy()
    oIssuerCert:destroy()
    RETURN
ENDIF

oEmail:destroy()
oCert:destroy()
oIssuerCert:destroy()