Share
Report
106Hello Everyone,
I am working with a task where we need to sign data by using private key received from Azure Vault.
Here we are able to do it by following this blog:
How To Access Azure Key Vault Secrets Through Rest API Using Postman (c-sharpcorner.com)
after having this key in system we are trying to use codunit cryptography or RSA
CryptoMgmt: Codeunit "Cryptography Management";
rsa: Codeunit RSACryptoServiceProvider;
SecretKey := 'MIICXgIBAAKBgQDIYh3tSlmpU7rxPepe+c20abLXiYpI1NfxlKh9OThouEble9ir3ymDq4H/OuKsw6yZ21QFYvuE1U7vrwqECb1lmOY4EqdcsmxgKvoZVOcHgB3Bj4DiSl6yGbOE6wwoJbUXlO39eKBRYGBGdg1POEr2ivDPph0XvSk+y+7sZ3ZF1QIDAQABAoGAYtkL3EdmDYJxYJnjaLCfydSuVWbS4XSlhdWIfCVi7z2gM4oxay9t4jcTrJ0WvpTUKx2nx/R5EKDNDK1zaYkIdRs+ASDSI4UuJ9XDLjB3ei9HnNP83ZzSoZ3LYHGNvuqM8ZSk9dJmb7+wuJocScOOnh8LI2GEjYd48SrPxQpXiEECQQDoO5304nUH1ZAuGWel5AER0F9Zg2XEA8carN3AQ4fjX+dKCSgWlYxjMtwjXpN0FL0ohTbvmvJgO3E9XLgdvQYFAkEA3OQObQYw5RokYHg7gmq+20+nyWm2gdbxfG7FyfIfpKCWoLIGMLcTprXr6Xgap/aTvPuuBknmXM5wtqPAxU/5kQJBAJDA6FpF9ZCmi7JQX4zFq+0Apw5SmtItUKPN8ILxFPijRLWfM3+wQ8tpXlIll1+ZtbZWIsIDIOTe6FzJOHJA6kkCQQDOpozYcnJL46kkl1cVK8hiZKMUS1HzJqPFRdzEkUAJRDOnIuWnrZ801/1c7oABoy2UH+EvAPQC3x+Tvp8Z+TgBAkEAySwRR2zFCcQFUYje26G60tyzcd1yKDBau3OOyxC/h1emBWoJtz+VC2nuA3gxBgwSq3sH2jJ2+WEHtolGLz3sCQ==';
Message(SecretKey);
// SecretKey := Base64.ToBase64(SecretKey);
// SecretKey := '<RSAKeyValue><Modulus>' + SecretKey + '</RSAKeyValue>';//'</Modulus><Exponent>AQAB</Exponent></RSAKeyValue>';
SIGNATURERECORD.DeleteAll();
SIGNATURERECORD.Init();
SIGNATURERECORD."Key Index" := 1;
SIGNATURERECORD.FromXmlString(SecretKey);
// SIGNATURERECORD.ToXmlString(true);
SIGNATURERECORD.Insert();
TempBLOB.CreateOutStream(OUTSTREAM1, TextEncoding::UTF8);
// OUTSTREAM1.WriteText('2019-01-11;2019-01-11T11:27:08;FAC 001/9;1200.00');
OUTSTREAM1.WriteText('FAC11');
TempBLOB.CreateInStream(stream);
// rsa.ToXmlString(true);
rsa.SignData(SecretKey, stream, Algo::SHA256, outstream);
//CryptoMgmt.SignData('FAC11', SIGNATURERECORD, Algo::SHA1, outstream);
outstream.WriteText(hASHVALUE);
SIGNATURERECORD.Delete();
Have written this code also to check but runs in issue:
I chekced there is no space in key and it is hardcoded without any space. But facing this issue
All responses (
Answers (
