Migrate chart code to separate function

[rebelinux]

Description

Migrate chart code to separate function.

$Alljobs = @()
if ($Bkjobs.info.LatestStatus) {
    $Alljobs += $Bkjobs.info.LatestStatus
}
if ((Get-VBRTapeJob -ErrorAction SilentlyContinue).LastResult) {
    $Alljobs += (Get-VBRTapeJob).LastResult
}
if ((Get-VBRSureBackupJob -ErrorAction SilentlyContinue).LastResult) {
    $Alljobs += (Get-VBRSureBackupJob -ErrorAction SilentlyContinue).LastResult
}
$sampleData = $Alljobs | Group-Object
$exampleChart = New-Chart -Name BackupJobs -Width 600 -Height 400

$addChartAreaParams = @{
    Chart                 = $exampleChart
    Name                  = 'BackupJobs'
    AxisXTitle            = 'Status'
    AxisYTitle            = 'Count'
    NoAxisXMajorGridLines = $true
    NoAxisYMajorGridLines = $true
}
$exampleChartArea = Add-ChartArea @addChartAreaParams -PassThru

$addChartSeriesParams = @{
    Chart             = $exampleChart
    ChartArea         = $exampleChartArea
    Name              = 'exampleChartSeries'
    XField            = 'Name'
    YField            = 'Count'
    Palette           = 'Green'
    ColorPerDataPoint = $true
}
$sampleData | Add-ColumnChartSeries @addChartSeriesParams

$addChartTitleParams = @{
    Chart     = $exampleChart
    ChartArea = $exampleChartArea
    Name      = 'BackupJob'
    Text      = 'Jobs Latest Result'
    Font      = New-Object -TypeName 'System.Drawing.Font' -ArgumentList @('Arial', '12', [System.Drawing.FontStyle]::Bold)
}
Add-ChartTitle @addChartTitleParams

$chartFileItem = Export-Chart -Chart $exampleChart -Path (Get-Location).Path -Format "PNG" -PassThru

if ($PassThru)
{
    Write-Output -InputObject $chartFileItem
}

Additional Context

No response

Before submitting

• I have read the documentation, and referred to the known issues before submitting this change request.
• I have checked for previously opened & closed issues before submitting this change request.