xlBuf.AddColumnPr('Column Header 1',FALSE,xlBuf."Cell Type"::Text,''); xlBuf.AddColumnPr('Column Header 2',FALSE,xlBuf."Cell Type"::Text,''); xlBuf.AddColumnPr('Column Header 3',FALSE,xlBuf."Cell Type"::Text,''); xlBuf.NewRow; xlBuf.AddColumnPr(100,FALSE,xlBuf."Cell Type"::Number,''); xlBuf.AddColumnPr(200,FALSE,xlBuf."Cell Type"::Number,'Unlocked'); // Allow edit cell xlBuf.AddColumnPr('=A2+B2',TRUE,xlBuf."Cell Type"::Number,'Formula Hidden'); // Hide formula // Password is Pass xlBuf.ProtectSheet( 'HEdftSyT8KPWhGzOmzHYTecQnB0jjcqSiJ+BT4dVSAO84CSydiTxV8Ko7KnqHmIWz0ofd1i9qSnqwibCYhNx8g==', 'rrvL3+SaHgL5shjuB9BePg==', 100000); xlBuf.CreateBookAndOpenExcel('','Sheet1','',COMPANYNAME,USERID);
</sheetData> <sheetProtection algorithmName="SHA-512" hashValue="cSeSDt4Mhl1M12H8JGJ/JZ1XZ4oWSqqJfrq0Hh3ggPRZS7d/bu2S4lld0JlwYqTx8wK9X6tYKZi55fmtzT8Agw==" saltValue="IzuINz/i6RcBz6ECeI1Q1g==" spinCount="100000" sheet="1" objects="1" scenarios="1"/>
procedure Encode(YourRecord: Record "YourRecord") var Base64Convert: Codeunit "Base64 Convert"; TempBlob: Codeunit "Temp Blob"; InStream: InStream; Base64Result: Text; begin YourRecord.CalcFields(YourBlobField); TempBlob.FromRecord(YourRecord, YourRecord.FieldNo(YourBlobField)); TempBlob.CreateInStream(InStream); Base64Result := Base64Convert.ToBase64(InStream); end
Name DataType Subtype Length XMLDoc DotNet System.Xml.XmlDocument.'System.Xml, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089' XMLDocOut DotNet System.Xml.XmlDocument.'System.Xml, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089' XMLNode DotNet System.Xml.XmlNode.'System.Xml, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089' XMLNodeList DotNet System.Xml.XmlNodeList.'System.Xml, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089' XMLAttrib DotNet System.Xml.XmlAttributeCollection.'System.Xml, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089' i Integer Nodes Integer tDate Text tCurrency Text tRate Text