PDF Export

// 1. Prepare the output path
var outputFileName = Path.ChangeExtension(Path.GetTempFileName(), ".pdf");

// 2. Load the report definition (Page Report)
using (var stream = GetType().Assembly.GetManifestResourceStream("Reports.PriceHistory.rdlx"))
using (var reader = new StreamReader(stream))
{
    var rpt = new GrapeCity.ActiveReports.PageReport(reader);
    
    // 3. Create PDF Settings
    var pdfSettings = new GrapeCity.ActiveReports.Export.Pdf.Page.Settings();

    // A. Add Additional Metadata (XMP)
    // specific schemas used for archiving and indexing systems
    pdfSettings.AdditionalMetadata.AddRange(new List<GrapeCity.ActiveReports.Export.Pdf.AdditionalMetadataInfo> 
    {
        // Dublin Core: Standard for library/document cataloging
        new GrapeCity.ActiveReports.Export.Pdf.AdditionalMetadataInfo
        {
            Namespace = GrapeCity.ActiveReports.Export.Pdf.AdditionalMetadataNamespace.PurlOrg,
            Key = "creator", 
            Value = "Senior Analyst: John Doe"
        },
        // Adobe PDF Schema: Used by PDF readers for search
        new GrapeCity.ActiveReports.Export.Pdf.AdditionalMetadataInfo
        {
            Namespace = GrapeCity.ActiveReports.Export.Pdf.AdditionalMetadataNamespace.NsAdobeComPdf,
            Key = "Keywords",
            Value = "price-history, invoices, 2025, q3-analysis"
        },
        // XMP Basic Schema: Technical details about creation
        new GrapeCity.ActiveReports.Export.Pdf.AdditionalMetadataInfo
        {
            Namespace = GrapeCity.ActiveReports.Export.Pdf.AdditionalMetadataNamespace.NsAdobeComXap,
            Key = "CreatorTool",
            Value = "ActiveReports Reporting Engine v18"
        }
    });

    // B. Add File Attachments
    // Scenario: Embedding the raw data (CSV) so users can verify calculations
    var csvContent = "Date,Item,Price\n2025-01-01,Widget A,10.00\n2025-01-02,Widget B,15.50";
    pdfSettings.Attachments.Add(new GrapeCity.ActiveReports.Export.Pdf.AttachmentInfo
    {
        Name = "RawData_2025.csv",
        Description = "Source dataset for the price analysis graph",
        Content = Encoding.UTF8.GetBytes(csvContent)
    });

    // C. Add Custom Properties (Custom Tab)
    pdfSettings.CustomProperties.AddRange(new List<GrapeCity.ActiveReports.Export.Pdf.CustomProperty>
    {
        new GrapeCity.ActiveReports.Export.Pdf.CustomProperty
        {
            Name = "FiscalYear",
            Value = "2025"
        },
        new GrapeCity.ActiveReports.Export.Pdf.CustomProperty
        {
            Name = "DocumentType",
            Value = "PriceHistoryAnalysis"
        },
        new GrapeCity.ActiveReports.Export.Pdf.CustomProperty
        {
            Name = "Sensitivity",
            Value = "Confidential"
        }
    });

    // 4. Render the Report
    var pdfExport = new GrapeCity.ActiveReports.Export.Pdf.Page.PdfRenderingExtension();
    
    var fileStreamProvider = new GrapeCity.ActiveReports.Rendering.IO.FileStreamProvider(
        new DirectoryInfo(Path.GetTempPath()), 
        Path.GetFileNameWithoutExtension(outputFileName));
        
    rpt.Document.Render(pdfExport, fileStreamProvider, pdfSettings);
}

' 1. Prepare the output path
Dim outputFileName = Path.ChangeExtension(Path.GetTempFileName(), ".pdf")

