- Log in to post comments
User bio
404 bio not found
Member since Jan 4, 2022
Posts:
Replies:
Certifications & Credly badges:
Marcio has no Certifications & Credly badges yet.
Followers:
Marcio has no followers yet.
Following:
Marcio has not followed anybody yet.
HI all.....
I found a simple solution....
ValidateSignature(cswFileNameOrStream) ;new sc,status,xmlSignature,cswRootCA,reader;set cswRootCA="/certfiles/root_ca_icp-brasil.crt"set reader=##class(%XML.Reader).%New();set sc=reader.OpenFile(cswFileNameOrStream)quit:$$$ISERR(sc) sc;do reader.Correlate("Signature", "%XML.Security.Signature")while (reader.Next(.xmlSignature, .status) && (sc=$$$OK)) {set sc = xmlSignature.ValidateDocument(reader.Document,,cswRootCA)};quit sc