Lo que necesitas debería de regresartelo la función: 'SSFC_PARSECERTIFICATE' en el SERIALNO o el FINGERPRINT.
Ejem:
* parse own certificate from pse
CALL FUNCTION 'SSFC_PARSECERTIFICATE'
EXPORTING
CERTIFICATE = L_CERTIFICATE
IMPORTING
SUBJECT = P_SUBJECT
ISSUER = L_ISSUER
SERIALNO = P_SERIALNO <-----
VALIDFROM = l_validfrom
VALIDTO = l_validto
ALGID = g_algid
FINGERPRINT = P_FINGERPRINT <-----
SUMMARY = L_SUMMARY
ALL = L_ALL
EXCEPTIONS
SSF_KRN_ERROR = 1
SSF_KRN_NOMEMORY = 2
SSF_KRN_NOSSFLIB = 3
SSF_KRN_INVALID_PAR = 4
OTHERS = 5.
espero te sirva esta información.
Saludos.
__________________
Ing, Fernando Sandoval Parra.
Sr. ABAP/4 developer Consultant
|