' 2. Load the report definition (Page Report)
Using stream = GetType().Assembly.GetManifestResourceStream("Reports.PriceHistory.rdlx")
    Using reader As New StreamReader(stream)
        Dim rpt As New GrapeCity.ActiveReports.PageReport(reader)

        ' 3. Create PDF Settings
        Dim pdfSettings As New GrapeCity.ActiveReports.Export.Pdf.Page.Settings()

        ' A. Add Additional Metadata (XMP)
        pdfSettings.AdditionalMetadata.AddRange(New List(Of GrapeCity.ActiveReports.Export.Pdf.AdditionalMetadataInfo) From {
            New GrapeCity.ActiveReports.Export.Pdf.AdditionalMetadataInfo With {
                .Namespace = GrapeCity.ActiveReports.Export.Pdf.AdditionalMetadataNamespace.PurlOrg,
                .Key = "creator",
                .Value = "Senior Analyst: John Doe"
            },
            New GrapeCity.ActiveReports.Export.Pdf.AdditionalMetadataInfo With {
                .Namespace = GrapeCity.ActiveReports.Export.Pdf.AdditionalMetadataNamespace.NsAdobeComPdf,
                .Key = "Keywords",
                .Value = "price-history, invoices, 2025, q3-analysis"
            },
            New GrapeCity.ActiveReports.Export.Pdf.AdditionalMetadataInfo With {
                .Namespace = GrapeCity.ActiveReports.Export.Pdf.AdditionalMetadataNamespace.NsAdobeComXap,
                .Key = "CreatorTool",
                .Value = "ActiveReports Reporting Engine v18"
            }
        })

        ' B. Add File Attachments
        Dim csvContent = "Date,Item,Price" & vbCrLf & "2025-01-01,Widget A,10.00" & vbCrLf & "2025-01-02,Widget B,15.50"
        pdfSettings.Attachments.Add(New GrapeCity.ActiveReports.Export.Pdf.AttachmentInfo With {
            .Name = "RawData_2025.csv",
            .Description = "Source dataset for the price analysis graph",
            .Content = Encoding.UTF8.GetBytes(csvContent)
        })

        ' C. Add Custom Properties
        pdfSettings.CustomProperties.AddRange(New List(Of GrapeCity.ActiveReports.Export.Pdf.CustomProperty) From {
            New GrapeCity.ActiveReports.Export.Pdf.CustomProperty With {
                .Name = "FiscalYear",
                .Value = "2025"
            },
            New GrapeCity.ActiveReports.Export.Pdf.CustomProperty With {
                .Name = "DocumentType",
                .Value = "PriceHistoryAnalysis"
            },
            New GrapeCity.ActiveReports.Export.Pdf.CustomProperty With {
                .Name = "Sensitivity",
                .Value = "Confidential"
            }
        })

        ' 4. Render the Report
        Dim pdfExport As New GrapeCity.ActiveReports.Export.Pdf.Page.PdfRenderingExtension()
        
        Dim fileStreamProvider As New GrapeCity.ActiveReports.Rendering.IO.FileStreamProvider(
            New DirectoryInfo(Path.GetTempPath()),
            Path.GetFileNameWithoutExtension(outputFileName))

        rpt.Document.Render(pdfExport, fileStreamProvider, pdfSettings)
    End Using
End Using

' Provide the Page report you want to render.
Dim rptPath As New IO.FileInfo("..\..\..\Report1.rdlx")
Dim pageReport As New GrapeCity.ActiveReports.PageReport(rptPath)

' Create an output directory.
Dim outputDirectory As New System.IO.DirectoryInfo("C:\MyPDF")

outputDirectory.Create()
                        
' Provide settings for your rendering output.
Dim pdfSetting As New GrapeCity.ActiveReports.Export.Pdf.Page.Settings()
' Set the rendering extension and render the report.
Dim pdfRenderingExtension As New GrapeCity.ActiveReports.Export.Pdf.Page.PdfRenderingExtension()
Dim outputProvider As New GrapeCity.ActiveReports.Rendering.IO.FileStreamProvider(outputDirectory,System.IO.Path.GetFileNameWithoutExtension(outputDirectory.Name))

' Overwrite output file if it already exists
outputProvider.OverwriteOutputFile = True

pageReport.Document.Render(pdfRenderingExtension, outputProvider, pdfSetting)

// Provide the Page report you want to render.
System.IO.FileInfo rptPath = new System.IO.FileInfo(@"..\..\..\Report1.rdlx");
GrapeCity.ActiveReports.PageReport pageReport = new GrapeCity.ActiveReports.PageReport(rptPath);

// Create an output directory.
System.IO.DirectoryInfo outputDirectory = new System.IO.DirectoryInfo(@"C:\MyPDF");
outputDirectory.Create();

// Provide settings for your rendering output.
GrapeCity.ActiveReports.Export.Pdf.Page.Settings pdfSetting = new GrapeCity.ActiveReports.Export.Pdf.Page.Settings();

// Set the rendering extension and render the report.
GrapeCity.ActiveReports.Export.Pdf.Page.PdfRenderingExtension pdfRenderingExtension = new
        GrapeCity.ActiveReports.Export.Pdf.Page.PdfRenderingExtension();

GrapeCity.ActiveReports.Rendering.IO.FileStreamProvider outputProvider = new GrapeCity.ActiveReports.Rendering.IO.FileStreamProvider(outputDirectory,
        System.IO.Path.GetFileNameWithoutExtension(outputDirectory.Name));

// Overwrite output file if it already exists
outputProvider.OverwriteOutputFile = true;

pageReport.Document.Render(pdfRenderingExtension, outputProvider, pdfSetting);